asp新手求助。。网页登陆代码出了问题

我的代码...

<!--#INCLUDE file="ADOFunction.asp"-->
<%
UserId=Trim(Request.form("username"))
UserPassword=Trim(Request.form("password"))
if(UserId=""or UserPassword="")then
response.write "<script>alert('请输入用户名和密码');location.href='home.html';</script>"
Response.End
End if
set RS=server.createobject("adodb.recordset")
StrSQL="SELECT*FROM info where Username='"&UserId&"'"
StrSQL=StrSQL&"AND Password='"&UserPassword&"'"
Set RS=GetRecordset(StrSQL)
if RS.EOF then
      response.write"用户名或密码错误"
      response.End
      end if
  Response.Cookies("Username")=UserId
  Response.Cookies("Password")=UserPassword
  Response.Cookies("passed")="Passed"
  Response.Redirect"homedenglu.asp"
  %>


错误提示：
类型不匹配: 'GetRecordset'

哪位高手能够帮助我一下  谢谢谢谢谢谢~~~~~