Hi
I am getting an error when I send multiple files my code is as follows:
strExistingFile = GetImagePath() & "" & intInvNum & "-1.jpg"
'if it exists then load it
If FileExists(strExistingFile) Then
strGlobalFTPFilename = strExistingFile
client.PutFile(strExistingFile, GetFTPImageFolder() & intInvNum & "-1.jpg")
End If
'Now the second
strExistingFile = GetImagePath() & "" & intInvNum & "-2.jpg"
'if it exists then load it
If FileExists(strExistingFile) Then
strGlobalFTPFilename = strExistingFile
client.PutFile(strExistingFile, GetFTPImageFolder() & intInvNum & "-2.jpg")
End If
The first file will load but the second throws an exception:
Cannot send command to server because response for previous one was not received.
The files I am tryimg to send arre around 50k.
Any help would be appreciated.
Nick Steele