Lire le premier caractère d'un fichier texte [Résolu]

Signaler
Messages postés
168
Date d'inscription
mercredi 24 mai 2006
Statut
Membre
Dernière intervention
11 septembre 2007
-
Messages postés
168
Date d'inscription
mercredi 24 mai 2006
Statut
Membre
Dernière intervention
11 septembre 2007
-
Bonjour,

Je désire pouvoir lire uniquement le premier caractère d'un fichier text que j'aurais préalablement inscrit un foix pour tout grave a windows exemple :
Nom du fichier : Ligne
1er caractère : 1

j'ais déjà commencer a coder mais bon je me suis arreter aprés l'ouverture ^^ !!

Open "path\Ligne.txt" For Binary Access Read Lock Read As #1

mais bon pour la suite je ne voi pas trops d'autemp plus que je doit récupéré ce caractère dasn un textbox !!

Merci.

10 réponses

Messages postés
14785
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
18 avril 2021
154
Bonjour

essaye avec Input$(ID,Len)
avec ID l'identifiant du fichier
Len, la longueur à lire (la position se décale automatiquement)

Il est plus facile de batiser quelqu'un que de la convertir. (surtout en programmation)
NHenry (VB6, VBA excel, VB.NET, C++, C#.Net)

<fon></fon>
Messages postés
14785
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
18 avril 2021
154
Bonjour

Pour récupérer un caractère : left, Mid, Right
Pour écrire dands un fichier Print #ID , Chaine
Avec ID 1 dans ton cas.

Il est plus facile de batiser quelqu'un que de la convertir. (surtout en programmation)
NHenry (VB6, VBA excel, VB.NET, C++, C#.Net)

<fon></fon>
Messages postés
168
Date d'inscription
mercredi 24 mai 2006
Statut
Membre
Dernière intervention
11 septembre 2007

salut,
Tu ve dire quoi par 'Right' pour récupérer un caractère, ca donne quoi en syntaxe vb par exemple pour le récupérer et le mettre dans un textbox ? stp

Merci.
Messages postés
14785
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
18 avril 2021
154
Bonjour

dim MaStr as String = "Test"

Left(MaStr,1)="T"
Mid(MaStr(2,2)="es"
Right(MaStr,1)="t"

Il est plus facile de batiser quelqu'un que de la convertir. (surtout en programmation)
NHenry (VB6, VBA excel, VB.NET, C++, C#.Net)

<fon></fon>
Messages postés
2237
Date d'inscription
lundi 29 mai 2006
Statut
Membre
Dernière intervention
29 mai 2008
10
Exemple: récupère les 4 derniers caractères d'un fichier (ici l'extension)



Right((ObjSubFileItem.Path), 4)





 Drikce 06
Messages postés
2237
Date d'inscription
lundi 29 mai 2006
Statut
Membre
Dernière intervention
29 mai 2008
10
et si c'est les premier c'est left

 Drikce 06
Messages postés
14785
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
18 avril 2021
154
Bonjour

J'ai dis presque le même chose 13 secondes plus rapidement

Il est plus facile de batiser quelqu'un que de la convertir. (surtout en programmation)
NHenry (VB6, VBA excel, VB.NET, C++, C#.Net)

<fon></fon>
Messages postés
168
Date d'inscription
mercredi 24 mai 2006
Statut
Membre
Dernière intervention
11 septembre 2007

Et oui mais non moi je ne ve pas récupérer les caractères du nom du fichier mais ce qu'il y a l'intérieur !!

prend un fichier tu le nome comme tu veut tu écrit ce que tu ve à l'intérieur et tu fait comment pour récup le 1er ? en gros si tu écrit "Bonjour" dans ton fichier comment tu fait pour récup le "B" ?

Merci.
Messages postés
168
Date d'inscription
mercredi 24 mai 2006
Statut
Membre
Dernière intervention
11 septembre 2007

oki merci vais essayer avec va !!
Messages postés
168
Date d'inscription
mercredi 24 mai 2006
Statut
Membre
Dernière intervention
11 septembre 2007

oki merci ca marche !!