Importation de fichier texte d'une serveur ftp

Bonjour,

"Pierre" <Pierre@discussions.microsoft.com> a écrit dans le message de news: C91B7958-6640-43AC-89E6-AAB47078EBD9@microsoft.com...

Bonjour à tous!

Il est très simple avec excel d'importer un fichier texte à partir du web ou
ftp.

Est -il possible de faire de même avec access?

Merci!

Pour télécharger un fichier depuis son url (http), regarde ici :
http://www.3stone.be/access/articles.php?lng=fr&pg

Pour l'"accès ftp, personnellement, j'utilise toujours la veille méthode de snack
qui a le mérite de ne jamais bugger :

Sub TestFtpLire()
FtpLire "c:mesdoc~1", "Stats", "mars02.pdf"
End Sub

Sub FtpLire(RepertoireLocal As String, _
NomRépertoire As String, NomFichier As String)


Dim ds As Long
Const FtpNomFichierTemp = "FtpTemp.Txt"
Const NOM_DU_SERVEUR = "ftp.multimania.com"
Const LOGIN = "accessnews"
Const MOT_DE_PASSE = "newsgroup"


ds = FreeFile
Open FtpNomFichierTemp For Output As #ds


Print #ds, "open " & NOM_DU_SERVEUR
Print #ds, "user " & LOGIN & " " & MOT_DE_PASSE
Print #ds, "pwd"
Print #ds, "prompt"
Print #ds, "Bin"
Print #ds, "lcd " & RepertoireLocal
Print #ds, "cd " & NomRépertoire
Print #ds, "get " & NomFichier
Print #ds, "Close"
Print #ds, "Quit"
Close #ds
Shell "ftp -n -s:" & FtpNomFichierTemp, vbNormalFocus
End Sub




a+
--
Arnaud
---------------------------------------------
infos, conseils et liens : http://www.mpfa.info
---------------------------------------------