连接上SQL数据库后的如何判断SQL语句的执行结果

wshyzhywx

Dim Rst ,Cnn ,strCnn,sql1
strCnn="rovider=SQLOLEDB.1assword=wshyzhywx26ersist Security Info=True;User ID=sa;Data Source=WWW-AD24BF4DC0C"
Set Cnn=CreateObject("ADODB.Connection") '生成数据库连接对象
Cnn.Open strCnn '打开数据库
Set Rst=CreateObject("ADODB.Recordset") '生成记录集对象
    If cnn.State=0 Then
                Reporter.ReportEvent micFail, "testing", "连接数据库失败"
        Else
                Reporter.ReportEvent micPass, "testing", "连接数据库成功"
        End IF
sql1="select * from users where name='张三'"

根据这段代码 可以正常连上SQL数据库了,并且执行了select * from syscolumns where name='张三'这条语句
  这条语句有一条返回值, 请问我如何判断这条语句是否执行正确???怎么样判断张三条记录是存在的呢?? 应该如何写代码解决?

sidneylover

执行SELECT的语句在哪？
从你上面这段看是肯定没执行SELECT语句，sql1='""只不过赋个值
//
rst.open sql1,strcnn,2,2
msgbox rst("字段名")

sterson

Rst.open sql1 ,cnn,1,1
if not Rst.eof then
  msgbox "记录存在"
else
  msgbox "记录不存在"
end if