0

我正在使用下面的代码使用传递给它的参数的查询从访问数据库返回一些数据:

    Dim con As OleDbConnection = New OleDbConnection(GlobalVariables.connectionString)
    Dim cmd As New OleDbCommand
    cmd.CommandType = CommandType.StoredProcedure
    cmd.CommandText = "Q_VIEW_SINGLE_TEST"
    cmd.Parameters.Add("@TEST_ID", OleDbType.VarChar).Value = "17"  ' Add Parameter
    cmd.Connection = con
    con.Open()
    Dim da As OleDbDataAdapter = New OleDbDataAdapter(cmd)
    Dim ds As DataSet = New DataSet()
    da.Fill(ds, "Table1")
    dt = ds.Tables("Table1")

    MsgBox(ds.Tables(0).Rows(0)(3))

然而,它只是不断返回旧数据(因此当值等于 1 时返回的数据:

   cmd.Parameters.Add("@TEST_ID", OleDbType.VarChar).Value = "1"

我在这里想念什么?

4

0 回答 0