How can you open a file from a web server?

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • drewry
    New Member
    • Oct 2006
    • 1

    How can you open a file from a web server?

    How would you be able to open a file from a webserver, like you would open a file on your computer?

    Here's my source, and it doesnt work. It gives me run time error 52. Anyone know how to fix this?

    Code:
    Private Sub Command1_Click()
        Dim strArray() As String
        form_user = Text1(0).Text
        form_pass = Text1(1).Text
        address = "HTTP://www.axedio.com/campaign/battle_code/users.php?user=" & form_user & "pass=" & form_pass & ""
        Open address For Input As #1
        strArray = Split(Input(LOF(1), 1), vbCrLf)
        
        If strArray(0) = "TRUE" Then
        Else
        MsgBox "Error:  Invalid Username!"
        End If
        
        If strArray(1) = strArray(2) Then
        Text1(0).Visible = False
        Text1(1).Visible = False
        Label1(0).Visible = False
        Label1(1).Visible = False
        Command1.Visible = False
        Label2.Visible = True
        Else
        MsgBox "Error:  Invalid Password!"
        End If
        
        Close #1
        
        
    End Sub
Working...