begin process at 2012 02 16 15:19:30
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Visual Basic & VB.NET

 > 

Archives Visual Basic

 > 

VBA

 > 

URGENT--Comment faire en vbs...--URGENT


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

URGENT--Comment faire en vbs...--URGENT

jeudi 22 mai 2003 à 12:10:47 | URGENT--Comment faire en vbs...--URGENT

Lexounet

Comment faire pour ecrire du texte au debut d'un fichier texte ou a la fin ( peu m importe en fait ) sans effacer ce qui est deja ecrit dans le fichier ?!!!!!!!

Please c urgent .

Merci pour les reponses :)
jeudi 22 mai 2003 à 12:18:06 | Re : URGENT--Comment faire en vbs...--URGENT

Renfield

Administrateur CodeS-SourceS
tu l'ouvres en mode Append : ecriture a la fin du fichier...
-----------------------------------------------------------------------
By Renfield

thomas_reynald@msn.com

Aucune touche n'a été bléssée lors de la saisie de ce texte..........


-------------------------------
Réponse au message :
-------------------------------

> Comment faire pour ecrire du texte au debut d'un fichier texte ou a la fin ( peu m importe en fait ) sans effacer ce qui est deja ecrit dans le fichier ?!!!!!!!
>
> Please c urgent .
>
> Merci pour les reponses :)
>
jeudi 22 mai 2003 à 13:43:11 | Re : URGENT--Comment faire en vbs...--URGENT

Lexounet

const ForAppending = 8
...
machin.writeline "blalalala"

et qd je relance le truc ca va ecrire blalala a la suite ?! c biiiien ca ?!


hin hin!


-------------------------------
Réponse au message :
-------------------------------

> tu l'ouvres en mode Append : ecriture a la fin du fichier...
> -----------------------------------------------------------------------
> By Renfield
>
> thomas_reynald@msn.com
>
> Aucune touche n'a été bléssée lors de la saisie de ce texte..........
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > Comment faire pour ecrire du texte au debut d'un fichier texte ou a la fin ( peu m importe en fait ) sans effacer ce qui est deja ecrit dans le fichier ?!!!!!!!
> >
> > Please c urgent .
> >
> > Merci pour les reponses :)
> >
>
jeudi 22 mai 2003 à 13:54:23 | Re : URGENT--Comment faire en vbs...--URGENT

BasicInstinct

Membre Club
oui c ca :)


BasicInstinct


-------------------------------
Réponse au message :
-------------------------------

> const ForAppending = 8
> ...
> machin.writeline "blalalala"
>
> et qd je relance le truc ca va ecrire blalala a la suite ?! c biiiien ca ?!
>
>
> hin hin!
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > tu l'ouvres en mode Append : ecriture a la fin du fichier...
> > -----------------------------------------------------------------------
> > By Renfield
> >
> > thomas_reynald@msn.com
> >
> > Aucune touche n'a été bléssée lors de la saisie de ce texte..........
> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > Comment faire pour ecrire du texte au debut d'un fichier texte ou a la fin ( peu m importe en fait ) sans effacer ce qui est deja ecrit dans le fichier ?!!!!!!!
> > >
> > > Please c urgent .
> > >
> > > Merci pour les reponses :)
> > >
> >
>
jeudi 22 mai 2003 à 14:01:52 | Re : URGENT--Comment faire en vbs...--URGENT

Lexounet

ca a l air tout con mais ca marche pas :>
voila mon code:

'ecriture dans un fichier . A la suite si possible
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Set FSys = CreateObject("Scripting.FileSystemObject")
set Monfic = Fsys.OpentextFile("C:\WINNT\Profiles\stagiaire\Bureau\Testeuh.txt", ForWriting, true )
Monfic.writeline "=============================="
MonFic.writeline date & " - " & time
MonFic.writeline "ceci est un testtttttttt!"
MonFic.close


hin hin!


-------------------------------
Réponse au message :
-------------------------------

