cs_Thib
Messages postés20Date d'inscriptionvendredi 4 mai 2001StatutMembreDernière intervention24 janvier 2004
-
27 juin 2002 à 11:22
Manu_12
Messages postés11Date d'inscriptionvendredi 2 janvier 2004StatutMembreDernière intervention22 octobre 2007
-
22 févr. 2004 à 20:09
Comment sauver une page WEB au format HTML et non le source ? >:)
joblak
Messages postés10Date d'inscriptionmercredi 26 mars 2003StatutMembreDernière intervention16 juin 2007 7 août 2003 à 08:35
Salut...
Voici ton exemple (inclus dans un prog que j'ai fait et qui fonctionne très bien) :
Private Sub brwWebBrowser_DownloadComplete()
On Error Resume Next
Me.Caption = brwWebBrowser.LocationName
Dim DateJr As String, DateMs As String, DateAn As String
DateJr = Day(Date)
DateMs = Month(Date)
DateAn = Year(Date)
Me.brwWebBrowser.ExecWB OLECMDID_SAVEAS, OLECMDEXECOPT_DONTPROMPTUSER, "Mailing\Liste" & DateAn & Format(DateMs, "00") & Format(DateJr, "00") & ".htm", App.Path
End Sub
Dans cet exemple, "brwWebBrowser" est le nom de mon navigateur web (dans le prog, bien sûr). Cette sub vient tout à la fin, après le téléchargement de la page web...
Manu_12
Messages postés11Date d'inscriptionvendredi 2 janvier 2004StatutMembreDernière intervention22 octobre 2007 22 févr. 2004 à 20:09
bonjour, je croyais avoir trovué la solution miracle depuis 2 jours que je cherche et que je me bats avec les Inet.getchunk... j'ai essayé ta formule :