1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
Sujet Précédent Sujet Suivant

Comment reconaitre un caractere en forme de carré

[Résolu]
Signaler
Messages postés
9
Date d'inscription
samedi 19 juin 2004
Statut
Membre
Dernière intervention
5 septembre 2004
 -
Messages postés
9
Date d'inscription
samedi 19 juin 2004
Statut
Membre
Dernière intervention
5 septembre 2004
 -
salut a tous voila, j essai de rapatrier le contenu d un agenda ds une base access, le fichier est un *.pdb c est l agenda de windows 98 si quelqu un le connait.
mon probleme c est que je n arrive pas a lire le separateur des champs.
en ouvrant le fichier sous word les champs sont separer par un carré blanc mais quand je lis le fichier caractere par caractere les carr"s n existe plus
exemple ( * = un carré) *paul*dupond* -> 13 caractere sous word
10 carateres avec vb6 ->pauldupond

voila y a t il un mode quand on ouvre le fichier en lecture qui permet de voir ces carrés ou alors quel code est associé a ces carrés.
j ai vu un source qui rechercher des caractere sempblables sur le site mais je n arrive plus a le retrouver.
merci pour votre aide.

7 réponses

Réponse 1 / 7
Messages postés
1858
Date d'inscription
samedi 29 juin 2002
Statut
Membre
Dernière intervention
17 octobre 2013
 10
oublié à la ligne avant Loop : 

i = i + 1
3
Merci
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 82 internautes nous ont dit merci ce mois-ci

Réponse 2 / 7
Messages postés
302
Date d'inscription
samedi 24 janvier 2004
Statut
Membre
Dernière intervention
4 février 2011
il faudrait arriver a trouver le code ASCII de ce caractère

tu lis la chaine caractère par caractère et tu utilises ASC(caractère) qui te renvoi un numéro
A=65
B=66
......

après il suffit de remplacer ce caractère par un espace

enfin y'a peu être plus simple!
Réponse 3 / 7
Messages postés
9
Date d'inscription
samedi 19 juin 2004
Statut
Membre
Dernière intervention
5 septembre 2004
le probleme c que quand je lis caractere par caractere il n y a plus les carrés
Réponse 4 / 7
Messages postés
1411
Date d'inscription
mercredi 6 août 2003
Statut
Membre
Dernière intervention
3 mars 2019
 1
oui normal les carrés ne sont pas des caractères ASCII.
Essai d'ouvrir un fichier Word avec le bloc note le resultat sera le même.
Je pense qu'il faut l'ouvrir avec un acces binaire ou un truc du genre mais la ça me depasse.
Réponse 5 / 7
Messages postés
3140
Date d'inscription
vendredi 14 mai 2004
Statut
Membre
Dernière intervention
11 mars 2019
 29
si c'est de l'unicode faut utiliser ASCW
Réponse 6 / 7
Messages postés
1858
Date d'inscription
samedi 29 juin 2002
Statut
Membre
Dernière intervention
17 octobre 2013
 10
Bonjour
Tu peux essayer : 

Open "C:\Chemin\Fichier.pdb" For Binary As #1
Dim Tamp As String, i As Long, Rep As Integer
Tamp = String$(LOF(1), 0)
Get 1, , Tamp
Close 1
i = 1
Do    Rep MsgBox (Mid$(Tamp, i, 1) & "> " & Asc(Mid$(Tamp, i, 1)), vbOKCancel)
   If Rep = 2 Then Exit Do
Loop
   

Tu auras les codes ASCII de TOUS les caractères, y compris les petits carrés.

Clic sur OK => caractère suivant
Clic sur Annuler => Fin de recherche
Réponse 7 / 7
Messages postés
9
Date d'inscription
samedi 19 juin 2004
Statut
Membre
Dernière intervention
5 septembre 2004
c est parfait je crois qu avec ca je vais me debrouiller merci rene38,
Gobillot,
bouv
et crn_c21
bon codage et continuez a aider le debutants merci!
Posez votre question