concaténation au niveau d'une requête

Version imprimable

bonjour
j'ai un probléme de concaténation dans une requête d'insertion.les champs de la table où on va insérer les valeurs sont les suivantes:
Nserie:int
Marque:varchar
Modele : varchar
Designation:varchar
ValMinFct : int
ValMaxFct : int
DteAcqui:date
DteMES:date
CdeFrn:int
DrapSupprimer:varchar

voici une fonction permettant d'insérer les valeurs :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 Public Sub AddFieldsEQP(ByVal nserie As SqlInt32, ByVal marque As SqlString, ByVal modele As SqlString, ByVal designation As SqlString, ByVal valmin As SqlInt32, ByVal valmax As SqlInt32, ByVal dteacqui As SqlDateTime, ByVal dteMES As SqlDateTime, ByVal cdefrn As SqlInt32, ByVal drap As SqlString)
 
 
            Dim query As String = "insert into DBMETROPTIM.dbo.NDS_METROPTIM_EQP values(" & nserie & ", '" & marque & "' ," & modele & ", '" & designation & "' ," & valmin & "," & valmax & ", '" & dteacqui & " ' , '" & dteMES & " ' ," & cdefrn & ", '" & drap & "')"
 
            Try
                Dim SqlCnx As SqlConnection = New SqlConnection("Server=(local)\SQLEXPRESS;Initial Catalog=master;Integrated Security=SSPI")
                Dim cmd As New SqlCommand(query, SqlCnx)
                SqlCnx.Open()
                cmd.ExecuteNonQuery()
                SqlCnx.Close()
            Catch sqlExc As SqlException
                MessageBox.Show(sqlExc.ToString, "Erreur de SQL Server!", MessageBoxButtons.OK, MessageBoxIcon.Error)
            End Try

lorsque je compile une erreur se produit.le message d'erreur est le suivant:
operator '&' not defined for types 'String' and 'System.Data.SqlTypes.Int32'

est ce que quelqu'un peut capter il réside où l'erreur.
merci
cordialment

moi ce que je vois c'est des quotes ' oublier je pense :

Code:

1
2
 
Dim query As String = "insert into DBMETROPTIM.dbo.NDS_METROPTIM_EQP values('" & nserie & "', '" & marque & "' ,'" & modele & "', '" & designation & "' ,'" & valmin & "','" & valmax & "', '" & dteacqui & "' , '" & dteMES & "' ,'" & cdefrn & "', '" & drap & "')"

Essai en mettant bien toute les quotes

23/08/2008, 12h14
beet2che

merci mais ça ne marche pas :cry:
23/08/2008, 13h57
harz62

Utilise des requêtes paramétrées au lieu de concaténer une chaine. C'est plus lisible et plus sécurisé.
25/08/2008, 10h04
beet2che

[B]bonjour/B]
je crois que l'idée des requêtes paramétrées est plus logique,simple et sécurisé.et ça marche aussi ;)
merci pour votre aide
cordialement
25/08/2008, 10h11
Elstak
sinon l'erreur venait surement de là non?
Code:

1 2 ByVal nserie As SqlInt32
un Integer aurait suffit je pense