PB exécution insertion dans sql server
Bonjour j'effectue un programme vb dans lequel je fais des insertions dans une base sql server à partir de vb6. Seulement lors de l'insertion il me met l'erreur suivante: Erreur d'exécution '-214217900' (80040e14) [Microsoft][ODBC SQL Server Driver] [SQL Server] INSERT a échoué car les options set suivantes comportent des paramètres incorrects :'ARITHABORT'
Et il me renvoi sur la ligne suivante :
Code:
1
2
|
cnx.Execute ("INSERT INTO F_DOCENTETE (DO_Piece,DO_Type,DO_Domaine,DO_Statut,DO_Tiers) VALUES ('BLA01672', 3, 1, 0, 'COMPIN')") |
Voici mon code de connexion et d'insertion:
Code:
1
2
3
4
5
6
7
8
9
10
11
12
|
Dim cnx As ADODB.Connection
Set cnx = New ADODB.Connection
'Définition de la chaîne de connexion
cnx.ConnectionString = "UID=" & Administrateur & ";" & "DRIVER={SQL Server};Server=" & "SQL" & ";Database=" & "arindissql" & ";"
'PWD=" & MotDePasse & ";
'Ouverture de la base de données
cnx.Open
cnx.Execute ("USE arindissql")
cnx.Execute ("INSERT INTO F_DOCENTETE (DO_Piece,DO_Type,DO_Domaine,DO_Statut,DO_Tiers) VALUES ('BLA01672', 3, 1, 0, 'COMPIN')") |
Merci