> oui c ca :)
>
>
> BasicInstinct
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > const ForAppending = 8
> > ...
> > machin.writeline "blalalala"
> >
> > et qd je relance le truc ca va ecrire blalala a la suite ?! c biiiien ca ?!
> >
> >
> > hin hin!
> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > tu l'ouvres en mode Append : ecriture a la fin du fichier...
> > > -----------------------------------------------------------------------
> > > By Renfield
> > >
> > > thomas_reynald@msn.com
> > >
> > > Aucune touche n'a été bléssée lors de la saisie de ce texte..........
> > >
> > >
> > > -------------------------------
> > > Réponse au message :
> > > -------------------------------
> > >
> > > > Comment faire pour ecrire du texte au debut d'un fichier texte ou a la fin ( peu m importe en fait ) sans effacer ce qui est deja ecrit dans le fichier ?!!!!!!!
> > > >
> > > > Please c urgent .
> > > >
> > > > Merci pour les reponses :)
> > > >
> > >
> >
>
jeudi 22 mai 2003 à 14:08:38 | Re : URGENT--Comment faire en vbs...--URGENT

BasicInstinct

Membre Club

dim numfile as integer
numfile=freefile
open "c:\text.txt" for append as #numFile
write #numfile, "Ceci est un test"
close
BasicInstinct


-------------------------------
Réponse au message :
-------------------------------

> ca a l air tout con mais ca marche pas :>
> voila mon code:
>
> 'ecriture dans un fichier . A la suite si possible
> Const ForReading = 1, ForWriting = 2, ForAppending = 8
> Set FSys = CreateObject("Scripting.FileSystemObject")
> set Monfic = Fsys.OpentextFile("C:\WINNT\Profiles\stagiaire\Bureau\Testeuh.txt", ForWriting, true )
> Monfic.writeline "=============================="
> MonFic.writeline date & " - " & time
> MonFic.writeline "ceci est un testtttttttt!"
> MonFic.close
>
>
> hin hin!
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > oui c ca :)
> >
> >
> > BasicInstinct
> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > const ForAppending = 8
> > > ...
> > > machin.writeline "blalalala"
> > >
> > > et qd je relance le truc ca va ecrire blalala a la suite ?! c biiiien ca ?!
> > >
> > >
> > > hin hin!
> > >
> > >
> > > -------------------------------
> > > Réponse au message :
> > > -------------------------------
> > >
> > > > tu l'ouvres en mode Append : ecriture a la fin du fichier...
> > > > -----------------------------------------------------------------------
> > > > By Renfield
> > > >
> > > > thomas_reynald@msn.com
> > > >
> > > > Aucune touche n'a été bléssée lors de la saisie de ce texte..........
> > > >
> > > >
> > > > -------------------------------
> > > > Réponse au message :
> > > > -------------------------------
> > > >
> > > > > Comment faire pour ecrire du texte au debut d'un fichier texte ou a la fin ( peu m importe en fait ) sans effacer ce qui est deja ecrit dans le fichier ?!!!!!!!
> > > > >
> > > > > Please c urgent .
> > > > >
> > > > > Merci pour les reponses :)
> > > > >
> > > >
> > >
> >
>
jeudi 22 mai 2003 à 14:11:27 | Re : URGENT--Comment faire en vbs...--URGENT

Lexounet

c bon g trouver fallait juste remplacer ca :
set Monfic = Fsys.OpentextFile("C:\WINNT\Profiles\stagiaire\Bureau\Testeuh.txt", ForWriting, true )

par :
set Monfic = Fsys.OpentextFile("C:\WINNT\Profiles\stagiaire\Bureau\Testeuh.txt", ForAppending, true )
hin hin!


-------------------------------
Réponse au message :
-------------------------------

