Staple1600
XLDnaute Barbatruc
Bonjour à tous
PREAMBULE: ce fil est liè a celui-ci:
Firefox 3 -places.sqlite
Je suis coincé à ce niveau:
La macro suivante crée le batch et le lance (ça c'est OK)
Sauf que le batch lui ne fonctionne pas
Je cherche un moyen par VBA, d'envoyer les instructions (contenues dans le batch) dans l'invite MSDos et de simuler à chaque fin de chaine l'appui sur la touche ENTER.
Les instructions quand on les passe manuellement à partir de l'invite MSDos , une par une et qu'on appuie sur ENTER fonctionne.
Avez-vous une idée sur la façon de s 'y prendre ?
PREAMBULE: ce fil est liè a celui-ci:
Firefox 3 -places.sqlite
Je suis coincé à ce niveau:
La macro suivante crée le batch et le lance (ça c'est OK)
Code:
Sub cree_bat()
Open "c:\temp\Ftest.bat" For Output As #1
Print #1, "cd\"
Print #1, "cd c:\sqlite3"
Print #1, "sqlite3 places.sqlite"
Print #1, ".dump txt"
Print #1, ".output test.txt"
Print #1, "select url,title from moz_places;"
Print #1, ".exit"
Close #1
Shell "c:\temp\Ftest.bat", vbNormalFocus
End Sub
Je cherche un moyen par VBA, d'envoyer les instructions (contenues dans le batch) dans l'invite MSDos et de simuler à chaque fin de chaine l'appui sur la touche ENTER.
Les instructions quand on les passe manuellement à partir de l'invite MSDos , une par une et qu'on appuie sur ENTER fonctionne.
Avez-vous une idée sur la façon de s 'y prendre ?