Discussion :

[chouchachaimouta]

Bonjour a tous, je vous présente mon problème et j’espère que vous me données une solution.
Lors de l'ajout des données a partir d'un form vb.net a une base sql server le vb a donné un erreur qui le suivant
Bon j'ai pa trouvé comme je déclare l champ autoincrément dans ma code qui la suivante :

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
22
23
24
25
26
27
28
29
30
31
 maConnexionSQLsrv = New SqlConnection("ma chaine de connection")
        maRequete = "INSERT INTO [PaimentEffectue] ( [id_Paiment],[Datepaiment],[RefPaiment],[MontantPai],[TransactionPaim]) VALUES (@id_Paiment, @Datepaiment, @Refpaiment, @MontantPai, @TransactionPaim)"
        myCommand = New SqlCommand(maRequete, maConnexionSQLsrv)
        With myCommand.Parameters
            .Add(New SqlParameter("@id_Paiment", SqlDbType.UniqueIdentifier))
            .Add(New SqlParameter("@Datepaiment", SqlDbType.Date))
            .Add(New SqlParameter("@RefPaiment", SqlDbType.NChar, 10))
            .Add(New SqlParameter("@MontantPai", SqlDbType.Money))
            .Add(New SqlParameter("@TransactionPaim", SqlDbType.Money))
        End With
        With myCommand
            .Parameters("@RefPaiment").Value = AutoScaleFactor
            .Parameters("@RefPaiment").Value = Réf.Text
            .Parameters("@Datepaiment").Value = DatePai.Text
            .Parameters("@MontantPai").Value = Montant.Text
            .Parameters("@TransactionPaim").Value = Note.Text
 
 
        End With
        Try
 
            'Execution de la requête
            myCommand.Connection.Open()
            myCommand.ExecuteNonQuery()
            myCommand.Connection.Close()
            MsgBox("waw")
        Catch ex As SqlException
 
            MsgBox(ex.Message)
 
        End Try