Ouvrir un fichier ?
KulzZer
Messages postés
18
Date d'inscription
vendredi 25 avril 2003
Statut
Membre
Dernière intervention
19 mai 2003
-
17 mai 2003 à 20:07
KulzZer Messages postés 18 Date d'inscription vendredi 25 avril 2003 Statut Membre Dernière intervention 19 mai 2003 - 17 mai 2003 à 22:03
KulzZer Messages postés 18 Date d'inscription vendredi 25 avril 2003 Statut Membre Dernière intervention 19 mai 2003 - 17 mai 2003 à 22:03
4 réponses
stevebelgium
Messages postés
180
Date d'inscription
lundi 17 mars 2003
Statut
Membre
Dernière intervention
7 juin 2003
1
17 mai 2003 à 20:32
17 mai 2003 à 20:32
qqch comme ca ...
Dim fs, f, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.Getfile("c:\z2.log")
s = UCase(f.Name) & " uses " & f.Size & " bytes."
MsgBox s, 0, "Folder Size Info"
Dim fs, f, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.Getfile("c:\z2.log")
s = UCase(f.Name) & " uses " & f.Size & " bytes."
MsgBox s, 0, "Folder Size Info"
KulzZer
Messages postés
18
Date d'inscription
vendredi 25 avril 2003
Statut
Membre
Dernière intervention
19 mai 2003
17 mai 2003 à 20:40
17 mai 2003 à 20:40
nan c'est pas tout à fait ça que je cherche à faire, j'enregistre par exemple une page html sur mon disque dur et j'aimerais pouvoir visualiser le code, pour après récupérer des informations.
stevebelgium
Messages postés
180
Date d'inscription
lundi 17 mars 2003
Statut
Membre
Dernière intervention
7 juin 2003
1
17 mai 2003 à 20:46
17 mai 2003 à 20:46
oeps , je suis encore en train d'apprende la langue francaise ...
donc qqch comme ca ?
Dim Temp As String
Temp = ""
Open "c:\filename.html" For Input As #1
Temp = Input(LOF(1), #1)
Close #1
MsgBox Temp
Text1 = Temp ' textbox
donc qqch comme ca ?
Dim Temp As String
Temp = ""
Open "c:\filename.html" For Input As #1
Temp = Input(LOF(1), #1)
Close #1
MsgBox Temp
Text1 = Temp ' textbox
KulzZer
Messages postés
18
Date d'inscription
vendredi 25 avril 2003
Statut
Membre
Dernière intervention
19 mai 2003
17 mai 2003 à 22:03
17 mai 2003 à 22:03
Merciiiiiiiiiii c parfait !!!!!!
