Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Dataset GetChange
Message
De
18/01/2004 03:53:54
Larry Santos
Local Data System
Philippines
 
 
À
17/01/2004 17:59:25
Information générale
Forum:
ASP.NET
Catégorie:
ADO.NET
Divers
Thread ID:
00867807
Message ID:
00867902
Vues:
18
Hi,

thanks for the reply

when i pass a parameter to savedataset for first run its ok but second its return nothing the dataset that i pass to savedataset

TIA
>Larry,
>
>This is VB, which is not my strong point, but still I think we might need to know exactly which statement is causing the error. At first glance, I don't see anything wrong.
>
>~~Bonnie
>
>>Hi,
>>
>>I will paste my small code here..
>>
>> Public Function Save_Product(ByVal ds As DAL.DSMain) As DataSet
>> Dim objDataSetChanges As DAL.DSMain = New DAL.DSMain()
>> Dim myDS As DataSet
>> objDataSetChanges = CType(ds.GetChanges(), DAL.DSMain)
>> If (Not (objDataSetChanges) Is Nothing) Then
>> Save_Dataset(objDataSetChanges)
>> objDataSetChanges.AcceptChanges()
>> End If
>> End Function
>>
>>When I first the function it good but when i run again i got an error encountered
>>Error:
>>
>>Object reference not set to an instance of an object.
>>
>> Private Sub Save_Dataset(ByVal ChangedRows As DAL.DSMain)
>> Dim DA_Product As SqlDataAdapter = New SqlDataAdapter()
>> Dim DA_ProductItem As SqlDataAdapter = New SqlDataAdapter()
>> Dim DA_ProductAcc As SqlDataAdapter = New SqlDataAdapter()
>>
>> DA_Product.InsertCommand = cmdInsert_Product()
>> DA_Product.UpdateCommand = cmdUpdate_Product()
>> DA_Product.DeleteCommand = cmdDelete_Product()
>>
>> DA_ProductItem.InsertCommand = cmdInsert_ProductItem()
>> DA_ProductItem.UpdateCommand = cmdUpdate_ProductItem()
>> DA_ProductItem.DeleteCommand = cmdDelete_ProductItem()
>>
>> DA_ProductAcc.InsertCommand = cmdInsert_ProductAcc()
>> DA_ProductAcc.UpdateCommand = cmdUpdate_ProductAcc()
>> DA_ProductAcc.DeleteCommand = cmdDelete_ProductAcc()
>>
>>
>> If (Not (ChangedRows) Is Nothing) Then
>> Try
>> SQLConn.SQLConn.Open()
>> DA_Product.Update(ChangedRows, "Product")
>> DA_ProductItem.Update(ChangedRows, "ProductItem")
>> DA_ProductAcc.Update(ChangedRows, "Product Accessories")
>> Catch ex As SystemException
>> ChangedRows.RejectChanges()
>> Throw ex
>> Finally
>> SQLConn.SQLConn.Close()
>> End Try
>> End If
>>
>> End Sub
>>
>>anybody can help me for this..
>>
>>
>>TIA
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform