Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Sql VB.Net-ExecuteReader:CommandText属性尚未初始化_Sql_Vb.net_Executereader - Fatal编程技术网

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()