UC知道VB中form子句语法错误，大家帮帮忙啊~`急，在线等
来源：百度知道 编辑：UC知道 时间：2024/06/20 13:37:58
运行时总是提示form子句语法错误，点调试，提示对象Refresh的方法iadodc失败。以下是代码，请大家帮忙看下是哪的问题，谢谢大家了
Private Sub Command1_Click()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\机票预定\用户.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select 用户名 where 类型 like '" & Text18 & "%'"
Adodc1.Refresh '对查询更新
DataGrid1.Refresh
End Sub
我上面查询语句刚写错了，应该是这样的：
Adodc1.RecordSource = "select 用户名 from 用户 where 用户名 like '" & Text18 & "%'"
Private Sub Command1_Click()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\机票预定\用户.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select 用户名 where 类型 like '" & Text18 & "%'"
Adodc1.Refresh '对查询更新
DataGrid1.Refresh
End Sub
我上面查询语句刚写错了，应该是这样的：
Adodc1.RecordSource = "select 用户名 from 用户 where 用户名 like '" & Text18 & "%'"
Private Sub Command1_Click()
dim sql
sql="select 用户名 where 类型 like '" & Text18 & "%'"
dim con as New System.Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\机票预定\用户.mdb;Persist Security Info=False")
dim ds as new System.Data.DataSet
Dim adpt As New Data.OleDb.OleDbDataAdapter(sql,con)
adpt.Fill(ds)
me.DataGrid1.DataSource=ds.Tables(0).DefaultView;
Me.DataGrid1.DataBind()
End Sub
......你的sql语句根本没有from 表名这个语句......
你既然是模糊查询 就要有%%。