51Testing软件测试论坛

标题: 连接上SQL数据库后的如何判断SQL语句的执行结果 [打印本页]

作者: wshyzhywx 时间: 2009-3-24 23:32
标题: 连接上SQL数据库后的如何判断SQL语句的执行结果
Dim Rst ,Cnn ,strCnn,sql1
strCnn="

rovider=SQLOLEDB.1

assword=wshyzhywx26

ersist 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 时间: 2009-3-25 10:22
执行SELECT的语句在哪？
从你上面这段看是肯定没执行SELECT语句，sql1='""只不过赋个值
//
rst.open sql1,strcnn,2,2
msgbox rst("字段名")

作者: sterson 时间: 2009-3-25 15:44
Rst.open sql1 ,cnn,1,1
if not Rst.eof then
msgbox "记录存在"
else
msgbox "记录不存在"
end if

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)