Microsoft VBScript 运行时异常 (0x800A000D) 类型不匹配: 'scan'

Microsoft VBScript 运行时错误 (0x800A000D) 类型不匹配: 'scan'
<%if     Request.ServerVariables( "Content_Length ")   <>   0   then
if   request.Form( "text ") <> " "   then
dim   lysql
set   rsly=server.createobject( "adodb.recordset ")
lysql= "select   *   from   ly "
rsly.open   lysql,conn,1,3
rsly.addnew
rsly( "mainid ")=scan(request.QueryString( "id "))     <---提示这里出错
rsly( "lyname ")=scan(request.Form( "lyname "))
rsly( "text ")=scan(request.Form( "text "))
rsly.update
rsly.close
Response.Redirect( "more.asp "& "?id= "&request.QueryString( "id "))
end   if
end   if
%>


原本没有这个错误,可好象改了其他文件,还有数据库就成这样了,也找不出原由,小弟刚学ASP..高手帮忙啊

------解决方案--------------------
scan是一个function吗？
如果定义在其他文件中，该文件是否被include进来?