As-tu vérifié le contenu exacte de la chaine de caractères que tu lui soumets? (en l'affichant entre crochets dans un MessageBox par exemple)?
[add] ton utilisation de ce contrôle ne semble pas mauvaise, cf par exemple ce code de chez devbuzz
Modérateurs: webmaster, Le Sage
lifson a écrit:je pense savoir d'ou vient le probleme. En debuggant pas à pas je me suis rendu compte, à ce niveau du code
Code:
For t = 1 To jmdmax
Err = 0
If CMD.FileSystem1.FileLen(blocarch + Trim(numero_patient.Text) + "." + Trim(Str(t))) <> 0 Then
CMD.File1.Close
Err = 0
CMD.File1.Open blocarch + Trim(numero_patient.Text) + "." + Trim(Str(t)), fsModeInput
If Err = 0 Then
a = CMD.File1.LineInputString
If a <> "" Then
FORMULE.blocc(t).Caption = a
End If
End If
CMD.File1.Close
au niveau de la 3eme et 7eme ligne il me renvoit "vide" pour la taille du fichier et donc par consequent il ile crée pas au niveau de la 7eme ligne.
blocarch + Trim(numero_patient.Text) + "." + Trim(Str(t))\My Documents\blocarch\SUIVIBL\1.1
\Mes Documents\blocarch\SUIVIBL\1.1
\My Documents\blocarch\SUIVIBL\1.1
\My Documents\blocarch\SUIVIBL\1.1
Retourner vers Embedded Visual Basic (eVB)
Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 0 invités