错误 '800a000d'
<%
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 和 端口号 的名称是由默认 W