Discussion :

[Developpeur19]

Bonsoir tout le monde

Est-ce que quelqu’un peut m’aider SVP

Bon je suis un débutant avec VB.NET 2008 mon problème est que je veux utiliser une valeur entrée par l’utilisateur via un TEXTBOX dans une requête SQL mais sa plante vb m’affiche comme erreur « types de données incompatible dans l’expression du critère »

Voila le bout du code que j’ai utilisé

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
 
 
        Dim Connection As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & "C:\Documents and Settings\utilisateur\Bureau\basedeux.mdb")
 
        'Déclaration de la variable qui contiendra la requête OleDb liée à la connexion et de la variable contenant le nombre
        Dim CommandeCount As OleDbCommand = Connection.CreateCommand()
        Dim nbre As Integer
 
        'On affecte une chaine de caractère qui est la requête
        CommandeCount.CommandText = "SELECT COUNT(*) FROM Table3 WHERE cod_section = 'textbox1.text'  "
 
        'On fait appel au dataAdapter puis on ouve la connexion
        Connection.Open()
 
        'On met le nombre d'enregistrement retourné dans la variable nbre
        nbre = CommandeCount.ExecuteScalar()
 
        'Et on ferme la connexion
        Connection.Close()

[kronos85]

Je sais pas si c'est ça, mais je serais toi, je mettrais le textbox1.text dans une variable temporaire que j'utiliserai ensuite dans la requête SQL...

[Developpeur19]

Utiliser la valeur d’un textbox dans une requete sql

Merci pour ta reponce mais j’ai deja esseyr sa et sa pnate toujours

J’ai fais ceci et sa na pas marcher

Code :

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

1
2
3
 
Dim i as Integer
i=CType(textbox1.text,Integer)

y a t'il quelqu'un qui a une autre idée SVP
Merci

[tssi555]

Il faut enlever les guillemets de textBox...

Essaie ca :

Code :

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

1
2
3
4
5
....
'On affecte une chaine de caractère qui est la requête
Dim a as Interger 'si la valeur entré est integer sinon as String
CommandeCount.CommandText = "SELECT COUNT(*) FROM Table3 WHERE cod_section=a"
....

[Developpeur19]

Bonsoir merci pour ta réponse

je viens d’essayer mais sa na pas marcher vb.net dit qu’il y a une erreur « Aucune valeur donnée pour un ou plusieurs des paramètres requis »

J’arive pas a trouver ce qui clauche

[Pol63]

la requete est dans un string
il est possible de concaténer des string


les guillements sql sont des '
les guillements vb sont des "

Code :

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

CommandeCount.CommandText = "SELECT COUNT(*) FROM Table3 WHERE cod_section = " & textbox1.text

m'enfin ca c'est la version simple, le mieux est d'utiliser des dbparameters, il y a des exemple sur ce forum entre autre

[Developpeur19]

Bonsoir

Je viens d’essayer et ça a marcher merci infiniment j’ai trop cherché et j’ai pas trouver vous m’avez bien aider merci bien

thenks