<%
set rs=server.CreateObject("ADODB.Recordset")
if test_id=0 then '如果是第一次进入从第一题开始
if optA_count<>0 then
sql=" select * from A_opt where opt_test='A' and opt_num=1 "
end if
if optB_count<>0 then
sql=" select * from B_opt where opt_test='B' and opt_num=1 "
end if
if optC_count<>0 then
sql=" select * from C_opt where opt_test='C' and opt_num=1 "
end if
if optD_count<>0 then
sql=" select * from D_opt where opt_test='D' and opt_num=1 "
end if
if optE_count<>0 then
sql=" select * from E_opt where opt_test='E' and opt_num=1 "
end if
if optF_count<>0 then
sql=" select * from F_opt where opt_test='F' and opt_num=1 "
end if
if optG_count<>0 then
sql=" select * from G_opt where opt_test='G' and opt_num=1 "
end if
else
if optA_count<>0 then
sql=" select * from A_opt where opt_test='A' and opt_num="&test_id&" "
end if
'response.Write(optA_count)
'response.Write(test_id)
'response.End()
if optB_count<>0 then
sql=" select * from B_opt where opt_test='B' and opt_num="&test_id&" "
end if
if optC_count<>0 then
sql=" select * from C_opt where opt_test='C' and opt_num="&test_id&" "
end if
if optD_count<>0 then
sql=" select * from D_opt where opt_test='D' and opt_num="&test_id&" "
end if
if optE_count<>0 then
sql=" select * from E_opt where opt_test='E' and opt_num="&test_id&" "
end if
if optF_count<>0 then
sql=" select * from F_opt where opt_test='F' and opt_num="&test_id&" "
end if
if optG_count<>0 then
sql=" select * from G_opt where opt_test='G' and opt_num="&test_id&" "
end if
end if
rs.open sql,conn,1,1
%>
Microsoft VBScript 运行时错误
错误 '800a000d'
类型不匹配: 'optB_count'
/test_Check.asp，行 74
这个可能因为什么原因啊！各位请帮帮忙啊！
还有：
str="select * from test_tm where id=1"
set rs=conn.execute(str)
这种方式访问数据库，和上面的方式有什么区别啊！
------解决方案--------------------
optB_count在哪里定义的？
用参数 1,1打开的话
set rs=conn.execute(str)
相当于 rs.open sql,conn,1,1
------解决方案--------------------
方法 1： IIS 中配置 MicrosoftProjectCentral 应用程序设置
IIS 中配置 MicrosoftProjectCentral 应用设置。 要这样做, 请按照下列步骤操作： 1. 启动 Internet 服务管理器, 或打开包含 IIS 管理单元 Microsoft 管理控制台 (MMC)。
2. 展开 服务器名称 其中 服务器名称 是服务器的名称。
3. 展开 默认 Web 站点 。
4. 右键单击 ProjectCentral , 然后单击 属性 。
5. 单击 虚拟目录 选项卡。 ApplicationSettings@@ , 下单击 创建 按钮将要 应用框 旁边。
6. 验证是 应用程序名 框中显示 ProjectCentral 和 < DefaultWebSite@@ > \ProjectCentral 向 启动指向 旁显示。
7. 在 执行权限 中, 单击 脚本和可执行文件 （在 Microsoft Windows 2000） 或 （在 Microsoft Windows NT 4.0), 执行 （包括脚本） 如果它不被选中。
8. 单击 确定 。
9. 退出 Internet 服务管理器或退出 IIS 管理单元。
方法 2： 包括 MicrosoftProject 中央 Web 站点的 URL 中的默认 Web 站点端口数
在浏览, 的 地址 栏键入冒号 （:） 跟由默认 Web 站点在统一资源定位器 (URL) 的 MicrosoftProjectCentralWeb 站点中服务器名称之后使用端口号。
例如, 地址 栏中以下类型的浏览器并连接到 MicrosoftProjectCentralWeb 站点, 其中 服务器名称 是 MicrosoftProjectCentralServer 和 端口号 的名称是由默认 Web 站点使用端口号：
http:/ / 服务器名称 : 端口号 / ProjectCentral