Problème initialisation de variable

Version imprimable

FSO / Lecture ligne à ligne d'un fichier et erreur VBscript

Bonjour,

Je tente de lite via FSO un fichier ligne à ligne afin de le modifier par la suite.

Cependant ma lecture echoue des le départ et le message suivant s'affiche :

Citation:

Erreur d'exécution Microsoft VBScript erreur '800a003e'

L'entrée dépasse la fin du fichier

/images/Ressources_Portail/Mail Intranet/Mail_tendance_MAJ2.asp, ligne 18

Et mon fichier Mail_tendance_MAJ2.asp comporte le code suivant :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 <% Dim FSO Dim Lecture Dim Ecriture 'Modification du fichier Mail_tendance.htm lignes 18, 19, 20 Set FSO = Server.CreateObject("Scripting.FileSystemObject") Fnm = Server.MapPath("Mail_tendance.htm") Debut = "" Fin ="" 'Ouverture du fichier en lecture set Lecture = FSO.OpenTextFile(Fnm,1,false) 'On garde les lignes 1 à 27 for i =1 to 27 Debut = Debut + Lecture.readLine + Vbcr next 'on passe les lignes 28, 29 et 30 Lecture.skipLine Lecture.skipLine Lecture.skipLine 'On charge enfin en mémoire le reste du fichier. While not Lecture.atEndOfStream Fin = Fin + Lecture.readLine + Vbcr Wend Lecture.close Set Lecture = Nothing
Donc la ligne posant probleme est :

Code:

Debut = Debut + Lecture.readLine + Vbcr

Le fichier que je cherche à modifier fait environ 60 lignes donc la fin du fichier n'est normalement pas atteinte par mon Readline...

Bref je patauge un peu, c'est pourquoi je demande mon aide pour resoudre mon probleme.

Merci beaucoup!:king:

Citation:

Envoyé par guignol71

Donc la ligne posant probleme est :

Code:

Debut = Debut + Lecture.readLine + Vbcr

T'as quoi si tu mets l'instructions
Debut = Debut + Lecture.readLine + Vbcr
hors de la boucle For

Tu fais afficher le résultat
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 <% Dim FSO Dim Lecture Dim Ecriture 'Modification du fichier Mail_tendance.htm lignes 18, 19, 20 Set FSO = Server.CreateObject("Scripting.FileSystemObject") Fnm = Server.MapPath("Mail_tendance.htm") Debut = "" Fin ="" 'Ouverture du fichier en lecture set Lecture = FSO.OpenTextFile(Fnm,1,false) Debut = Debut + Lecture.readLine + Vbcr response.write Debut
Personnelement, je monte mes codes morceau par morceau en faisant afficher le résultat à chaque étape pour etre sur que ça part pas en vrille

:P

01/04/2008, 15h31
benoitL39

tout d'abord merci pour ton aide.

J'ai isolé le problème : en fait ma variable Début s'initialise bien lors de la premiere exécution du script. Mais lorsque l'on rapelle le script une seconde fois, elle n'est pas réinitialisé.

Le debut = "" n'est pas pris en compte.

Ma question est donc, comment réiitialisé ma variable à chaque appelle de script ?

J'ai essayé de mettre "dim Debut" mais cela ne fonctionne pas. J'ai meme essayé de mettre Debut="" a la fin de mon script mais rien ne fonctionne.

Please help me car la je sature...

Merci pour votre aide :king:

Problème initialisation de variable

bonjour,

je rencontre un problème avec l'initialisation d'une variable en début de script.
en fait dès que je relance mon script, elle garde son ancienne valeur et la remise à blanc ne se fait pas.

Voilà un extrait de mon code et la variable fautive est la variable Debut :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 <% Dim FSO Dim Lecture 'Modification du fichier Mail_tendance.htm lignes 18, 19, 20 Set FSO = Server.CreateObject("Scripting.FileSystemObject") Fnm = Server.MapPath("Mail_tendance.htm") Debut = "" 'Ouverture du fichier en lecture set Lecture = FSO.OpenTextFile(Fnm,1,false) 'On garde les lignes 1 à 27 Debut = Lecture.readLine + Vbcr for i =2 to 27 Debut = Debut + Lecture.readLine + Vbcr next Lecture.close Set Lecture = Nothing
A la relance du script, debut garde sa valeur égale aux 27 lignes du fichier que j'ai lu.

Avez vous un indice pour m'expliquer pourquoi ma remise à blanc n'est pas prise en compte ?? :king:

01/04/2008, 18h05
TekP@f

Salut,

Essaie d'ajouter un Dim Debut au début de ton script.
01/04/2008, 23h10
kaiser59

Citation:

Envoyé par TekP@f

Salut,

Essaie d'ajouter un Dim Debut au début de ton script.

Salut,

Si tu déclare tes variables avec dim alors faut le faire à toutes ;) sinon marche pas :aie: applique donc ce que te dis tekpaf

PS : Si tu met option explicit alors oui dim est nécessaire, sinon pas besoin du dim
01/04/2008, 23h20
Immobilis

Salut,

Citation:

Envoyé par guignol71

A la relance du script, debut garde sa valeur égale aux 27 lignes du fichier que j'ai lu.

Et les lignes s'ajoutent les unes aux autres à chaque fois que tu relance ton script?

