34,837
社区成员




sql = "select * form table1 where id=300"
rs.Open sql, cn, 1, 3
If rs.RecordCount > 0 Then
MsgBox "存在id=300的记录!", 48, "信息提示"
else
MsgBox "没有id=300的记录!", 48, "信息提示"
End IF
--以下为PB的写法:
long i
select count(*) into :i form table1 where id = 300;
if i > 0 then
select * form table1 where id = 300;
else
messagebox('系统提示','没有id=300的记录!')
end if