Sql VB.Net-ExecuteReader:CommandText属性尚未初始化
我知道关于这个话题有一些线索,但由于某种原因,这些东西中没有一个对我不起作用。这就是我的代码:Sql VB.Net-ExecuteReader:CommandText属性尚未初始化,sql,vb.net,executereader,Sql,Vb.net,Executereader,我知道关于这个话题有一些线索,但由于某种原因,这些东西中没有一个对我不起作用。这就是我的代码: Dim strAccSQL As String = "SELECT nUserNo FROM dbo.tUser WHERE sUserID='" & AccountID.Text & "';" Dim catCMDAcc As SqlCommand = New SqlCommand(strAccSQL, AccCon) Dim myAccountRea
Dim strAccSQL As String = "SELECT nUserNo FROM dbo.tUser WHERE sUserID='" & AccountID.Text & "';"
Dim catCMDAcc As SqlCommand = New SqlCommand(strAccSQL, AccCon)
Dim myAccountReader As SqlDataReader = catCMDAcc.ExecuteReader()
While myAccountReader.Read
AccountNo.Text = myAccountReader(0)
End While
myAccountReader.Close()
Con.Close()
Con.Open()
Dim strSQL2 As String
Dim catCMD As SqlCommand = New SqlCommand(strSQL2, Con)
Dim myReader As SqlDataReader = catCMD.ExecuteReader()
InfoTextBox.Text &= Environment.NewLine & Now & " Account: " & AccountID.Text & " Found"
CharacterName.Properties.Items.Clear()
While myReader.Read()
CharacterName.Properties.Items.Add(myReader(0))
End While
myReader.Close()
AccCon.Close()
Con.Close()
有人知道我的问题吗?如errormessage所述,您的CommandText在此为空字符串(strSQL2): 不能执行空sql子句
Dim strSQL2 As String
Dim catCMD As SqlCommand = New SqlCommand(strSQL2, Con)
Dim myReader As SqlDataReader = catCMD.ExecuteReader()