有如下语句,连接到数据库:
Set cn = Nothing
sql1 = "Provider=OraOLEDB.Oracle;Data Source=dbname;User Id=username;Password=password"
cn.Open sql1
执行查询:
sql = "select admit_no,corp_name from baisadmin.t_name_check_reg where corp_name like '%" & Text1.Text & "%'"
rs.Open sql, cn
问题:
rs可以执行MoveNext和Movelast,但执行MovePrevious和MoveFirst无反映,请问问题出在哪里?
Set cn = Nothing
sql1 = "Provider=OraOLEDB.Oracle;Data Source=dbname;User Id=username;Password=password"
cn.Open sql1
执行查询:
sql = "select admit_no,corp_name from baisadmin.t_name_check_reg where corp_name like '%" & Text1.Text & "%'"
rs.Open sql, cn
问题:
rs可以执行MoveNext和Movelast,但执行MovePrevious和MoveFirst无反映,请问问题出在哪里?
试试
rs.Open strSQl, cn, adOpenDynamic, adLockOptimistic别忘了
cn.CursorLocation=adUseClient
rs.Open sql, conn, adOpenDynamic, adLockOptimistic