G
Guest
Why do I get an Identifier Expected Compiler Error in the following function
Function SubmitUpdate(ByVal row As DataRow, ByVal cmd As
OleDbCommand) As Integer
Dim pc As OleDbParameterCollection = cmd.Parameters
pc("CateroryID_Name").Value = row("CategoryID")
pc("CateroryName_New").Value = row("CategoryName")
pc("Description_New").Value = row("Description")
' THE FOLLOWING LINE CAUSES AN IDENTIFIER EXPECTED COMPILER ERROR
pc.("CategoryID_Orig").Value = row("CategoryID"),
DataRowVersion.Original)
pc.("CategoryName_Orig").Value = row("CategoryName",
DataRowVersion.Original)
pc.("Description_Orig").Value = row("Description",
DataRowVersion.Original)
Return cmd.ExecuteNonQuery
End Function
Function SubmitUpdate(ByVal row As DataRow, ByVal cmd As
OleDbCommand) As Integer
Dim pc As OleDbParameterCollection = cmd.Parameters
pc("CateroryID_Name").Value = row("CategoryID")
pc("CateroryName_New").Value = row("CategoryName")
pc("Description_New").Value = row("Description")
' THE FOLLOWING LINE CAUSES AN IDENTIFIER EXPECTED COMPILER ERROR
pc.("CategoryID_Orig").Value = row("CategoryID"),
DataRowVersion.Original)
pc.("CategoryName_Orig").Value = row("CategoryName",
DataRowVersion.Original)
pc.("Description_Orig").Value = row("Description",
DataRowVersion.Original)
Return cmd.ExecuteNonQuery
End Function