Problème d'update a partir d'un serveur en VB.net - VB/VBA/VBS - Programmation
MarshPosté le 06-07-2005 à 14:12:00
Salut a tous, je suis entrain de développer un service web en VB.net... J'ai créer tout mais fonction en utilisant Matrix.... mais pour ma fonction de mise a jour j'ai un problème elle me retourne 0 (mais mise a jours ne sont pas faite.)
pourrier vous me dire d'ou ça peut venir voici mon code pour ma fonction d'update.
<webMethod> Public Function MyUpdateMethod(ByVal id_produit As Integer, ByVal designation_produit As String) As Integer Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data Source=C:\Inetpub\wwwr"& _ "oot\gestion_prod\produits.mdb" Dim dbConnection As System.Data.IDbConnection = New System.Data.OleDb.OleDbConnection(connectionString)
Dim queryString As String = "UPDATE [produits] SET [designation_produit]=@designation_produit WHERE ([produits"& _ "].[id_produit] = @id_produit)" Dim dbCommand As System.Data.IDbCommand = New System.Data.OleDb.OleDbCommand dbCommand.CommandText = queryString dbCommand.Connection = dbConnection
Dim dbParam_id_produit As System.Data.IDataParameter = New System.Data.OleDb.OleDbParameter dbParam_id_produit.ParameterName = "@id_produit" dbParam_id_produit.Value = id_produit dbParam_id_produit.DbType = System.Data.DbType.Int32 dbCommand.Parameters.Add(dbParam_id_produit) Dim dbParam_designation_produit As System.Data.IDataParameter = New System.Data.OleDb.OleDbParameter dbParam_designation_produit.ParameterName = "@designation_produit" dbParam_designation_produit.Value = designation_produit dbParam_designation_produit.DbType = System.Data.DbType.[String] dbCommand.Parameters.Add(dbParam_designation_produit)
Dim rowsAffected As Integer = 0 dbConnection.Open Try rowsAffected = dbCommand.ExecuteNonQuery Finally dbConnection.Close End Try
Return rowsAffected End Function
voilà si quelqu'un trouve un problème la dedans ça m'interesse petite précision tout les autres fonction insertion, supression et lecture fonctionne; ma base de donnée et une base access.
Marsh Posté le 06-07-2005 à 14:12:00
Salut a tous,
je suis entrain de développer un service web en VB.net...
J'ai créer tout mais fonction en utilisant Matrix....
mais pour ma fonction de mise a jour j'ai un problème
elle me retourne 0 (mais mise a jours ne sont pas faite.)
pourrier vous me dire d'ou ça peut venir voici mon code pour ma fonction
d'update.
<webMethod> Public Function MyUpdateMethod(ByVal id_produit As Integer,
ByVal designation_produit As String) As Integer
Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;
Ole DB Services=-4; Data Source=C:\Inetpub\wwwr"& _
"oot\gestion_prod\produits.mdb"
Dim dbConnection As System.Data.IDbConnection = New
System.Data.OleDb.OleDbConnection(connectionString)
Dim queryString As String = "UPDATE [produits] SET
[designation_produit]=@designation_produit WHERE ([produits"& _
"].[id_produit] = @id_produit)"
Dim dbCommand As System.Data.IDbCommand = New
System.Data.OleDb.OleDbCommand
dbCommand.CommandText = queryString
dbCommand.Connection = dbConnection
Dim dbParam_id_produit As System.Data.IDataParameter = New
System.Data.OleDb.OleDbParameter
dbParam_id_produit.ParameterName = "@id_produit"
dbParam_id_produit.Value = id_produit
dbParam_id_produit.DbType = System.Data.DbType.Int32
dbCommand.Parameters.Add(dbParam_id_produit)
Dim dbParam_designation_produit As System.Data.IDataParameter = New
System.Data.OleDb.OleDbParameter
dbParam_designation_produit.ParameterName = "@designation_produit"
dbParam_designation_produit.Value = designation_produit
dbParam_designation_produit.DbType = System.Data.DbType.[String]
dbCommand.Parameters.Add(dbParam_designation_produit)
Dim rowsAffected As Integer = 0
dbConnection.Open
Try
rowsAffected = dbCommand.ExecuteNonQuery
Finally
dbConnection.Close
End Try
Return rowsAffected
End Function
voilà si quelqu'un trouve un problème la dedans ça m'interesse
petite précision tout les autres fonction insertion, supression et lecture
fonctionne;
ma base de donnée et une base access.