Fichiers ini

Bonjour,

On peut trouver des exemples sur ce site avec la possibilite de lire dans un fichier ini, et d y ecrire ...

Mais comment fait on pour effacer une ligne ???

Merci

il faut réécrire le fichier ini avec la ligne que tu veux supprimer en moins...



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

> Bonjour,
>
> On peut trouver des exemples sur ce site avec la possibilite de lire dans un fichier ini, et d y ecrire ...
>
> Mais comment fait on pour effacer une ligne ???
>
> Merci

Aie ...

J eu espere une reponse plus facile !!!
Quelle merde ces fichiers ini !!!

En tout cas, merci pour la reponse ;-)

Lut,



Il est vrai que la réponse de LordBob ne va pas d'aider beaucoup... Voilà un code qui devrait te convenir :

'Début de la ligne à supprimer stSH = "WindowHeight" 'Charge le fichier dans une chaine Open "c:\test.ini" For Binary As 1 StINI = Input$(LOF(1), 1) Close 1 'Recherche la position du début de la ligne et du saut en fin de ligne... PosS = InStr(LCase(StINI), LCase(stSH)) PosE = InStr(PosS, LCase(StINI), Chr(13) & Chr(10)) 'Reconstruction de la chaine sans la ligne stNewINI = Left(StINI, PosS - 1) & Mid(StINI, PosE + 2) 'On écrase le fichier avec sa nouvelle forme 'Tu peux passer par un fichier tmp afin 'de tester si il n'y a pas eu d'erreur 'avnt de killer l'original... Kill "c:\test.ini" Open "c:\test.ini" For Binary As 1 Put 1, , stNewINI Close 1

Voilà, ça doit fonctioner (j'ai fais ça de tête, car je n'ai pas de VB sous la main pour le tester...) Mais ça a l'air de se tenir... Autrement il existe des fonctions API pour faire ce genre de manips, mais là de tête, je ne pourais pas te les sortir...

B@se


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

> Aie ...
>
> J eu espere une reponse plus facile !!!
> Quelle merde ces fichiers ini !!!
>
> En tout cas, merci pour la reponse ;-)

Merci, je vais tester cela ...

Pour ce qui est des API (bien pratiques), je connais la GetPrivateProfileString (qui permet de lire une variable dans un fichier ini) et la WritePrivateProfileString qui permet d ecrire une valeur dans un fichier ini ...

Mais je n ai rien trouve du style DeletePrivateProfileString ou RemovePrivateProfileString ...

Si qq un la connait, qu il me fasse signe !!!

Bon, ca marche, mais pas tout le temps, je rencontre des erreurs sur la ligne :
PosE = InStr(PosS, LCase(StINI), Chr(13) & Chr(10))
Le message est : Run time error 5. Invallid procedure call or argument.
Il semblerait que la valeur PosE soit vide ... En gros il ne trouve ni le Char(10), ni le char(13) ... y a t il un autre code pour le retour chariot ???

merci

hummm,

As tu essayé avec une constante... Il est vrai que j'ai mis Chr(13) & Chr(10) pour expliquer qu'il y a 2 caractères, mais c'est pas très propre... Fais un essai avec la constante vbCrLf ou vbNewLine...

B@se


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

> Bon, ca marche, mais pas tout le temps, je rencontre des erreurs sur la ligne :
> PosE = InStr(PosS, LCase(StINI), Chr(13) & Chr(10))
> Le message est : Run time error 5. Invallid procedure call or argument.
> Il semblerait que la valeur PosE soit vide ... En gros il ne trouve ni le Char(10), ni le char(13) ... y a t il un autre code pour le retour chariot ???
>
> merci