类型不匹配: 'getrecordset'

<!--#include file="adofunction.asp"-->
<%
userID=trim(request("ID"))
userPassword=trim(request("Password"))
if (userid="" or userpassword="") then
response.redirect"主页2.html"
response.end
end if
dim strsql,rs
strsql="select * from user where id='"&userid&"'"
strsql=strsql & "and password='"&userpassword&"'"
set rs=getrecordset(strsql)
if rs.eof then
response.write"用户名或密码错误"
response.end
end if
response.cookies("id")=userid
response.cookies("password")=userpassword
response.cookies("passed")="passed"
response.redirect"5-7.asp"
%>

错误提示具体是：
if rs.eof then
response.write"用户名或密码错误"
response.end
end if[0]Script error detected at line 29,col[0].
Descrip

ASP类型不匹配: 'cint'？？？？？？？？ 类型不匹配: 'UBound' 类型不匹配: 'getdate' -SQLSERVER 类型不匹配: 'getrecordset' ASP：类型不匹配: 'show' 类型不匹配：’session‘ asp 类型不匹配 错误:类型不匹配 13类型不匹配 VB类型不匹配