> ca a l air tout con mais ca marche pas :>
> voila mon code:
>
> 'ecriture dans un fichier . A la suite si possible
> Const ForReading = 1, ForWriting = 2, ForAppending = 8
> Set FSys = CreateObject("Scripting.FileSystemObject")
> set Monfic = Fsys.OpentextFile("C:\WINNT\Profiles\stagiaire\Bureau\Testeuh.txt", ForWriting, true )
> Monfic.writeline "=============================="
> MonFic.writeline date & " - " & time
> MonFic.writeline "ceci est un testtttttttt!"
> MonFic.close
>
>
> hin hin!
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > oui c ca :)
> >
> >
> > BasicInstinct
> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > const ForAppending = 8
> > > ...
> > > machin.writeline "blalalala"
> > >
> > > et qd je relance le truc ca va ecrire blalala a la suite ?! c biiiien ca ?!
> > >
> > >
> > > hin hin!
> > >
> > >
> > > -------------------------------
> > > Réponse au message :
> > > -------------------------------
> > >
> > > > tu l'ouvres en mode Append : ecriture a la fin du fichier...
> > > > -----------------------------------------------------------------------
> > > > By Renfield
> > > >
> > > > thomas_reynald@msn.com
> > > >
> > > > Aucune touche n'a été bléssée lors de la saisie de ce texte..........
> > > >
> > > >
> > > > -------------------------------
> > > > Réponse au message :
> > > > -------------------------------
> > > >
> > > > > Comment faire pour ecrire du texte au debut d'un fichier texte ou a la fin ( peu m importe en fait ) sans effacer ce qui est deja ecrit dans le fichier ?!!!!!!!
> > > > >
> > > > > Please c urgent .
> > > > >
> > > > > Merci pour les reponses :)
> > > > >
> > > >
> > >
> >
>
vendredi 18 juin 2004 à 17:08:18 | Re : URGENT--Comment faire en vbs...--URGENT

Crocodile306


'Pour écrire dans un fichier (à la suite)
ecrire = InputBox ("Ce que tu veux écrire.","Test","")
Const ForAppending = 8
Set FSys = CreateObject("Scripting.FileSystemObject")
Set MonFic = FSys.OpenTextFile("test.txt", ForAppending, true)
MonFic.writeLine "&ecrire&"


Ce code là marche très bien je l'ai même tester.
vendredi 18 juin 2004 à 21:33:48 | Re : URGENT--Comment faire en vbs...--URGENT

Crocodile306

J'aimerais savoir comment faire pour écrire en haut du fichier txt sans effacer le reste.


Cette discussion est classée dans : fichier, vbs, texte, urgent


Répondre à ce message

Sujets en rapport avec ce message

VBS tableau de stat [ par sweetyrahma ] bonjour svp c urgent jai besoin de vos aide , je travaille un project en VBS , il s'agit de traiter un fichier log qui contient des évenements(erreur [bar]Facture VBS urgent [ par toudouuu ] Boujour,(désolé si je n'est pas poster au bonne endroit :$) j'ai 2 question la 1er j'ai (comme un idiot) cliquer sur un fichier qui circule sur le net Très urgent (traitementde fichier texte) [ par Ataeallah ] Lorsque j'ouvre le fichier txt et je le stock dans une chaine de caractère je perd tout les virgules existant dans mon fichier texte. Urgent - Publipostage Word & fichier texte [ par Hunter ] J'ai réaliser une application VB6 pour effectuer dur publipostage avec Word et un fichier texte.Le problème c'est que sur ma platform de developpement recherche texte dans fichier word (urgent) [ par vdu78 ] Je recherche une fonction qui me permette de rechercher un texte dans un fichier word, sans ouvrir le fichier. Je connais juste le chemin du fichier s Fichier Texte (urgent) [ par richenou ] Bonjour,je suis en interro alors vite merci :))j'ai une texte box avec un texte dedans et j'aimerai enlever tout les espaces dedans et les afficher da URGENT:Ecrire Dans un fichier texte et enregistrer sou le nom de ma variable [ par STCManiak ] J'essais d'explique au mieux:je fais toute une série d'opérations durs des chaines de caractères.Une fois que tout est bon , j'aimerais enregistrer ce Sauver des variables en VBS [ par HpZouil ] Hp ZouilJe cherche a sauver des variables dans un fichier texte.J'ai une variable login et une password. Et j'aimerais aussi pouvoir les rapeller a pa Sauver des variables en VBS [ par HpZouil ] Hp ZouilJe cherche a sauver des variables dans un fichier texte.J'ai une variable login et une password. Et j'aimerais aussi pouvoir les rapeller a pa Traitement dans un fichier texte(urgent) [ par limoun ] Salut tout le monde voici mon prob FICHIER1001;12/12/2004;12:00:00002;12/12/2004;13:00:00001;12/12/2004;12:10:00002;12/12/2004;13:10:00FICHIER212/12/2


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,484 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales