1180
社区成员
- 主页
在单击查询按钮以后，如何先后在两个表中查询数据？
VB中,在单击查询按钮以后，先在第一个表中查询所需数据，并显示查询结果。
如果没有找到任何数据，再到第二个表中查找，并给出提示，数据是否找到！
如果没有找到任何数据，再到第二个表中查找，并给出提示，数据是否找到！
...全文
请发表友善的回复…
发表回复
lihonggen0 2004-10-20
最好还是在后台数据库中处理，一次查询出来
lihonggen0 2004-10-20
Dim Rs As New ADODB.Recordset
Rs.CursorLocation = adUseClient
Rs.Open "select * from employees", conn, adOpenDynamic, adLockOptimistic
If Rs.RecordCount=0 then
Rs.close
Rs.Open "select * from table2", conn, adOpenDynamic, adLockOptimistic
If Rs.RecordCount=0 then
msgbox "数据没找到!"
end if
...
end if
Rs.CursorLocation = adUseClient
Rs.Open "select * from employees", conn, adOpenDynamic, adLockOptimistic
If Rs.RecordCount=0 then
Rs.close
Rs.Open "select * from table2", conn, adOpenDynamic, adLockOptimistic
If Rs.RecordCount=0 then
msgbox "数据没找到!"
end if
...
end if
jiangjian01 2004-10-20
请教各位大侠，如何实现？