Announcement

Collapse
No announcement yet.

Airport Delay Discussion

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

    Airport Delay Discussion

    The airport delay is a good idea and got my interest. My airports had no delays and the script needed some limit checking for the Mid function when removing the CR. In all cases my NextPos index = 0 which is not liked by Mid.

    #2
    Does any one have a fix for this . I like this script since I do alot of traveling. this is the error I get in HS log. It no longer updates since 7/15/03

    7/25/2003 10:34:32 PM~!~Error~!~Script error in file: airport_status.txt: 5:Invalid procedure call or argument: 'Mid' in line 91
    HS4 Environment
    Proxmox win11 / HS4
    Netiom-Xap board
    Plug-In's
    rnbWeather 4.4.2.0
    mcsMQTT V6.15.1.0
    mcsXap V3.0.0.72
    Zigbee Plus V1.0.0.0
    Zigbee V4.0.11.0

    There is no place Like 127.0.0.1

    Comment


      #3
      The FAA changed their URL. An update is posted here.

      Comment


        #4
        That Did it !!!
        HS4 Environment
        Proxmox win11 / HS4
        Netiom-Xap board
        Plug-In's
        rnbWeather 4.4.2.0
        mcsMQTT V6.15.1.0
        mcsXap V3.0.0.72
        Zigbee Plus V1.0.0.0
        Zigbee V4.0.11.0

        There is no place Like 127.0.0.1

        Comment


          #5
          Thanks for the fix, it took me a while to find it.

          I did one little hack to change the Airport designation to a clickable link

          <pre class="ip-ubbcode-code-pre">

          Airport = "&lt;a href=""http://www.fly.faa.gov/flyfaa/flyfaaindex.jsp?ARPT=" & Airport & "&p=0""&gt;" & Airport & "&lt;/a&gt;"



          If i&gt;=0 Then
          Set file = fso.OpenTextFile(filename, OpenFileForAppending, True)
          file.WriteLine("&lt;tr&gt;&lt;td&gt;" & airport & "&lt;/td&gt;&lt;td&gt;" & destDelays & "&lt;/td&gt;&lt;td&gt;" & genDepartureDelays & "&lt;/td&gt;&lt;td&gt;" & genArrivalDelays & "&lt;/td&gt;&lt;/tr&gt;")
          file.Close
          'store information for sending via email later
          msgBody = msgBody & airport & Chr(10) & destDelays & Chr(10)& genDepartureDelays & Chr(10) & genArrivalDelays & Chr(10) & Chr(10)
          End if


          </pre>

          Comment

          Working...
          X