|
#2
风吹过b2016-11-03 15:21
|
程序代码：Public Function ExecuteNonQueryCommand(ByVal strSQL As String, ByVal params() As SqlParameter) As SqlCommand
Dim oconn As SqlConnection = GetConnection()
Dim command As New SqlCommand(strSQL, oconn)
command.CommandType = CommandType.Text
For i As Integer = 0 To params.Length - 1
command.Parameters.Add(params(i))
Next
oconn.Open()
Dim retval As Integer = command.ExecuteNonQuery()
oconn.Close()
oconn.Dispose()
Return command
End Function
Dim oconn As SqlConnection = GetConnection()
Dim command As New SqlCommand(strSQL, oconn)
command.CommandType = CommandType.Text
For i As Integer = 0 To params.Length - 1
command.Parameters.Add(params(i))
Next
oconn.Open()
Dim retval As Integer = command.ExecuteNonQuery()
oconn.Close()
oconn.Dispose()
Return command
End Function
我想调用这个类来执行以下SQL
Dim StrSql As String = "Delete from SysUser where NTIDName='Yu_yuk' and ValidityDate='07/25/2017'"
可以指点一下吗？SqlParameter 我不懂得怎么写