Et merci de ne pas ouvrir plusieurs discussions sur le même sujet.

A+
02/04/2008, 09h21
benoitL39

Citation:

Envoyé par kaiser59

Salut,

Si tu déclare tes variables avec dim alors faut le faire à toutes ;) sinon marche pas :aie: applique donc ce que te dis tekpaf

PS : Si tu met option explicit alors oui dim est nécessaire, sinon pas besoin du dim

J'ai viens de faire un essai en rajoutant un "dim debut" au debut de mon script et rien n'y change. :arf:

Citation:

Envoyé par Immobilis

Salut,
Et les lignes s'ajoutent les unes aux autres à chaque fois que tu relance ton script?

Et merci de ne pas ouvrir plusieurs discussions sur le même sujet.

A+

Oui les lignes s'ajoutent et je finis par dépassé la taille de mon fichier. LE réel soucis est donc dans l'init de Debut qui ne se fait pas.:furieux:

PS : dsl pour la double discussion mais je pensai que le dépassement de fichier et la mauvaise init de varaible étaient deux problèmes différents. :oops:
02/04/2008, 12h32
benoitL39

:calim2:J'ai ajouté les Dim au début du script et en plus de cela je réinitialise ma variable via debut="" à la fin du script en rien n'y fait.

En plus, je ne peut plus avancer sur mon projet tellement ce problème est bloquant.

Je lance donc un grand cri de désespoir et au passage je vous souhaite un bon appétit!
02/04/2008, 14h09
TekP@f

Tu le lances comment ton script ?
Via une url sur un navigateur, c'est un vbs ?
02/04/2008, 14h20
benoitL39

Citation:

Envoyé par TekP@f

Tu le lances comment ton script ?
Via une url sur un navigateur, c'est un vbs ?

Via une url car le script est encapsulé dans une page .asp

C'est un problème de cache j'en suis conscient mais comment supprimer cette variable du cache parce que la j'en perd mon latin? :fou:

Citation:

Envoyé par kaiser59

Si tu met option explicit alors oui dim est nécessaire, sinon pas besoin du dim

Je vais essayer ça de suite et je vous tiens informé. Car j'ai mis mes dim partout mais pas de option explicit.
02/04/2008, 14h25
TekP@f
Assez étrange comme problème. Essaie de vider le cache de ton navigateur :
Code:

1 2 3 4 ' Vider la mémoire cache en ASP response.AddHeader "Pragma", "no-cache" response.AddHeader "cache-control", "no-store"
Par contre, il peut rester du cache sur le serveur ...
02/04/2008, 14h27
benoitL39
Citation:
Envoyé par TekP@f

Assez étrange comme problème. Essaie de vider le cache de ton navigateur :

Code:

1 2 3 4 ' Vider la mémoire cache en ASP response.AddHeader "Pragma", "no-cache" response.AddHeader "cache-control", "no-store"

Par contre, il peut rester du cache sur le serveur ...
C'est un problème de cache coté serveru que j'ai car lorsque je lance une fois le script sur ma machine puis je vais sur une autre machine le relancer j'ai mon problème....
Mais j'essaie le <% option explicit %> de suite et je vous tiens au courant ! :king:
02/04/2008, 14h34
benoitL39

Citation:

Envoyé par guignol71

C'est un problème de cache coté serveru que j'ai car lorsque je lance une fois le script sur ma machine puis je vais sur une autre machine le relancer j'ai mon problème....
Mais j'essaie le <% option explicit %> de suite et je vous tiens au courant ! :king:

Me revoilà!
Je viens d'essayer le <% option explicit %> et la fonction de vidage de cache que tu viens de me donner mais aucune des deux ne semble résoudre mon problème ! :aie:
02/04/2008, 15h05
TekP@f

Si c'est du cache serveur, faut voir ça dans la config du serveur. Je m'y connais pas assez pour t'aider dans ce domaine.
Good luck !!
02/04/2008, 15h17
benoitL39

Citation:

Envoyé par TekP@f

Si c'est du cache serveur, faut voir ça dans la config du serveur. Je m'y connais pas assez pour t'aider dans ce domaine.
Good luck !!

Merci!

Sinon je viens d'essayer avec des variables de session et j'ai le meme soucis... :aie:
02/04/2008, 19h55
Immobilis

Et si tu essayes cette methode http://www.w3schools.com/asp/showasp...demo_readlines

A+
03/04/2008, 09h48
benoitL39

Citation:

Envoyé par Immobilis

Et si tu essayes cette methode http://www.w3schools.com/asp/showasp...demo_readlines

A+

Tout d'abord merci pour votre aide.

Je viens d'essayer et j'ai toujours le meme probleme.
En fait si je fais que la lecture tout ce passe bien mais dans mon cas je lis un fichier puis je le modifie.

Et c'est lorsque je le modifie que ma variable Debut (qui n'est pas modifié lors de la réécriture du fichier) que mon script plante à la seconde exécution.

Je ne sais plus du tout où donné de la tête. S'agit il d'un lock sur mon fichier? D'une variable qui n'initialise pas comme l'on veut?
03/04/2008, 10h29
benoitL39

Problème résolu !

C'est les retour à ligne VbCR qui me fesait planter.
Donc j'ai utiliser les VbcrLF et là oh miracle tout fonctionne.

Merci à tous pour votre aide!

:king: