[VBS] Rappatrier une page WEB ?

Rappatrier une page WEB ? [VBS] - VB/VBA/VBS - Programmation

Marsh Posté le 02-10-2005 à 10:14:14    

Bonjour messieurs ! Je cherche a rappatrier une page Web en VBScript, voila où j'en suis actuellement mais j'ai une erreur pour l'avant derniere ligne, il me dit qu'il ne supporte pas les parenthese
 
Quelqu'un aurait une idee ? MErci beaucoup !!!!
 
 

Code :
  1. dim ie
  2. set ie=createobject("internetexplorer.application" )
  3. ie.visible=false
  4. ie.navigate2("http://www.clubic.com/index.htm" )
  5. do while ie.busy=true
  6. wscript.sleep 60
  7. loop
  8. ie.document.execwb("saveas",false,"d:\\fichier.txt" )
  9. ie.quit


Message édité par pink floyd le 02-10-2005 à 10:14:52

---------------
Oui aux titres de topic clair et precis...
Reply

Marsh Posté le 02-10-2005 à 10:14:14   

Reply

Marsh Posté le 02-10-2005 à 11:20:50    

Normal, en VBS déjà pas de paranthèses !
 
set ie=createobject("internetexplorer.application" )  
 
Set fso=CreateObject("Scripting.FileSystemObject" )
Set objFile=fso.createTextFile("d:\fichier.txt" )  
 
ie.visible=False  
ie.navigate2("http://www.clubic.com/index.htm" )  
do while ie.busy=true  
wscript.sleep 60  
Loop  
objFile.Write IE.Document.Body.innerHTML
ie.quit
 
 
Voilà là ça marche !
 
Fred

Reply

Marsh Posté le 02-10-2005 à 11:23:50    

Veuillez agréer Monsieurs, mes plus sinceres remerciements ^^
 
 
Impecable ! Merci beaucoup :)


---------------
Oui aux titres de topic clair et precis...
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed