请看看这段代码有什么问题,为什么什么后不显示也不报错误?

egoxu 2004-11-26 09:13:02

<script language="javaScript" type="text/javascript" SRC="include/nxjs.js"></SCRIPT>

<%

response.write "<script LANGUAGE='javascript'>"

dim topmenu,rstm,secmenu,rssm

'一级类别
topmenu="select * from topmenu where id='1'"
set rstm=Server.CreateObject("ADODB.recordset")
rstm.CursorType = 3
rstm.Open topmenu,conn,1,1


if rstm.RecordCount <=0 then
Response.Write "请维护类别!"
end if

for m=1 to rstm.RecordCount

response.write "mpmenu"&mi&"=new mMenu('网站首页','/','self','image/bluedian.gif','','','');"

'二级类别


secmenu="select * from secmenu where upmod=" & rstm("id") & " order by addtime desc"
set rssm=Server.CreateObject("ADODB.recordset")
rssm.CursorType = 3
rssm.Open secmenu,conn

rssm.PageSize =8 'show num of page
result_num = rssm.RecordCount 'totle num


if result_num<=0 then

word="请维护信息!"

else
maxpage=rssm.PageCount
page=request("page")

if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if

if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if

rssm.AbsolutePage=Page

end if

if result_num<=0 then

response.write "mpmenu"&i&".addItem(new mMenuItem(' "&word&"','','',,'',null,'','','',''));"

else
for n=1 to rssm.PageSize

response.write "mpmenu"&i&".addItem(new mMenuItem(' 用户注册','/register.asp','self',false,'用户注册',null,'','','',''));"


rssm.movenext:if rssm.EOF then Exit For
next
end if
rssm.close



'一级类别
rstm.movenext:if rstm.EOF then Exit For
next
rstm.close


response.write "mwritetodocument();"
response.write "</SCRIPT>"

%>
...全文
90 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
egoxu 2004-11-26
  • 打赏
  • 举报
回复
不知道为什么,好了!!!!!
egoxu 2004-11-26
  • 打赏
  • 举报
回复
源代码没有。最起码能显示:
<script>
mwritetodocument();
</SCRIPT>
lienzhu 2004-11-26
  • 打赏
  • 举报
回复
你看源代码有没有内容,js代码在页面上是看不到的!
egoxu 2004-11-26
  • 打赏
  • 举报
回复
代码作用是读取数据库数据并组成js代码,但什么也不显示,也不报错误
资源下载链接为: https://pan.quark.cn/s/9e7ef05254f8 【久久在线FLASH系统】是一款专为久久在线网站打造的交互式Flash平台,集成了前台展示与后台管理功能,满足内容发布、管理和用户互动的需求。Flash技术曾广泛应用于网页动画和互动内容,尤其在早期互联网时代,在游戏、广告和多媒体教学等领域发挥了重要作用。该系统的核心包括以下几个关键方面: Flash技术:系统利用Flash创建动态图形、动画和交互内容,依赖Adobe Flash Player运行。其编程语言ActionScript支持面向对象开发,便于实现复杂逻辑和交互效果。 后台管理系统:作为系统的控制中心,后台支持内容上传、编辑、分类、权限设置、用户管理及数据分析,确保内容的有序更新与发布。 产品演示模块:用户可在线预览和体验产品功能,无需下载,通过交互式演示了解产品操作流程和优势。 数据库集成:系统与数据库紧密结合,用于存储Flash文件信息、用户数据及访问记录,实现高效的数据管理与检索。 安全性与优化:系统具备防止非法访问和数据泄露的安全机制,并对Flash内容进行优化,提升加载速度与用户体验。 响应式设计:尽管Flash主要用于桌面端,系统仍考虑多设备兼容性,通过响应式设计适配不同屏幕尺寸,提供一致体验。 API接口:系统支持与其他平台或服务通过API进行数据交互,如社交媒体分享、数据分析等,拓展功能边界。 用户体验:界面设计注重交互性与视觉效果,提升用户满意度和停留时间,增强平台吸引力。 版本控制:系统支持内容版本管理,便于追踪更新历史,方便内容维护与回滚。 性能监控:内置性能监控工具,实时跟踪系统负载与资源使用情况,及时发现并解决问题,保障系统稳定运行。 【久久在线FLASH系统】是一个综合性解决方案,融合了前端展示、后台管理、互动体验和数据分析等功能,体现了当时Web
资源下载链接为: https://pan.quark.cn/s/f989b9092fc5 BP神经网络轴承故障诊断系统是一种基于人工神经网络技术的智能诊断工具,专门用于识别和分析机械设备中轴承的故障情况。该系统的核心是BP神经网络(即反向传播神经网络),它能够模拟人脑的工作方式,通过学习和训练来处理复杂的非线性问题,从而对轴承的健康状态进行精准评估。 BP神经网络的基本结构由输入层、隐藏层和输出层构成。输入层接收来自传感器的信号,如振动数据或声音频率,这些信号反映了轴承的运行状态。隐藏层负责对输入数据进行特征提取和转换,将原始信号转化为更具价值的信息。输出层则输出最终的诊断结果,例如轴承是否正常、轻微磨损或严重损坏等。 在诊断过程中,数据预处理是至关重要的步骤。原始的振动或声学数据通常含有噪声,且不同传感器的数据可能缺乏可比性。因此,需要对这些数据进行滤波、归一化等处理,以提高数据质量。预处理后的数据随后被输入到BP神经网络中。在训练阶段,网络通过反向传播算法调整权重和阈值,使预测结果尽可能接近实际故障类型。这一过程利用了梯度下降法,通过计算误差梯度来更新网络参数,以最小化损失函数(通常是均方误差,用于衡量预测值与真实值之间的差异)。 BP神经网络的性能受到多种因素的影响,包括网络结构(如隐藏层的数量和每层的神经元数量)、学习率以及训练迭代次数等。优化这些参数对于提升诊断精度和速度至关重要。此外,为了验证和提升模型的泛化能力,通常采用交叉验证方法,将数据集分为训练集、验证集和测试集。其中,训练集用于训练网络,验证集用于调整网络参数,测试集则用于评估模型在未知数据上的表现。 总体而言,BP神经网络轴承故障诊断系统凭借其强大的学习和泛化能力,通过对机械设备振动和噪声数据的分析,能够实现对轴承故障的精确识别。该系统有助于提前发现设备故障隐患,减少停机时间,提高生产效率,对工业领域

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