Jump to content

Visual basic


Recommended Posts

Salut tout le monde

Bon je vais deja posser le contexte pour que vous comprenez ce que je veux.

Je suis joueur de counter strike. Ne trouvant pas de script pour les binds qui me convienne j ai decidé d'en créer un.

J ai besoin de créer un excutif qui permette la saisie de certaine données et qui les ecrive dans un fichier texte.

Donc voila

Pseudo1[Zone de texte]

Pseudo2[Zone de texte]

Pseudo3[Zone de texte]

Pseudo4[Zone de texte]

bouton radio oui ou non

Donc j aurais besoin que quand la personne clique sur enregistre

le programme m'ecrive dans un fichier :

pseudo1.cfg name "ce qui est dans la zone de texte"

pseudo2.cfg name "ce qui est dans la zone de texte"

pseudo3.cfg name "ce qui est dans la zone de texte"

pseudo4.cfg name "ce qui est dans la zone de texte"

Puis pour le bonton radio qu'il me vide le fichier var.cfg

si "oui" il ecrit exec nomdufichier.cfg dans var.cfg

si "non" il ecrit : exec nomdufichier2.cfg dans var.cfg

Merci d avance pour votre aide

Une idée que j ai eu prendant la nuit ce n'est pas possible de faire ça en htmj sinon

Link to comment
Share on other sites

Pour l'ecriture dans un fichier j ai trouver mais le soucis c'est quand je relance l exe et que je resaisie des choses au lieu de me les ecraser il ecrit a la suite alors je voudrai soit qu il supprimer le fichier soit qu qu il remplace comment fais t on

Link to comment
Share on other sites

Pour l'ecriture dans un fichier j ai trouver mais le soucis c'est quand je relance l exe et que je resaisie des choses au lieu de me les ecraser il ecrit a la suite alors je voudrai soit qu il supprimer le fichier soit qu qu il remplace comment fais t on

soit tu fais un test d'existence avant d'ecrire ton fichier :

si exist(Mon_fichier)  alors  supprime(Mon_fichier)

soit tu modifies le mode d'écriture

(append = ajouter à la fin)

pour le code.... je vais essayer de te retrouver ça

Link to comment
Share on other sites

Voici le code :

Existence d'un fichier :

If Dir("c:\Erreurs.tmp", vbHidden) <> "" Then
   'le fichier existe (vbHidden permet de le retrouver même s'il est caché)
End If

Supprimer un fichier :

Kill "c:\Erreurs.tmp"

Pour écrire dans un fichier :

OPEN "nom du fichier à modifier" FOR OUTPUT AS #X  'output supprimera le fichier et le creera à nouveau pour qu’il soit vide 
OPEN " nom du fichier à modifier " FOR APPEND AS #X   'append reprendra à la fin de ce fichier.
X = numéro du fichier

voilou

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...