begin process at 2012 02 16 14:05:13
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Visual Basic 6

 > 

Divers

 > 

Débutants

 > 

ascii caractères de contrôle


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

ascii caractères de contrôle

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ée 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 limiter le nbre de caractères numériques [ par repi33 ] Bonjour, Je rencontre un problème sur le développement d'une application. Je cherche le code vba pour limiter dans un contrôle indépendant le nombre 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="


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
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

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 2,153 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales