Remplacement mots dans un fichier et copie dans differents dossiers

Version imprimable

27/08/2018, 10h22
tilo456

Remplacement mots dans un fichier et copie dans differents dossiers

Bonjour,

je suis confronté a un petit soucis de script, je m'explique:

j'ai un fichier "test.cfg" dans le dossier "C:\Test\" qui contient:

# add given tag to inventory results
tag = toto

je voudrais créer un script qui copie ce fichiers dans 5 dossiers:
C:\Test\1\
C:\Test\2\
C:\Test\3\
.....

et qui dans le meme temps remplace le "tag = toto" en "tag = Za" "tag = Ra" "tag = Pa".....

sachant que dans chaque dossier il y a deja un fichier test.cfg mais avec le mauvais "tag="

OU

un script qui va chercher dans chaque dossiers le fichier "test.cfg"
et modifier le mots derriere "tag = " par celui désiré (ex: tag = 1 par tag = 2)

Actuellement, dans tout les fichier "test.cfg" le TAG est "tag = 1"

avez vous une idée de comment je peux faire ? la 2ieme solutions serait plus simple je pense ...

merci d'avance

Salut !

une idée !

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
@echo off
setlocal enabledelayedexpansion
 
set "$replace=2"
 
pushd "c:\test"
 
for /r  %%a in (*.cfg) do (
	(for /f "delims=" %%b in ('type "%%a"') do  (
		set "$line=%%b"
		if /i "!$line:~0,3!"=="tag" set $line=tag = %$replace%
		echo !$line!
	)
	)>%%~na_out%%~xa
	del "%%a" && move "%%~na_out%%~xa" "%%a"
)
popd

Dans la variable $replace tu mets la valeur du nouveau TAG
;)

Merci mais....

merci cela m'a bien servi...

mais maintenant je suis confronté a un autre soucis : la recuperation de l'inputbox dans un fichiers txt
dans mon VBS la boite de dialogue, on tape un texte, le fichier tag.txt se créer mais il reste vide,
impossible de faire correspondre "data1=" a la valeur de l'inputbox

voila mon script:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 InputBox("Quel TAG pour le client","Demande de TAG","REPONSE") '*** Préparation de l'environnement Set fso = WScript.CreateObject("Scripting.FileSystemObject") FichierTXT = "E:\tag.txt" '*** Création du fichier texte "c:\toto.txt" Set NewFichier = fso.CreateTextFile(FichierTXT,TRUE) '*** Ajout de données dans la variable "data1". data1 = TAG '*** Ecriture des données de la variable "data1" dans le fichier texte. NewFichier.WriteLine(data1) '*** Configuration de la variable d'environnement Set fso = WScript.CreateObject("Scripting.FileSystemObject") '*** Suppression du fichier fso.deletefile "E:\tag.txt" WScript.Quit

Salut,

Une solution :
Code:

1 2 3 4 5 6 7 8 9 @echo off if not exist #.vbs call:construct for /f "delims=" %%a in ('cscript.exe /nologo #.vbs') do set $tag=%%a echo le TAG =^> %$tag% del #.vbs exit/b :construct (echo tag = InputBox("Enter the TAG"^) & echo wscript.echo(tag^))>#.vbs
Juste une question pourquoi veux-tu mettre le tag dans un fichier TXT.

Tu peux tout faire en une routine !

Récuperer le TAG et changer tout les fichiers .CFG

;)

29/08/2018, 14h16
tilo456

en gros c'est pour FUSION INVENTORY version portable.
dans le dossier fusion inventory, il y a un .cmd qui s'execute pour faire l'inventaire,
ce .cmd s'appuie sur un fichier agent.cfg, dans lequel il y a un tag a changer en fonction du client auquel je fait l'inventaire.

je me suis inspiré de ton 1er scirpts pour en faire un qui ne modifie que un dossier (sur lequel s'appuie FUSION) et le tag et entrer manuellement a chaque fois qu'on lance mon scripts.
MAIS C'EST MOCHE !

j'aurais voulu une INPUTBOX dans laquelle on renseigne le TAG et mon script le recupere pour ensuite faire ses modif dans le .cfg
29/08/2018, 14h40
tilo456
cest bon !!!!!
super ton script c'est EXACTEMENT ce qu'il me fallait !!!!!
tout fonctionne a merveille !!!!!

MILLE MERCI !!!!!!

EDIT: juste un truc quand on clic sur ANNULER j'aimerais que cela quitte le scripts en gros que cela fasse un goto :fin tu as une idée ?

EDIT 2 (FERME: j'ai trouvé): j'aimerais aussi que le tag saisie exemple "toto" soit comparer a une liste tag contenue dans "liste.cmd"
si c'est trouvé, dire OK
sinon : est normal ? et donné deux choix "quitter" et goto...
SOLUTION:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 :compare findstr "%$tag%" liste-tag.cmd cls if %errorlevel%==0 goto :Msg echo TAG non trouve echo. echo. goto :nontrouve :Msg echo TAG Ok ! echo. echo. goto :trouve

fa~It de cette manière ça sera plus simple :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
:compare
cls
findstr "%$tag%" liste-tag.cmd || goto:nontrouve
echo TAG Ok !
::Ici le reste du code
 
exit/b
 
:nontrouve
echo TAG non trouve
::Ici le reste du code
 
exit/b

30/08/2018, 08h38
tilo456

c'est vrai que c'est mieux.

et pour le bouton Annuler tu as une idée ?

Salut,

comme ça :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
@echo off
if not exist #.vbs call:construct
for /f "delims=" %%a in ('cscript.exe /nologo #.vbs') do set $tag=%%a
if "%$tag%"=="" (goto:error) else (echo le TAG =^> %$tag%)
del #.vbs

exit/b
:construct
(echo tag = InputBox("Enter the TAG"^) & echo wscript.echo(tag^))>#.vbs
exit/b

:error
Echo operation annulee

;)

05/09/2018, 19h14
tilo456
Code:

1 2 3 4 5 6 7 :construct timeout 1 (echo tag = InputBox("TAG du client" , "INVENTAIRE"^) & echo wscript.echo(tag^))>TMP\#.vbs echo. echo. pause goto :compare
Quand on arrive a cette partie pour la 1ere fois, le script passe directement au :COMPARE, il faut le relancer pour qu'il la prenne en compte, tu ne saurais pas pourquoi ?
10/09/2018, 19h11
tilo456

TROUVE !

il faut laisser le #.vbs et non pas le faire suppr