level 5
Sunny02013
楼主
我想用ado连接sql数据库查询
代码如下
Private Sub Command1_Click()
Adodc1.Visible = False
Adodc1.RecordSource = "select * from employees where City LIKE '%+ Text1.text +%' "
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1.Recordset
DataGrid1.Refresh
End Sub
Private Sub Form_Load()
Text1.Text = ""
End Sub
但执行搜索后只显示列名 没有显示任何结果 但输入的在查询分析器里能得到结果
请高手看看代码有没有问题
2013年07月22日 06点07分
1
代码如下
Private Sub Command1_Click()
Adodc1.Visible = False
Adodc1.RecordSource = "select * from employees where City LIKE '%+ Text1.text +%' "
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1.Recordset
DataGrid1.Refresh
End Sub
Private Sub Form_Load()
Text1.Text = ""
End Sub
但执行搜索后只显示列名 没有显示任何结果 但输入的在查询分析器里能得到结果
请高手看看代码有没有问题