您所在位置：主题：[讨论]急求解决 vb高手请指点 跪求
小小雪儿003
[专家分：0] 发布于 2008-12-30 00:38:00
Private Sub Command1_Click()
Adodc1.RecordSource = "SELECT * FROM zongk WHERE 物料编号='" & Text1.Text & "'"
Adodc1.Refresh
End Sub
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Private Sub Command1_Click()
Adodc1.RecordSource = "SELECT * FROM zongk "
Adodc1.Refresh
End Sub
一段非常简单的查询就是提示对象 'refresh' 的方法 'iadodc' 失败！
我adodc1连接的是sql2000数据库 adodc1连接属性Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Data Source=jinwang 记录源用2-adcmdtable 表选择zongk
Adodc1.RecordSource = "SELECT * FROM zongk WHERE 物料编号='" & Text1.Text & "'"
Adodc1.Refresh
End Sub
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Private Sub Command1_Click()
Adodc1.RecordSource = "SELECT * FROM zongk "
Adodc1.Refresh
End Sub
一段非常简单的查询就是提示对象 'refresh' 的方法 'iadodc' 失败！
我adodc1连接的是sql2000数据库 adodc1连接属性Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Data Source=jinwang 记录源用2-adcmdtable 表选择zongk
