SELECT FROM en utilisant un ComboBox

Question

Bonjour depuis ce matin je cherche comment faire ceci:

sql = "SELECT * FROM Employés where Nom= combo1.text"

Je m'embrouille avec toutes ces "" et ' et les chr$(34)!!!

Il faut que même si Nom = "L'ardiette" ca marche aussi !!!

Merci de votre aide!

J.PUJOL95  :)

MDBen_pff · Answer

Salut, dans un module place ette fonction :

Function Quote(str As String)
   If IsNull(str) Then
      Quote = "''"
   Else
      Quote = "'" & Replace(str, "'", "''") & "'"
   End If
End Function


Puis ensuite tu fais :


sql = "SELECT * FROM Employés where Nom= Quote(combo1.text);"


MdBen-pff
A++ bon code
Et n'oubliez pas le tag Réponse acceptée !  :big)

cs_frop01 · Answer

Exact ,

Si tu mets la fonction dans un module, il faut la rendre Public 
Public Function Quote

et puis pour la requête 



sql = "SELECT * FROM Employés where Nom= " & Quote(Text1) & ";"



 :-p   [mailto:cyberscorp2004@msn.com MSN]  :big)  [mailto:frop01@yahoo.fr YAHOO]  >:)

cs_frop01 · Answer

Erreur de saisie Au lieu de : sql = "SELECT * FROM Employés where Nom= " & Quote(~~Text1~~) & ";" Voila sql = "SELECT * FROM Employés where Nom= " & Quote(combo1.text) & ";" :-p [mailto:cyberscorp2004@msn.com MSN] :big) [mailto:frop01@yahoo.fr YAHOO] >:)

SELECT FROM en utilisant un ComboBox

3 réponses

Discussions similaires