Thanks Erland.. I'm still stuck on this..
profiler reports this.
SQL:BatchStarting INSERT INTO dbo.Collaborator
(Lastname,Firstname,Degrees,Title,Department,Research)
Values(@Lastname,@Firstname,@Degrees,@Title,@Department,@Research) .Net
SqlClient Data Provider codesmith 2420 55 2008-06-23
10:36:45.063
The exception:
System.Data.SqlClient.SqlException was caught
Class=15
ErrorCode=-2146232060
LineNumber=1
Message="Must declare the scalar variable "@Lastname"."
Number=137
Procedure=""
Server="xxxx"
Source=".Net SqlClient Data Provider"
State=2
StackTrace:
at System.Data.SqlClient.SqlConnection.OnError(SqlException
exception, Boolean breakConnection)
at
System.Data.SqlClient.SqlInternalConnection.OnError(SqlException
exception, Boolean breakConnection)
at
System.Data.SqlClient.TdsParser.ThrowExceptionAndWarning(TdsParserStateObject
stateObj)
at System.Data.SqlClient.TdsParser.Run(RunBehavior runBehavior,
SqlCommand cmdHandler, SqlDataReader dataStream,
BulkCopySimpleResultSet bulkCopyHandler, TdsParserStateObject
stateObj)
at
System.Data.SqlClient.SqlCommand.RunExecuteNonQueryTds(String
methodName, Boolean async)
at
System.Data.SqlClient.SqlCommand.InternalExecuteNonQuery(DbAsyncResult
result, String methodName, Boolean sendToPipe)
at System.Data.SqlClient.SqlCommand.ExecuteNonQuery()
at DBUTIL.DBUtility.UpdateTable(Collaborator PassCol, String
m_sql, SqlConnection& oConn) in C:\jcp\CodeSmithGrid_sqlcommand
\App_Code\DBUtility.vb:line 131
my last version of the code. It's odd but's not
Public Function UpdateTable(ByVal PassCol As WH.Collaborator, ByVal
m_sql As String, ByRef oConn As System.Data.SqlClient.SqlConnection)
As Boolean
MyBase.oCmd.CommandText = m_sql
MyBase.oCmd.CommandType = CommandType.Text
MyBase.oCmd.Parameters.Add("@Lastname",
SqlDbType.VarChar).Value = PassCol.Lastname
MyBase.oCmd.Parameters.Add("@Firstname",
SqlDbType.VarChar).Value = PassCol.Firstname
MyBase.oCmd.Parameters.Add("@Degrees",
SqlDbType.VarChar).Value = PassCol.Degrees
MyBase.oCmd.Parameters.Add("@Title",
SqlDbType.VarChar).Value = PassCol.Title
MyBase.oCmd.Parameters.Add("@Department",
SqlDbType.VarChar).Value = PassCol.Department
MyBase.oCmd.Parameters.Add("@Research",
SqlDbType.VarChar).Value = PassCol.Research
Dim x As String =
MyBase.oCmd.Parameters("@Lastname").Value.ToString()
UpdateTable = False
Try
If MyBase.CheckDBConnected(oConn) Then
If MyBase.oCmd.ExecuteNonQuery() <> 0 Then
UpdateTable = True
m_MessageResult = "DBok"
Else
m_MessageResult = "Execute command
failed(dbu)..."
End If
End If
Catch ex As Exception
m_MessageResult = "DBmessage:" & ex.Message
End Try
MyBase.oCmd.Dispose()
End Function
I've used this same code before with SP many times.. only clear
difference is CommandType.Text
Thanks for any help.