[VB6] Enlever les côtes '

Bonjour,

Voila, je fais une fenêtre d'identification. Le login et le mot de passe saisis seront comparés a des valeurs de ma base de données. Mon problème est, que si l'utilisateur saisi des cotes pour le login ça plante. Je voudrais donc savoir s'il existe une fonction qui permettrai d'enlever ces côtes ?

Merci d'avance

pour remplacer des quotes, tu peux faire:

replace(machaine, "(signe-quote-mon-clavier-plante)", "(autre caractere)")

tu peux aussi empecher la saisie de caractere par lutilisateur.

un truc genre:

Code:

---

1 2 3 4

Private Sub txtbox_KeyPress(KeyAscii As Integer) If (KeyAscii < 48 Or KeyAscii > 57) And (KeyAscii <> vbKeyBack) Then KeyAscii = 0 End Sub

---

ca, ca sert a authoriser que les touches numeriques.

L'essentiel manque ici !
Il saisit dans quel type de contrôle ?
Si c'est dans une textbox, tu peux carrément (événement Keypress) faire en sorte que la saisie d'un caractère "ne passe pas" dès la frappe !
Si c'est dans une inputbox : contrôle à postériori (moins élégant, donc)

Erreur à ne surtout pas commettre : remplacer le caractère frappé ou le supprimer (l'utilisateur ne s'y retrouvera plus)


Edit : pour ton onformation : le code ascii de ' est 39 et celui de " est 34

C'est une TextBox. Merci riesseg , je n'avais pas pensé au keypress.
Je débute en VB6 :oops:

Merci à vous deux.

La gestion des quotes dans les bases de données se fait par le doublements de ces dernières :

Code:

---

Expression = Replace(ExpressionInitiale, "'", "''")

---

Et tu ajoutes Expression dans la base de données. Par la suite, tu peux très bien comparer des données comportant des quotes.

Citation:

---

Envoyé par Catbull

La gestion des quotes dans les bases de données se fait par le doublements de ces dernières :

---

kwaaaaaaa 8O
la je suis vraiment pas sur... c'est un coup a planter grave son SQL...

c'est "\" qui permet de chinter les quotes dans les bases de donneees...

Je confirme les propos de Catbull, je m'en sert avec Oracle, je suis d'ailleurs obligé si je veux qu'il comprenne...sinon le simple quote le fait planter..

Citation:

---

Replace(Text1.Text, "'", "''")

---

whooaaaooooo...

moi je trouve que c'est un truc a se peter les neuronnes qund la requete marche pas :p

mais je m'incline et vous fait confiance ;)