Requête sql différente de vb6 ?

vb · 10/02/2010, 16h50

Bonjour,
Voilà mes premiers pas en vb.net, après tout le temps passé sous vb5 et vb6.
J'ai des soucis pour mes requêtes qui fonctionnais sous l'autre langage ...voici une requête toute simple, qui fonctionne évidement en . net

Code :

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

strSql = "SELECT * FROM Clients where Code = 1"

si je veux mettre à la place du chiffre 1 , une variable(valeur numérique provenant par exemple d'un TextBox ), pas moyen comme je faisais en vb6, ou alors une valeur de type string...
Voici ci après deux querry qui fonctionnent super sous vb6 , utilisant des variables de types,numérique, string, date...provenant de TextBox..combo..Label .par exemple

Code :

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

1
2
3
4
5
6
7
8
strRecherche = "SELECT * FROM [Articles commandés]" _
    & " WHERE [Numéro de commande]NOT In" _
    & " (SELECT [Numéro de commande] FROM [Commande éffectuée]" _
    & " WHERE [Numéro de commande]=[Articles commandés].[Numéro de commande])" _
    & " And[Date enlèvement]Between #" + Format(dDateDébut, "MM/DD/YYYY") + "#" _
    & " And #" + Format(dDateFin, "MM/DD/YYYY") + "# " _
    & " And[Code produit] = " & CStr(lblcode) _
    & " And[Fait]= 0"

Code :

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

1
2
3
4
5
6
7
strRecherche = "SELECT * FROM [Articles commandés]" _
    & " WHERE [Numéro de commande]NOT In" _
    & " (SELECT [Numéro de commande] FROM [Commande éffectuée]" _
    & " WHERE [Numéro de commande]=[Articles commandés].[Numéro de commande])" _
    & " And[Date enlèvement]= #" + Format(dPlanningDate, "MM/DD/YYYY") + "#" _
    & " And[Groupe] ='" & strLeGroupe & "'" _
    & " And[Fait]= 0 order by [Désignation produit]"