Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : ascii caractères de contrôle [ Divers / Débutants ] (lacomm)

mercredi 5 septembre 2007 à 17:25:52 | ascii caractères de contrôle

lacomm

Hello,

Comment faire pour remplacer les caractères de contrôle ascii ?
Le code suivant marche bien pour les autres caractères ascii, mais pas pour les caractères de contrôle de 0 à 31

source() = Replace(source(i), Asc(65), " ")

Grand merci


jeudi 6 septembre 2007 à 08:04:45 | Re : ascii caractères de contrôle

jrivet

Membre Club
Salut,
Tu es sur que ce n'est plutot ceci qu'il faudrait pour remplacer correctement un A par un espace

Source(i) = Replace(Source(i), Chr(65), " ")

NOTE: ce code m'a aussi êrmis de remplacer les caractere de 0 à 31.


@+: Ju£i€n
Pensez: Réponse acceptée

jeudi 6 septembre 2007 à 08:20:12 | Re : ascii caractères de contrôle

lacomm

Salut et merci

En fait j'ai une routine qui ouvre tous les fichiers d'un répertoire, et quand le dernier caractère est par exemple un A, ca marche, cad que les fichiers en entrée sont recopiés en sortie tels quels en changeant seulement le A ; par contre quand c'est le caractère 026 (substitute), la routine recopie seuelement le premier fichier, mais vide.
Avec ton code c'est la même chose.
Plus précisément il s'agit de fichiers contenant des nombre dont le dernier caractère est ce caractère de contôle que je voudrais effacer.

While sInputFilePath <> ""
    fnInput = FreeFile
    Open inputFolder & "\" & sInputFilePath For Input As fnInput
    On Error Resume Next
    sInputTextEntier = Input(LOF(fnInput), fnInput)
    source() = Split(sInputTextEntier, " ")
    For i = 1 To UBound(source)
    j = 1
        For h = 1 To Len(source(i))
            c = Mid$(source(i), h, 1)
            If c = Chr(26) Then
                source(i) = Replace(source(i), Chr(26), " ")
                h = h + 1
                j = h
             End If
        Next h
        Print #fnoutput, source(i)
    Next i
     Close #fnInput
        Close #fnoutput
    sInputFilePath = Dir()
Wend


jeudi 6 septembre 2007 à 08:51:01 | Re : ascii caractères de contrôle

lacomm

Autre exemple, si je fais
source() = Split(sInputTextEntier, chr(65))
le A disparait (OK)
mais si je fais
source() = Split(sInputTextEntier, chr(26))
rien n'est splitté

jeudi 6 septembre 2007 à 09:31:59 | Re : ascii caractères de contrôle

lacomm

Peut-être est-ce une explication ?

Substitute : On MS-DOS systems with files opened in text mode, "end of text" or "end of file" is marked by the Ctrl-Z character (code 26, "Substitute"), instead of ^C or ^D common on other operating systems. In many programs, a keyboard input of Ctrl-Z is an "undo" command to reverse the most recent input or action. In many terminal programs, this will suspend the active process and return control to the shell.

jeudi 6 septembre 2007 à 10:17:29 | Re : ascii caractères de contrôle

lacomm

Réponse acceptée !
En fait c'est très simple: soit utiliser une macro VBA, soit utiliser le logiciel RemplaceVite http://www.logitheque.com/fiche.asp?I=15378
Merci et à bientôt



Cette discussion est classé dans : contrôle, ascii, caractères


Répondre à ce message

Sujets en rapport avec ce message

Convertir des bytes en caractères ASCII [ par dricard ] Bonjour,J'ai une chaîne de caractères en hexadécimal qui correspond à une image. Je converti par paire l'hexadécimal en un tableau de bytes. Quand je [Débutant] [ASCII] Conversion ascii vers caractères [ par doustij ] Problème de conversion ASCII pour cryptage RSA [ par sozie9372 ] Bonjour à tousC'est rapport au cryptage alors j'ai mis ca ici...Voila le topo :Je réalise en ce moment un prog de cryptage RSA sur 64 bits.Le crypte s Transformer une chaîne de caractères en trame ASCII [ par basamir ] bonjour,je reçoit d'un terminal une chaîne de caratères composé de 'maximum' 5 digits par exemple 80000je dois ensuite écrire sur un port com cette mê mettre à jour une Listbox [ par MAlococcyX ] Salut à tous!J'ai un souci :J'ai un contrôle TextBox dans lequel je rentre une série de caractères correspondant à ma recherche.Tous les items de ma f récupérer les caractères d'un code ascii [ par cardonc ] Bonjour à tous,Je cherche la commande tout bête sous vb6 qui permet de récupérer le texte d'une valeur de code ascii. Je sais que pour mettre un texte Nombre de caractères [ par gilou125 ] Je réalise un fichier en Visual Basic pour Excel et je bloque sur une commande certainement toute simple :J'aurais voulu savoir comment connaître le n chaine de caractères [ par mouky66 ] salut à tous.voila un petit moment déja que je communique avec une unité de traitement grace a vb 6. selon l'instruction que je lui envoi j'ai des rép comment forcer l'affichage d'un nombre sur 6 caractères avec des zéros ? [ par youkizouki ] salut à tous, petite question rapide : comment convertir un nombre en string (sur 6 caractère) en remplacant les espaces par des zéros '0'  <IMG src=" conflit en vb [ par raro ] salut tout le monde! je suis en train faire une petite application genre "visdata" et j'ai un problème dans mon code que voici: Sub text_licence_lost


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,515 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.