Code pour débutant .vbs écriture de fichier
Soyez le premier à donner votre avis sur cette source.
Snippet vu 11 059 fois - Téléchargée 30 fois
Contenu du snippet
ce code sadresse au débutant pour comprendre comment sa marche...
bah c pas gros mais me too je suis débutant
Source / Exemple :
dim fu
dim ecrire
fu = inputbox ("nomme le fichier que tu veux créer!")
Set FSys = CreateObject("Scripting.FileSystemObject")
Set MonFic = FSys.CreateTextFile("c:\"&fu&".txt")
With MonFic
ecrire = inputbox ("quesque tu veux ecrire dans: "&fu&".txt")
.writeLine ""&ecrire&""
End With
msgbox "écriture réussite dans le fichier: ""C:\"&fu&".txt"
Conclusion :
bah c pas gros mais me too je suis débutant
A voir également
- Code pour débutant .vbs écriture de fichier
- Visual Basic / VB.NET : Utilisation de xml avec vb lecture ecriture de fichiers xml - CodeS SourceS - Guide
- Visual Basic / VB.NET : Tutorial fichier entree sortie mode acces, cekifosavoir koi ;p - CodeS Sourc - Guide
- Visual Basic / VB.NET : Decompresser fichier rar avec unrar.dll - b3 - CodeS SourceS - Guide
- Visual Basic / VB.NET : Les fichier *.ini sont limités!!! - CodeS SourceS - Guide
- Visual Basic / VB.NET : Lecture fichier texte avec objet fso (file system object) - CodeS SourceS - Guide
moi je suis a la recherche d'infos pour la gestion de fichiers en Vb pur
j'ai de "gros soucis" avec ce type de fonctions.
par exemple, j'ai voulu faire une sorte de checksum pour comparer de fichiers binaires de taille identique et d'environ 20Mo (la methode n'est pas la + sure, mais vu la taille des fichiers, y'a peu de chance d'avoir le meme checksum) :
dim i as byte
dim total as long
open fic for binary access read lock read write as #1
total=0
do while not eof(1)
input #1,i
total = total + i
loop
label1.caption = fic & " : " & total
la methode est simple, pas forcemment sure, mais ca peux toujours aider ...
le probleme : des fois, ca affiche toujours total = 0
des fois, ca me dis que je depasse la fin du fichier alors que je protege avec le eof(1) ...
si vous avez des idees ...
surtout s'est bien d'avoir fais le code le plus simple possible sa me permet de tous comprendre
Donc l'intégrer dans du VB permet à un autre utilisateur de tapper du code sans avoir VB (ou de générer un code "automatique" qui varie selon les actions que l'on fait).
Pour le deuxieme commentaire juste pour te rapeller utiliser du vbs est bcq plus pratique (tu peux faire des scripts juste avec un notepad!)
2k cest mon premier script ici...
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.