Les Allergies
Alimentaires
Posez votre question Signaler

Visual Basic 6.0 erreur 62

coventry 653Messages postés 9 mars 2004Date d'inscription - Dernière réponse le 22 juin 2004 à 16:02
salut,
en visual basic, lorsque j'ouvre un fichier texte contenant des caracteres ASCII de toutes sortes (en fait j'additionne des valeurs ascii et il m'en renvoie d'autres...), VB me donne l'erreur 62 : "Input past end of life".
Si j'ouvre un fichier contenant du texte "normal"(pas de caracteres bizaroides de l'ascii), mon programme n'a aucun probleme.

Voici les code qui ouvre le fichier : 
Private Sub cmdOuvrir_Click()
  Dim NumFile As Integer
  Dim Adr As Variant
  
  On Error GoTo TraitementErr

  NumFile = FreeFile
  
  With dlgCrypt
    .Flags = cdlOFNFileMustExist
    .Filter = "Fchiers textes (*.txt)|*.txt"
    .CancelError = True
    .ShowOpen
  End With
  
  Adr = dlgCrypt.FileName
  
  Open Adr For Input As NumFile
  txtFichier.Text = Input(LOF(NumFile), NumFile)
  Close NumFile
  
  Exit Sub
  
TraitementErr:
  If Err.Number = cdlCancel Then
    Exit Sub
  Else
    MsgBox Err.Number & " : " & Err.Description
  End If
End Sub


et voici le contenu d'un fichier .txt qu'il ne sait pas ouvrir (visionn avec le bloc-notes): 
"Vd|#j@nBL+‹kb#%wGjKnd5m.ڟ1m`^-8VGer3VVe>B6ш|,t?)NY:QvJK>HKj(N@Rej/HdFKQp!]ݯ|÷.hC$c?)W8Ube""'g݅WxTҖQb/gV:]FҐW4ZXAK$ҢQ'(ÃjoL䩡LQ2kd( ؑ^u7҉V9.YC3-4܊`-/@x[m1~έdi=ow婛LM h2bW!^Z\G ]m#ɕc:]9ʃ[f7HJwp]ukZ/҃)t
%엙~{oe鉛3НKeZ~qI?]5z['ʔΖ;xpç;W=֏梡soX?&y.vJMW]n/x빙MS/ܔenT4N]CNS65V](雘\F 9W+c 鉭IW8\-""ƙf47f^0ᕰKA>1sfLﳭ-Ό9*\lxek""Ң摧 .ڝOʃurX;ES85Ne<+*!ݛ9m1'D֍㟙7ύnvx(T&ՑQlʚlFw`15ٍKGk6`52( pd=-:i{9MY/ʖp#U5,͑Xe#Z˛?86#,cdBkaOu'V7/ƍ7(*G}8ɜ)\ t;P1HWqGo-υ`n'ڑ@V#&Pxp4Gdi*]6/eb-Z|^8ULg*g˛2<Տ,*қdwKbB\CcQ!>ç{jo!pRep<UbW&gL&Ѝ$u.<#f/≫_FתdJ{<k#sTLN52xWQ3dPm5Zؕ{R̅^i0JݑokaZn-r7ٸ&Wp +eaK.Vho""J?2Mf3@806$0HQ3=yS(!ب99nq(*L줗?C.H_b$DG%!pϗXrijrX
S:xa^75wdsA|aZPz:xUٓ}nq+Lܩ?Lp*Ĕ^e!1DWP|AΥ\<vȑ>=ܥWr2""҉6w \ݣUٌ 0Ój㥤\\X,ӿD撧Q;Κ' '*ɛW@HS;m|xceɃb}0Pݨ|]HX)D'j@n[952$қ㍡3ݍ\ ՍI@88_m-ՉVM
wgu V]H4؇^w椦L?5bM!ۍ^4לq;Lg[|ah25w@x\o""Щ7Ck""}eq_KBH=hDK>+ʚO_#5g˛2<Տ,*қdwKbB\CcxCk'Έp5أpm;ĉh1 QGk4לd.ѥpI5FdWqډdAd(Ov1]՗~1`NC$cC=]d(މt;0yT2ܗ`%9@:4{,Uifg:GwW#RXdz<=?8oXp^~[/ʖp4煨YD9Sx\NV89""*nJVLz\|ꑉCN5{ǎpx[ޛR<kc䆩?c'ʕLm%-


