Question

关于ASP用SUB调用数据库查询

数据库是SQL,连接是正常的.
下面是示例代码
<!--#include file="Conn.Asp"-->
<%
sub sql_conn(q)
set rs=server.createobject("adodb.recordset")
rs.open q,conn,1,1
end sub

sub sql_close
rs.close
set rs=nothing
end sub

sql="select * from table"
call sql_conn(sql)
name=rs("name")
response.write(name)
call sql_close
%>

出现了
Microsoft VBScript 运行时错误 错误 '800a000d'

类型不匹配: 'rs'

请问这样的调用该怎么写.

Answer 1

在调用之前,先定义一个rs,因为过程中的rs是局部变量,是不能让外部访问的.
在
sql="select * from table"
call sql_conn(sql)
name=rs("name")
response.write(name)
call sql_close
前,加:
dim rs
就可以了.