ftp w/ inet - ok, close pgm is slow
doing some uploading with inet control. this works. but, when i close the form its slow to close. only 2-3 sec. any ideas?
this is my statechanged event:
VB Code:
Private Sub Inet1_StateChanged(ByVal State As Integer)
'On Error Resume Next
Select Case State
Case icNone
Case icResolvingHost: txt.Text = txt.Text & vbCrLf & "Resolving Host"
Case icHostResolved: txt.Text = txt.Text & vbCrLf & "Host Resolved"
Case icConnecting: txt.Text = txt.Text & vbCrLf & "Connecting..."
Case icConnected: txt.Text = txt.Text & vbCrLf & "Connected"
Case icRequesting: txt.Text = txt.Text & vbCrLf & "Sending a request to the host."
Case icRequestSent: txt.Text = txt.Text & vbCrLf & "Successfully sent the request."
Case icReceivingResponse: txt.Text = txt.Text & vbCrLf & "Receiving a response from the host."
Case icResponseReceived: txt.Text = txt.Text & vbCrLf & "Transferring File..."
Case icDisconnecting: txt.Text = txt.Text & vbCrLf & "Disconnecting..."
Case icDisconnected: txt.Text = txt.Text & vbCrLf & "Disconnected"
Case icError: MsgBox "Error:" & Inet1.ResponseCode & " " & Inet1.ResponseInfo
Case icResponseCompleted: txt.Text = txt.Text & vbCrLf & "Process Complete.": Inet1.Execute , "CLOSE"
End Select