asp 访问MySQL数据库为何出现这样的问题 老大们都来啊 100分

gushenghua 2004-10-18 11:16:17
'=============================================================
'函数名称: CheckAccount
'用途: 检查帐号密码是否正确
'返回值: 帐号密码正确返回 帐号所属组("Admin","Common"),
' 错误返回字符串"ERROR"

Function CheckAccount(byval strConnString, byval strTableName, byval strAccount, byval strPassword)

Dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")

objConn.Open strConnString

Dim strSQL
Dim rs

strSQL = "select * from " & strTableName
strSQL = strSQL & " where ID = '"
strSQL = strSQL & strAccount & "' and Password = '"
strSQL = strSQL & strPassword & "'"

set rs=Server.CreateObject("ADODB.Recordset")
rs.open strSQL,objConn, 1, 1

if rs.RecordCount > 0 then
CheckAccount = rs("AccountGroup")

CheckAccount = LTrim(CheckAccount)
CheckAccount = RTrim(checkAccount)
else
CheckAccount = "ERROR"
end if

set objConn = nothing
set rs = nothing
End Function

明明有符合要求的数据, 为何 rs.RecordCount总返回-1啊
...全文
137 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
mouse_2004 2004-10-18
  • 打赏
  • 举报
回复
没用asp连过mysql,不过连oracle是出过类似问题,原因是oracle不支持recordcount,不知道mysql是不是,你可以试一下
明珠佩佩 2004-10-18
  • 打赏
  • 举报
回复
set rs=Server.CreateObject("ADODB.Recordset")
rs.open strSQL,objConn, 1, 3

set rs=Server.CreateObject("ADODB.Recordset")
rs.open strSQL,objConn, 3, 3
xiangyyy 2004-10-18
  • 打赏
  • 举报
回复
rs.open strSQL,objConn,3,1

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