FORUMS PROFESSIONNELS
WINDEV
,
WEBDEV
et
WINDEV Mobile
Accueil
|
Messages récents
|
Connexion
|
Déconnexion
|
Français
Accueil
→
WINDEV 28
→
caracteres especiales
caracteres especiales
Débuté par PEDROMANUEL / pedro, 14 nov. 2018 03:29 - 2 réponses
Connectez-vous…
PEDROMANUEL / pedro
#1
Membre enregistré
26 messages
Posté le 14 novembre 2018 - 03:29
Alguien ya tiene una función para sacar los caracteres especial de una palabra por favor una ayuda
Signaler
0
0
Rubén Sánchez Peña
#2
Membre enregistré
794 messages
Popularité : +40 (42 votes)
Posté le 15 novembre 2018 - 15:30
Hola, ¿puedes poner un ejemplo del tipo de texto que debes tratar y definirnos esos caracteres especiales?
Rubén
Signaler
0
0
F.Ram
#3
Posté le 09 décembre 2018 - 07:56
Aqui pongo una funcion para extraer una serie de caracteres
PROCEDURE utFiltra(sx is string,sCharsXP9N is string="P") // P->Caracteres Printables
sRet,sX1 is string
sCar is string
sLista is string="01234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ"
nlj,k is 8-byte int
sX1=""
SWITCH sCharsXP9N
CASE "X"
CASE "x"
sLista+=Lower(sLista)
CASE "9","N"
sLista="0123456789"
CASE "P"
sLista=""
FOR k=32 TO 255
sLista+=Charact(k)
END
OTHER CASE
sLista=sCharsXP9N
END
nlj=Length(sx)
FOR k=1 TO nlj
sCar=sx[[k]]
IF Contains(sLista,sCar) THEN
sRet+=sCar
END
END
RESULT sRet
Signaler
0
0
→ Revenir à WINDEV 28
WINDEV 28
WEBDEV 2024
Français
English
Español
Portuguesa
Fermer cette fenêtre
Type de recherche
Uniquement les sujets
Tous les messages
Période de recherche
Date indifférente
Moins d'une heure
Moins de 24 heures
Moins d'une semaine
Moins d'un mois
Moins d'un an
Annuler
Aperçu de votre message
Ajouter une image
Importer une image depuis une URL
Envoyer une image depuis un fichier de votre disque
Déposez ici un fichier ou cliquez sur "Parcourir..."
ou
Annuler
0%
WLangage
SQL
XML, HTML
JAVA, Javascript
Texte