[R] Lancer une appli depuis le systray & modif d'un .ini

[mikell]

J'ai désinstallé Cobian mais si je me rappelle bien, il y a 2 ou 3 petits fichiers de config dans un sous-dossier du répertoire d'installation
Faudrait nous poster ces fichiers

[Loulou63]

Je ne cherche en rien à vous énerver ou de faire mon script à ma place mais seulement d'avoir les bonnes fonctions à utiliser.

Mais si me répondre vous ennuie alors ne regarder pas mon sujet!!

Pour le reste voici le fichier de configuration Cobian :

► Afficher le texte

Main list=C:\Program Files\Cobian Backup 10\DB\MainList.lst
Language=FRANCAIS
Log level=2
Real time log=true
Divide log=true
Pipe all files=true
Close instances=true
Warn multiple instances=true
Protect main window=false
Protect user interface=false
User interface password=PD+FTBSpR5p+P/BMY6kwmnY/m0wWqUSaAT+PTA2pQJp3P/NMGKlZmn4/jkxkqTKaaj+PTBSpRppyP/BMY6lDmgE/g0xhqTCaBD/LTGKpBpomP8dMVakRmnY/tkwgqXSY
Clear password cache=true
Temporary directory=c:\Temp\
Autobackup when starting=false
Check for updates=true
Mail log=true
Mail schedule=0
Mail as attachment=true
Mail if errors only=true
Delete log if mailed=true
Mailing time=0011111111100100000000000000000000000000000000000000000000000000
Update proxy="Proxy type=0","Proxy port=1080","Proxy host=","Proxy ID=","Proxy logon=true","Proxy password=PD+FTBSpR5p+P/BMY6kwmnY/m0wWqUSaAT+PTA2pQJp3P/NMGKlZmn4/jkxkqTKaaj+PTBSpRppyP/BMY6lDmgE/g0xhqTCaBD/LTCCpdJ4="
SMTP sender name=Sauvegarde Cobian SITE [%USERNAME]
SMTP sender address=cobian@*****.fr
SMTP server=smtp.***.***.Fr
SMTP port=25
SMTP subject=Sauvegarde de [%USERNAME](%DATENOTIME)
SMTP recipients=tous.informatique@****.Fr
SMTP unicode headers=true
SMTP unicode body=true
SMTP logon=false
SMTP user name=
SMTP password=PD+FTBSpR5p+P/BMY6kwmnY/m0wWqUSaAT+PTA2pQJp3P/NMGKlZmn4/jkxkqTKaaj+PTBSpRppyP/BMY6lDmgE/g0xhqTCaBD/LTCCpdJ4=
SMTP pipeline=false
SMTP use Ehlo=true
SMTP Helo name=
SMTP proxy="Proxy type=0","Proxy port=1080","Proxy host=","Proxy ID=","Proxy logon=true","Proxy password=PD+FTBSpR5p+P/BMY6kwmnY/m0wWqUSaAT+PTA2pQJp3P/NMGKlZmn4/jkxkqTKaaj+PTBSpRppyP/BMY6lDmgE/g0xhqTCaBD/LTCCpdJ4="
SMTP SSL="Use TLS=0","SSL method=3","SSL authentication=4","Data protection=0","SSL mode=3","Pass through=false","Verify depth=0",Peer=false,"Fail if no peer=false","Client once=false",CCC=false,"Certificate file=","Cipher list=","Root certificate=","Key file=","Verify directories="
Use nagle=true
Connection timeout=20000
Read timeout=60000
Date-time format=yyyy-mm-dd hh;nn;ss
Calculate progress exactly=true
Execute events in the user interface=true
IPC timeout=180000
VSC timeout=300000
FTP speed limit=false
FTP speed=0
ASCII extensions=
Abort if Volume Shadow Copy fails=false
Do not allow spaces=false
Always use task names=true
Check archive=true
Uncompressed extensions=.mp3,.mpeg,.zip,.rar,.arj,.jpg,.jpeg,.7z,.sqx
Check CRC uncompressed=false
Zip level=9
Advanced naming=true
Zip OEM=true
Zip unicode=false
Zip 64=1
Zip encryption method=0
7zip compression type=0
7zip compression level=3
Create solid 7zip archives=false
Include the drive letter in 7zip archive=false
Encrypt file names in 7zip archives=false
Copy NTFS permissions=false
Copy file attributes=true
Copy file timestamp=true
Delete empty directories=false
Include junction points=true
Save empty history items=false
First backup always full=true
First backup parked=true
Run missed backups=false
Run the engine with low priority=false
Use remote manager=false
Manager address=127.0.0.1
Manager port=16010
Name of the managed client=NOMPC
Manager password=PD+FTBSpR5p+P/BMY6kwmnY/m0wWqUSaAT+PTA2pQJp3P/NMGKlZmn4/jkxkqTKaaj+PTBSpRppyP/BMY6lDmgE/g0xhqTCaBD/LTCCpdJ4=
Use safe mirror=true
Safe mirror folder=C:\Documents and Settings\****\Local Settings\Application Data\Safe mirror
Prevent system from entering sleep=true
Date time format on log=yyyy-mm-dd hh:nn
Date format of the log file name=yyyy-mm-dd
New version is not error=false
Retry FTP=true
Unsafe copy operation=false
Unsafe extensions=.ost,.pst,.oab
Poll interval=5000
Refused poll interval=60000
Missed backups interval=180

Les éléments de couleurs sont à modifier.

En VB, on créé un variable qui va ouvrir le documents puis on va recherche le mot puis le modifier.
Mais selon le type de fichier ca ne marche pas forcément.

En autoit, je ne sais pas.

A moins d'ouvrir le fichier et d'automatiser la fonction remplacer? ou existe-t'il une autre solution?
Je ne demande pas de me faire le script mais me dire les bonnes fonctions à utiliser.
J'ai trouvé la fonction StringReplace mais comment puis-je dire à mon script de relire les fichiers pour modifier le reste?

[mikell]

Je ne demande pas de me faire le script mais me dire les bonnes fonctions à utiliser

#Include <File.au3>
_ReplaceStringInFile() pour les lignes concernées

PS: vous devriez être cool avec le patron il est sanguin (d'autant que là admettez qu'il n'a pas tout à fait tort)

[Loulou63]

Je pense être respectueux des autres. Et je n'apprécie pas qu'on m'envoie chier pour un oui ou pour un nom.

Je respecte le travail de chacun et qu'on respecte mes demandes.

Merci en tout cas pour ta réponse. Je vais regarder ta solution. Cette commande va tourner jusqu'à ce qu'une modification se fasse. Je vais trouver un truc pour que le script effectue les modifications en 1 seul fois. Peut-être un while avec le nombre modifications. Je vous tiendrai au courant.

[PandiPanda]

Pourquoi vous n'utilisé simplement pas le FileRead() et le FileWrite() ?
il vous suffirai de lire le contenu du fichier, la stockée dans une variable, effectuer les actions que vous voulez, et vous réecrivez le fichier?

le problème avec _ReplaceStringInFile() est qu'il ouvre et ferme le fichier pour chaque "remplacement"
enfin je pense

[Loulou63]

Je restais sur mon problème de modifications de fichiers par vbs que je me suis dit que la fonction FileRead d'AutoIT n'allait pas marcher.
Mais la fonction FileRead arrive à lire les 2 fichiers de config en entier.
Savez-vous si on peux effectuer plusieurs modifications en ouvrant qu'une fois le fichier. Si vous ne le savez pas, ce n'est pas un souci. Je testerai et je vous ferai un retour.

[PandiPanda]

En utilisant le FileOpen() je pense que vous n'ouvrez qu'une seule fois le fichier pour lecture/écriture
mais pas sûr

pour les remplacements vous avez tout une gamme de choix

[mikell]

mais pas sûr

Prudent le panda mais de fait la prudence est de rigueur...

When reading and writing via the same file handle, the FileSetPos() function must be used to update the current file position.
......
Using FileSetPos() it is possible to both read and write to the same file. When attempting to read and write to the same file, always call FileFlush() between each write and read operation.
Moving the pointer to the middle of the data can be used to overwrite data.

Avec _ReplaceStringInFile() c'est la fonction qui fait les manoeuvres délicates à ta place (moins de risque de se planter)

[Tlem]

Je pense être respectueux des autres. Et je n'apprécie pas qu'on m'envoie chier pour un oui ou pour un nom.

Si vous l’étiez, vous m’auriez écouté.
Je vous ai déjà fait 3 remarques gentillettes, donc au bout d'un moment il est normal que je soit plus clair dans mes propos !
Et je ne pense pas vous avoir envoyé chier à un quelconque moment. C'est jusque que pour que l'on puisse vous aider, c'est à vous de faire ce qu'il faut pour nous donner les éléments et non à nous de pleurer des indices sur ce que vous voulez faire.

Je respecte le travail de chacun et qu'on respecte mes demandes.

Ce forum est le travail de plusieurs personnes.
En dupliquant les messages des autres dans vos réponses, vous rendez le sujet moins clair et plus dur à suivre, sans compter la place occupée inutilement dans la base de donnée.

Sinon, pour en revenir à vos moutons. Les solutions qui vous ont été apportées me semble une bonne ébauche, mais vous allez vite vous retrouver confronté à d'autres problèmes.

Je vous propose quelque chose de plus simple.
1 - Vous dupliquez le fichier de configuration (pour pouvoir travailler tranquillement dessus, mais ce n'est pas obligatoire).

2 - Vous rajoutez une ligne en début de fichier ([Config]). Hé oui, votre fichier de configuration, ressemble étrangement à un fichier .ini, sauf qu'il n'à pas de section. Donc créez là, comme cela vous pourrez utiliser les fonctions des fichiers .ini.

3 - Modifiez tranquillement vos options avec IniWrite().

4 - Supprimez la première ligne, puis remplacez le fichier original par celui modifié (si vous avez utilisé une copie du fichier original).

5 - Hé voilà, c'est aussi simple que ça.


Edit : Voilà ce que cela donne en code AutoIt :

► Afficher le texte

Code : Tout sélectionner

Global $ConfigFile = "Config.txt"  ; Le chemin et le nom du fichier de configuration

; Lecture du fichier de configuration dans une chaine
$sFile = FileRead($ConfigFile)
If @error Then
    MsgBox(16, "Erreur", "Erreur de lecture du fichier de configuration")
    Exit
EndIf

; Ecriture du fichier temporaire .ini
FileWrite($ConfigFile & ".ini", "[Config]" & @CRLF & $sFile)
If @error Then
    MsgBox(16, "Erreur", "Erreur d'écriture du fichier temporaire")
    Exit
EndIf

; Modification des options
IniWrite($ConfigFile & ".ini", "Config", "SMTP sender name", "Sauvegarde Cobian " & @LogonDomain & "[%USERNAME]")
IniWrite($ConfigFile & ".ini", "Config", "SMTP server", "smtp.toto.titi.Fr")
IniWrite($ConfigFile & ".ini", "Config", "Name of the managed client", @ComputerName)
IniWrite($ConfigFile & ".ini", "Config", "Safe mirror folder", "C:\Documents and Settings\" & @UserName & "\Local Settings\Application Data\Safe mirror")

; Lecture du fichier .ini modifié
$sFile = FileRead($ConfigFile & ".ini")
; Suppression de la ligne de section [Config]
$sFile = StringReplace($sFile, "[Config]" & @CRLF, "")

; Si la suppression du fichier de configuration en cours est ok
If FileDelete($ConfigFile) Then
    ; alors on ecrit le nouveau fichier, puis on supprime le fichier .ini temporaire
    FileWrite($ConfigFile, $sFile)
    FileDelete($ConfigFile & ".ini")
Else
    ; Sinon erreur
    MsgBox(16, "Erreur", "Le fichier de configuration ne peut être modifié")
    Exit
EndIf

[mikell]

Ha oué oué, pas con l'histoire du fichier ini... didiou j'lavais pô vu
Un coup de IniReadSection,
Une fonction String dans une boucle For pour reconnaître la ligne,
Un coup de IniWrite pour la modifier...
Limpide

[Tlem]

Et même plus simple que vous pensez (voyez le code).
Cela évitera de fabriquer son propre Wrapper ...

[Loulou63]

Il est vrai que je peut être tête en l'air mais ça n'a pas pour but d'agacer.
Voila pour cette parenthèse qui est close pour moi.

Merci pour vos solutions qui me ravie. Je ne savez pas qu'une fonction existait spécialement pour un type de fichier précis. C'est parfait. Je vais en faire de même pour le fichier .lst en le transformant en .ini puis en .lst à la fin ca va me faire gagner du temps.

J'ai mis de coté le tutoriel car pour de choses à faire coté professionnel. Mais je m'y remettrai dès que cette charge sera terminé. Et cette fois-ci, j'aiderai les autres

[mikell]

Et même plus simple que vous pensez (voyez le code).

Hé ben, reprendre le boulot me réussit pas
J'avais (aussi) zappé le IniWrite appliqué d'emblée...

Je ne demande pas de me faire le script ...

Tlem s'est laissé aller... très joli script