Results 1 to 1 of 1
  1. #1
    Join Date
    Sep 2004
    Location
    Raleigh, NC
    Posts
    146

    Question Unanswered: Checking file on the net

    I wanted to be able to check a text file online and based on the contents of that text file, display either "TRUE" or "FALSE". It was suggested that I try the following code:

    Code:
    Function HttpCall()
    Dim http
    Set http = CreateObject("Microsoft.XMLHTTP")
    http.Open "GET", "http://www.abc.com/serial.txt", False
    http.Send
    If http.responseText = "123456" Then
      Me.Text7.Value = "True"
    Else
      Me.Text7.Value = "False"
    End If
    Set http = Nothing
    End Function
    I placed the code in a new mode and saved it. On my form, I created a new text box with Control Source "=HttpCall()" and an unbound text box called "Text7". When I open the form, I get "#Name?" instead of "TRUE" or "FALSE" so apparently I referenced the module incorrectly. Anyone have any idea what I might have done wrong?
    Last edited by smacdonaldnc; 11-16-04 at 02:30.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •