InetSendSaveCmd Example for Visual Basic

Dim nRet As Integer

nRet = LEADNet1.InetSendSaveCmd(999, 1, "d:\temp\remote.tif", FILE_TIF, 0, 0, True)
If ((nRet <> 0) And (nRet <> ERROR_DATA_QUEUED)) Then
   MsgBox "ERROR " & CStr(nRet) & " calling InetSendSaveCmd."
Else
   MsgBox "InetSendSaveCmd Executed."
End If