代码:
public int Execute(string str)
{
OleDbCommand Comm = new OleDbCommand(str, Conn); int R = Comm.ExecuteNonQuery(); 错误提示信息:至少一个参数没有被指定值。
Comm.Dispose();
return R;
}
在下查了查msdn,“ExecuteNonQuery()”中并没有参数值啊,这是怎么回事?
...全文
23318打赏收藏
至少一个参数没有被指定值
帮忙看看下面的代码那里错了。 代码: public int Execute(string str) { OleDbCommand Comm = new OleDbCommand(str, Conn); int R = Comm.ExecuteNonQuery(); 错误提示信息:至少一个参数没有被指定值。 Comm.Dispose(); return R; } 在下查了查msdn,“ExecuteNonQuery()”中并没有参数值啊,这是怎么回事?
Imports System
Imports System.Data
Imports System.Data.OleDb
Public Class 登录界面
Public gzkh As String '工作卡号 对应医师号
Public gzkl As String '工作口令
Public gzry As String '工作人员
Public myconn As OleDbConnection
Public connstr As String
' Public myselect As String
'打开数据库表
Public Sub opensjkb()
'dim
connstr = "Provider=Microsoft.Jet.OleDB.4.0;Data Source=.\住院医生工作站数据.mdb"
myconn = New OleDbConnection(connstr)
myconn.Open()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Hide()
更改口令.Show()
End Sub
'确定登录
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
If TextBox3.Text = "" Or TextBox1.Text = "" Or TextBox2.Text = "" Then
MsgBox("信息不完整,请将信息填写完整")
Else
Call opensjkb() '调用住院医生表
gzkh = TextBox3.Text
gzkl = TextBox1.Text
gzry = TextBox2.Text
Dim myselect As String = "select top 1 * from 住院医生 where 医师号='" & gzkh & " 'and 工作口令='" & gzkl & " ' and 医生姓名='" & gzry & " '"
Dim mycommd As OleDbCommand = New OleDbCommand(myselect, myconn)
mycommd.ExecuteNonQuery()
Dim myreaders As OleDbDataReader = mycommd.ExecuteReader()
If myreaders.Read() = True Then
gzkh = TextBox3.Text
gzkl = TextBox1.Text
Me.Hide()
zyysgzz.Show()
Else
MsgBox("工作卡号或者工作口令错误,请重新输入")
End If
myconn.Close()
End If
End Sub
mycommd.ExecuteNonQuery() 至少一个参数没有被指定值。 是什么问题呢?