Bonjour,
j'utilise cette API pour effectuer des opérations sur des serveurs FTP.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
Private Declare Function FtpPutFile Lib "wininet.dll" Alias "FtpPutFileA" _
 (ByVal hConnect As Integer, ByVal lpszLocalFile As String, _
  ByVal lpszNewRemoteFile As String, ByVal dwFlags As Integer, _
  ByVal dwContext As Integer) As Boolean
J'ai un souci lorsque la connexion est brutalement coupée, cette fonction ne déclenche aucune exception et semble perdue dans les limbes de la machine...
J'utilise cette fonction pour le transfert :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Public Function Upload(ByVal fFileLocal As FileInfo) As Boolean
    Dim bReturn As Boolean = False
    Try
        bReturn = FtpPutFile(HwndConnect, fFileLocal.FullName,
 fFileLocal.Name, &H0, 0)
    Catch ex As Exception
        Throw New Exception(ex.ToString)
    End Try
    Return bReturn
End Function
Est-ce que quelqu'un voit un moyen de déclencher une exception ou un arrêt de cette fonction en cas de déconnexion brutale ?
Merci d'avance.