<%
sub gc(str)               str让输入什么   BT等于的就是什么
set rs=server.createobject("adodb.recordset")
exec="select * from gsjj where bt='str'"               好象是这里不正确   格式应该怎么写
rs.open exec,conn,1,1
response.Write""&rs("nr")&""
rs.close
set rs=nothing
end sub
%>

我在页面调用<% call gc(lxfs) %>

exec="select * from gsjj where bt='"&str&"'"

这个我使拉
错误是 发生以外
response.Write""&rs("nr")&""                  这一行

我这边测试没有错误，楼主检查是否插入数据库链接文件，还有是不是在开关数据库表时操作的。以下是我测试代码，已通过测试
<!--#include file="conn.asp"-->
<%
sub gc(str)               'str让输入什么   BT等于的就是什么
set rs=server.createobject("adodb.recordset")
exec="select * from gsjj where bt='" &str& "'"               '好象是这里不正确   格式应该怎么写
rs.open exec,conn,1,1
response.Write""&rs("nr")&""
rs.close
set rs=nothing
end sub
%>
<%
call gc(3)
%>

我的数据库连接没有问题   
<%
sub gc(str)               'str让输入什么   BT等于的就是什么
set rs=server.createobject("adodb.recordset")
exec="select * from gsjj where bt='" &str& "'"               '好象是这里不正确   格式应该怎么写
rs.open exec,conn,1,1                                               str是字段bt的值
response.Write""&rs("nr")&""
rs.close
set rs=nothing
end sub
%>

<%
call gc(str)      这里的str是数据库里的字段值   是不是给这个有关系啊
%>

下面是不带参数的正确
<%
sub gc()               'str让输入什么   BT等于的就是什么
set rs=server.createobject("adodb.recordset")
exec="select * from gsjj where bt=‘gsjj’“            '好象是这里不正确   格式应该怎么写
rs.open exec,conn,1,1                                               str是字段bt的值
response.Write""&rs("nr")&""
rs.close
set rs=nothing
end sub
%>

<%
call gc()      这里的str是数据库里的字段值   是不是给这个有关系啊
%>

我不知道怎么传上去文件
我的QQ312665314
在线

问题解决    感谢 madpbpl
<%
sub gc(str)               'str让输入什么   BT等于的就是什么
set rs=server.createobject("adodb.recordset")
exec="select * from gsjj where bt='" &str& "'"               '好象是这里不正确   格式应该怎么写
rs.open exec,conn,1,1                                               str是字段bt的值
response.Write""&rs("nr")&""
rs.close
set rs=nothing
end sub
%>

<%
call gc(“str”)      这里的str是数据库里的字段值   是不是给这个有关系啊
%>

错了" &str& "'"