---Soumis par Dev Ashish---
Utiliser FTP.
(Q) Comment utiliser FTP depuis Access?
(A) Sous Win95 et NT, vous devez utiliser un fichier script SCR (script) avec FTP. Considérer l'exmple suivant:
'********************** Code Start ************************* Sub sFTP(stSCRFile As String) 'Usage: ' call sFTP("C:\temp\test.scr") 'Exemple de fichier SCR pour NT/Win95 FTP ' lcd "c:\temp" ' open ftp.someserver.com ' anonymous ' dash10@hotmail.com ' cd public ' binary ' get dead.letter dead.letter ' bye Dim stSysDir As String stSysDir = Environ$("COMSPEC") stSysDir = Left$(stSysDir, Len(stSysDir) - Len(Dir(stSysDir))) Call Shell(stSysDir & "ftp.exe -s:" & stSCRFile, vbNormalFocus) End Sub '********************** Code End *************************
Il faut fournir ftp://ftp.exe/ comme nom de programme, non CMD.EXE (sous NT) qui retourne Environ$("Comspec") . Si vous désirez cacher la fenêtre DOS, utiliser vbHide au lieu de vbNormalFocus.
Une alternative consiste à utiliser l'API WinInet directement, si vous avez installé Internet Explorer 4.x, ou plus récent. Un exemple est disponible sous InetTransferLib.