Merci.

Imagination is more important than knowledge.
Lire la suite 

Visual Basic 6.0 erreur 62 »

6 réponses
Réponse
+0
moins plus
coventry 653Messages postés 9 mars 2004Date d'inscription 21 juin 2004 à 14:13
La ligne a laquelle l'application plante est celle la : 
txtFichier.Text = Input(LOF(NumFile), NumFile)


J'ai t voir sur le site Microsoft. Voila ce qu'il memet pour l'erreur 62 de Visual Basic6 :
You can't read past the end-of-file position. This error has the following cause and solution:

* An Input # or Line Input # statement is reading from a file in which all data has been read or from an empty file.

Use the EOF function immediately before the Input # statement to detect the end of file.
* You used the EOF function with a file opened for Binary access.

EOF only works with files opened for sequential Input access. Use Seek and Loc with files opened for Binary access.


est-il possible que certains caracteres ascii du texte ne peuvent pas tre mis en variable, zone de texte ou tout simplement charg?
Au sinon, que dois-je faire?
merci

Imagination is more important than knowledge.

 Ajouter un commentaire
Ajouter un commentaire
Réponse
+0
moins plus
coventry 653Messages postés 9 mars 2004Date d'inscription 21 juin 2004 à 14:54
J'ai russi!!!
J'ai mis ca : 
Do While Not EOF(NumFile)   ' Check for end of file.
   Line Input #NumFile, Temp   ' Read line of data.
loop


a la place de ca : 
txtFichier.Text = Input(LOF(NumFile), NumFile)


Temp est une variable Variant.
@+

Imagination is more important than knowledge.

 Ajouter un commentaire
Ajouter un commentaire
Réponse
+0
moins plus
romain_natiez 179Messages postés 15 juin 2004Date d'inscription 21 juin 2004 à 14:58
Salut !
moi aussi g un problme sur vb6 mais c'est l'eereur 336
ca fait une heure que je cherche sur le net et .. rien
si sur le site de microsoft ils te disent comment utiliser l'aide de vb
mais si je vais sur leur site, c'est que je n'ai pas l'aide de VB
(ils sont malins!!!)

sinon comment as -tu fais pour avoir une info sur ton erreur, est-ce que tu as mis le numro de l'erreur et ca ta donn ce que tu cherchais ?

en attendant je vais faire d'autre recherches

ton message d'erreur signifie "Numro d'enregistrement incorrect"

mais j'en sait pas plus

dis moi koi si tu peu m'aider, je te rendrai la pareille

merci d'avance
romain_natiez

 Ajouter un commentaire
Ajouter un commentaire
Réponse
+0
moins plus
coventry 653Messages postés 9 mars 2004Date d'inscription 21 juin 2004 à 21:02
salut!!
pour l'aide de Microsoft en ligne (anglais) tu vas voir en gnral sur msdn.microsoft.com mais pour Visual Basic 6.0 en particulier c'est http://msdn.microsoft.com/library/default.asp?url=/library/en-us/VBRef98/html/vbmscLROverview.asp
Pour les erreurs tu click sur Trappable Errors --> Core Visual Basic Language.
Mais ton erreur n'est apparement pas dedans, alors fais une recherche dans la MSDN...
Pour info : pour les fonctions, vnements,...du language VB tu ne dois pas clicker sur Trappable Errors mais sur Language.
Voila @+ et bonne chance
et j'ai regl mon probleme pas la peine de chercher ;)

Imagination is more important than knowledge.

 Ajouter un commentaire
Ajouter un commentaire
Réponse
+0
moins plus
romain_natiez 179Messages postés 15 juin 2004Date d'inscription 22 juin 2004 à 09:21
Moi aussi g rgl mon problme,
il y a meme un gars sympa ki ma refil un fichier pdf avec la liste des erreurs rcuprables, elles y sont pas toutes mais c dj ca.
Si tu veux la liste, je te l'envoie sans problme.

Romain_natiez

 Ajouter un commentaire
coventry- 22 juin 2004 à 16:02
Ok tu peux me l'envoyer a mon adresse dans mon proil?
merci

Imagination is more important than knowledge.
Ajouter un commentaire
Posez votre question
Ce document intitulé « Visual Basic 6.0 erreur 62 » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?