Importer avec vba un fichier texte dans access disponible depuis un lien web

angel696969 Messages postés 1 Date d'inscription jeudi 17 août 2006 Statut Membre Dernière intervention 17 août 2006 - 17 août 2006 à 11:04
Mohlrha Messages postés 1 Date d'inscription mercredi 24 septembre 2008 Statut Membre Dernière intervention 19 avril 2010 - 19 avril 2010 à 13:55
Bonjour,

j'essaye desespérement d'importer un fichier texte dans une table ACCESS mais ce fichier est uniquement disponible depuis un lien WEB interne :
http://pyai42.inetpsa.com/MVSDS/'PDU%23.PDU00000.PAYSVERS.txt'

J'ai ecrit le code suivant :
[Form_Démarrage].OUVRIR.InitDir = "c:\temp"
[Form_Démarrage].OUVRIR.FileName = "*.*"
[Form_Démarrage].OUVRIR.Filter = "Fichiers texte" & "(*.*)|*.*|*.*)|*.*"
[Form_Démarrage].OUVRIR.ShowOpen
Nom_fichier = [Form_Démarrage].OUVRIR.FileName

OUVRIR etant le nom de l'activex CommonDialog
et [Form_Démarrage] le formulaire ou il se trouve

J'ai utilisé un activex "commondialog" et ca marche si je saisi mon lien en manuel dans la boite qui s'ouvre en revanche si j'ajoute le code

[Form_Démarrage].OUVRIR.FileName ="http://pyai42.inetpsa.com/MVSDS/'PDU%23.PDU00000.PAYSVERS.txt'"

J'ai une erreur d'execution '20477'

En fait j'ai noté qu'en saisissant à la main le lien dans la boite qui s'affiche la variable nom_fichier est égale à : C:\Documents and Settings\J611693\Local Settings\Temporary Internet Files\Content.IE5\SHEFSHUF\'PDU%23.PDU00000.PAYSVERS[1].txt'

Comment faire pour importer ce fichier sous forme de lien sans avoir à saisir l'URL dans la boite de dialog ?

Merci de votre aide car je galère depuis plusieurs jours

1 réponse

Mohlrha Messages postés 1 Date d'inscription mercredi 24 septembre 2008 Statut Membre Dernière intervention 19 avril 2010
19 avril 2010 à 13:55
dsqf
0
Rejoignez-nous