20分,小问题,sql查询后, 如何知道是否正确返回?

[gy8654]

一、
strsql = "select flag,trn_amt from jnl where acct_no='" & _
Text1.Text & "' and trn_date='" & trn_date & "';"
Set db = DBEngine.Workspaces(0).OpenDatabase("d:\项目工程\acct_bal.mdb")
Set rst = db.OpenRecordset(strsql)

执行以上程序后, 如何知道返回是否找到记录.

二、
还有一个小问题, 定义事务, 是否只要用 begintran, committran 就可以了滑有其它的说法吧?

[wdmm]

if not rst.eof then
‘可循环读出记录集
do until rs.eof
····
rst.movenext
loop
else
msgbox "没有找到相关信息！",0,"信息提示"

enfif

Workspace.BeginTrans
Workspace.CommitTrans

[寒星]

1。If rs.eof then '未找到匹配的记录
2。Workspace(0).BeginTrans
Workspace(0).CommitTrans
or Workspace(0).Rollback

[寒星]

报歉，兄弟我没用过informix.

[gy8654]

???楼上的两位, 真的就没有如informix中的 sqlcode=sqlnotfound 语名吗？