Bonjour,
je dvp en asp.net avec visual studio 2003 et SQL Server
Mon pb est que je n'arrive pas à inserer ou supprimer des données dans la base de données alors que toutes mes commandes s'execute sans erreur, je ne comprend pas!
code d'une classe qui me permet de manipuler mes données de ma BD :
dans mon fichier .VB je l'utilise ainsi :
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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49 Public Class Cargo Private dstCargo As DataSet 'Private dstCargo2 As DataSet Private conCargo As SqlConnection Private adpCli As SqlDataAdapter Public Sub New() conCargo = New SqlConnection conCargo.ConnectionString = "Data Source=localhost;Initial Catalog=Cargo;User Id=****; Password=****;Integrated Security=True;" End Sub Public Sub ObtenirClients() adpCli = New SqlDataAdapter("Select NumID, Nom, Prenom, Email from testal", conCargo) dstCargo = New DataSet adpCli.Fill(dstCargo, "CliTable") End Sub Public ReadOnly Property ClientListe() As DataTable Get Return dstCargo.Tables("CliTable") End Get End Property ' Fonction qui s'excute mais ne fait rien ' ' Public Function SuppClient(ByVal RowNum As Integer, ByVal ID As String) As String Dim strRep As String = "ok" Try conCargo.Open() Dim maRequete As String maRequete = "delete from testal where numId='" & ID & "'" Dim commDelete As New SqlCommand(maRequete, conCargo) adpCli.DeleteCommand = commDelete adpCli.Update(dstCargo, "CliTable") Catch ex As Exception strRep = ex.Message Finally conCargo.Close() End Try Return strRep End Function .....
objCargo.ObtenirClients()
Response.Write(objCargo.SuppClient(int_LigneMaj, str_numId))
il ne me fait pas d'erreur, mais il ne me supprime pas mon enregistrement.... je suis à la recherche d'une aide pour résoudre ce pb sachant que j'ai déjà modifié mon utilisateur pour qu'il est les droits de modifications sur la base de données
merci d'Avance
Partager