Discussion :

[TheEdge]

Hello,

Voici la situation sous Visual Basic 2010 Express:

Base de données = BD_Dérangements.mdb
Table = TB_Utilisateur
Champs = Utilisateur_Username ; Utilisateur PC

Formulaire = Form_Main.vb
TextBox = Utilisateur_UsernameTextBox

La requête sql =
SELCT Utilisateur_PC FROM TB_Utilisateur WHERE Utilisateur_Username = Utilisateur_UsernameTextBox.text

Malheureusement, la requête ne fonctionne pas. J'ai essayé avec des ', des " etc mais rien ne fonctionne.

Par contre, si je met WHERE Utilisateur_Username = 'utilisateur3', la requête renvoie le champ correspondant.

D'avance merci pour votre aide :-)

[Joki_]

Hello,

Voici la situation sous Visual Basic 2010 Express:

Base de données = BD_Dérangements.mdb
Table = TB_Utilisateur
Champs = Utilisateur_Username ; Utilisateur PC

Formulaire = Form_Main.vb
TextBox = Utilisateur_UsernameTextBox

La requête sql =
SELCT Utilisateur_PC FROM TB_Utilisateur WHERE Utilisateur_Username = Utilisateur_UsernameTextBox.text

Malheureusement, la requête ne fonctionne pas. J'ai essayé avec des ', des " etc mais rien ne fonctionne.

Par contre, si je met WHERE Utilisateur_Username = 'utilisateur3', la requête renvoie le champ correspondant.

D'avance merci pour votre aide :-)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Dim req as string = "SELCT Utilisateur_PC FROM TB_Utilisateur WHERE Utilisateur_Username = '" & Utilisateur_UsernameTextBox.text & "'"

[TheEdge]

Merci Joki. Malheureusement, cela ne fonctionne toujours pas.

Comment doit être la requête dont la fonction WHERE comporte une textbox dans le concepteur de vue sous Visual Basic 2010 ?

Merci beaucoup

[Joki_]

Met un point d'arrêt après l'instanciation de ta variable qui contient ta requête, et dis nous ce qu'elle te retourne.

Pour l'exemple que je t'ai donné la dernière fois met un point d'arrêt après "Dim req as String = ..."
Et regarde ce que la variable req te retourne?

[TheEdge]

Alors, quand je mets le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
    Private Sub BT_Search_User_Click(sender As System.Object, e As System.EventArgs) Handles BT_Search_User.Click
 
        Dim req As String = "SELECT Utilisateur_PC FROM TB_Utilisateur WHERE Utilisateur_Username = '" & Utilisateur_UsernameTextBox.text & "'"
 
    End Sub

J'ai le message suivant :
Erreur 1 'Utilisateur_UsernameTextBox' n'est pas déclaré. Il peut être inaccessible en raison de son niveau de protection.

Donc je ne peux pas tester (me demande de tester sous l'ancien build qui fonctionnait).

Par contre, re-voici les codes, c'est peut-être plus simple

Générateur de requête -> il faut remplacer = 'utilisateur4' par la valeur de Utilisateur_UsernameTextBox.text Mais j'ai tout essayé et le générateur de requête de Visual Basic ne veut pas reconnaître Utilisateur_UsernameTextBox.text.

La requête ci-dessous ainsi que le code VB fonctionne. Il me renvoit dans la textbox Utilisateur_PC la valeur du PC correspondant.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
SELECT        Utilisateur_PC
FROM            TB_Utilisateur
WHERE        (Utilisateur_Username = 'utilisateur4')

Voici le code VB

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
    Private Sub BT_Search_User_Click(sender As System.Object, e As System.EventArgs) Handles BT_Search_User.Click
 
        Utilisateur_PCTextBox.Text = TB_UtilisateurTableAdapter.RQ_Search_PC
 
    End Sub

Merci beaucoup de m'aider

[TheEdge]

Voila, problème résolu avec les requêtes paramétrées et SQL Server Express !

Merci beaucoup pour vos conseils !

[rv26t]

Bonjour,

Il ne faut pas utiliser cette façon de faire.
Passer par les requêtes paramètrées.

A+, Hervé.