envoyer des fichier en vbs - VB/VBA/VBS - Programmation
MarshPosté le 22-11-2011 à 18:46:27
Salut tous le monde ceux ci est mon premier message alors voila mon problème j'essaye d'envoyer des fichier par free mes je n'arrive pas a remplir la zone texte fichier voila mon script:
Dim IE Set IE = Wscript.CreateObject("InternetExplorer.Application" ) IE.Visible = 1 IE.navigate "http://dl.free.fr/" Do While (IE.Busy) WScript.Sleep 10 Loop
Set Helem = IE.document.getElementById("mail1" ) Helem.Value = "mon@dress"
Set Helem = IE.document.getElementById("ufile" ) Helem.Value = "Mon fichier"
WScript.Sleep 1000000 Set Helem = IE.document.Forms(0) Helem.Submit
Marsh Posté le 22-11-2011 à 18:46:27
Salut tous le monde ceux ci est mon premier message alors voila mon problème j'essaye d'envoyer des fichier par free mes je n'arrive pas a remplir la zone texte fichier voila mon script:
Dim IE
Set IE = Wscript.CreateObject("InternetExplorer.Application" )
IE.Visible = 1
IE.navigate "http://dl.free.fr/"
Do While (IE.Busy)
WScript.Sleep 10
Loop
Set Helem = IE.document.getElementById("mail1" )
Helem.Value = "mon@dress"
Set Helem = IE.document.getElementById("ufile" )
Helem.Value = "Mon fichier"
WScript.Sleep 1000000
Set Helem = IE.document.Forms(0)
Helem.Submit
si quelqu'un peut m'aider? merci