急。。。。数据库execute方法 执行后返回个什么信息？？

Question

我是这样定义的：
    dim db as DAo.database
dim sqlstr as string
dim netpath as stringSet DB = OpenDatabase(NetPath)
SQLstr = "select * from table1 where no1=" & Text2.text
  db.execute sqlstr
  我想知道select的结果是不是为空，怎么办？
  也不知道db.execute sqlstr返回的是什么信息，这个语句直接在库里操作了。最后给我的是什么信息，我想根据此信息来判断有没有当前选的记录....

Answer 1

db.execute sqlstr返回的是一个记录集，“根据此信息来判断有没有当前选的记录”不是很明白你的意思，记录集都给你了，你想怎么操作就怎么操作。

Answer 2

想知道结果在窗体上放上一个MSFlexGrid，把记录集赋值给它的DataSource

Answer 3

判断selectr的结果是否为空，你可以在execute后加个　 do whiel not rs.eof then a=1 
loop 单步执行，如果rs.eof为true则没有找到记录

Answer 4

我是这样定义的：
    dim db as DAo.database
dim sqlstr as string
dim netpath as stringSet DB = OpenDatabase(NetPath)
SQLstr = "select * from table1 where no1=" & Text2.text
dim Rs as recordset
set rs=  db.execute sqlstr
if rs.eof then
    '没有记录
else
    '有记录
endif

Answer 5

判断RecordSet是否返回有记录，可用RecordCount属性，即简单又方便。

Answer 6

想知道是否有結果，請加個datagrid或msflixgridset datagrid.datasource=db
或
set msflixgrid.datasource=db
如果發生變化，它會在表中顯示出來的。

Answer 7

dim db as DAo.database
dim sqlstr as string
dim netpath as string
dim mRst As New ADODB.RecordsetmRst.CursorLocation = adUseClient
Set DB = OpenDatabase(NetPath)
SQLstr = "select * from table1 where no1=" & Text2.text
Set mRst = db.execute sqlstr
If mRst.Bof And mRst.Eof Then
   Msgbox "记录集空"
Else
   Msgbox "记录集非空"
End If