0

我从HERE复制了一些代码，但出现错误：“')' 附近的语法不正确。但我看不出这段代码有什么问题

Dim conString As String = "Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\users.mdf;Integrated Security=True;User Instance=True"
        Dim con As New SqlConnection(conString)
        con.Open()
        Try
            Dim dataAdapter1 As New SqlDataAdapter( _
                New SqlCommand("SELECT subject, info, username, status FROM(problems) WHERE (username =" & userName & ")", con))
            Dim ds As New DataSet("DataSetMyProbs")
            ds.Tables.Add("UserProbs")
            dataAdapter1.Fill(ds.Tables("UserProbs")) '//This is where i get the error'
            Me.bsMyProblems.DataSource = ds.Tables("UserProbs")
            Dim dataAdapter2 As New SqlDataAdapter( _
                New SqlCommand("SELECT dep, pcid, username, status, extraInfo FROM(deployments) WHERE (username = " & userName & ")", con))
            ds.Tables.Add("UsersDepl")
            dataAdapter2.Fill(ds.Tables("UserDepl"))
            Me.bsMyDepl.DataSource = ds.Tables("UserDepl")
        Catch ex As Exception
            MessageBox.Show(ex.ToString)
        Finally
            con.Dispose()
        End Try
4

2 回答 2

1

我假设可能由于您的查询，您的参数 userName 是字符串吗？您可能需要为字符串加上单引号，还要在“FROM”和表名之间留一个空格

Dim dataAdapter1 As New SqlDataAdapter( _
            New SqlCommand("SELECT subject, info, username, status FROM [problems] WHERE (username ='" & userName & "')", con))
于 2012-05-08T01:53:33.090 回答
0

问题出在您的 SQL 语句中

它应该是：

SELECT subject, info, username, status FROM [problems] ....
于 2012-05-08T01:53:18.597 回答