水晶报表9.2+ASP,控件显示一个灰色的界面,数据无法正常显示
<!--#include file="conn.asp"-->
<%
DIM SQLstr
dim reportname
dim path
'dim conn
set session("oRs")=Server.CreateObject("ADODB.Recordset")
set oADORecordset=Server.CreateObject("ADODB.Recordset")
set xmldoc=Server.CreateObject("MSXML2.DOMDocument")
SQLstr = "select * from cust"
oADORecordset.Open SQLstr,conn,1,1
oADORecordset.Save xmldoc,1
oADORecordset.Close
session("oRs").Open xmldoc
'On Error Resume Next
reportname="SMR004R03.rpt"
Path=Request.ServerVariables("PATH_TRANSLATED")
If Not IsObject (session("oApp")) Then
Set session("oApp") = Server.CreateObject("CrystalRuntime.Application")
End If
f IsObject(session("oRpt")) then
Set session("oRpt") = nothing
End if
Set session("oRpt")=session("oApp").OpenReport(Server.MapPath(reportname),1)
session("oRpt").MorePrintEngineErrorMessages = False
session("oRpt").EnableParameterPrompting = False
Set oRptTable = session("oRpt").Database.Tables.Item(1)
oRptTable.SetDataSource session("oRs"), 3
session("oRpt").ReadRecords
If Err.Number <> 0 Then
Response.Write "<SCRIPT LANGUAGE=javascript>alert('An Error has occured on the server in attempting to access the data source " & Err.Description & "')</SCRIPT>"
Else
If IsObject(session("oPageEngine")) Then
set session("oPageEngine") = nothing
End If
set session("oPageEngine") = session("oRpt").PageEngine
End If
%>
<SCRIPT LANGUAGE="VBScript">
<!--
Sub Page_Initialize()
Dim webBroker
Set webBroker = CreateObject("WebReportBroker9.WebReportBroker")
if ScriptEngineMajorVersion < 2 then
window.alert "IE 3.02 users on NT4 need to get the latest version of VBScript or install IE 4.01 SP1. IE 3.02 users on Win95 need DCOM95 and latest version of VBScript, or install IE 4.01 SP1. These files are available at Microsoft's web site."
else
Dim webSource
Set webSource = CreateObject("WebReportSource9.WebReportSource")
webSource.ReportSource = webBroker
webSource.URL="http://127.0.0.1/tt/tt.rpt"
CRViewer.ReportSource =webSource
end if
CRViewer.ViewReport
window.focus
End Sub
-->
</SCRIPT>
<body topmargin="0" leftmargin="0" bottomMargin=0 scrolling="no" onload="Page_Initialize()">
<object classid=CLSID:2DEF4530-8CE6-41c9-84B6-A54536C90213 height="100%"
id=CRViewer width="100%" codebase="/viewer9/activeXViewer/activexviewer.cab#Version=9,2,0,442" align="top">
<param name="DisplayGroupTree" value="0" />
<param name="DisplayToolbar" value="-1" />
<param name="EnableGroupTree" value="0" />
<param name="EnableNavigationControls" value="-1" />
<param name="EnableStopButton" value="0" />
<param name="EnablePrintButton" value="-1" />
<param name="EnableZoomControl" value="-1" />
<param name="EnableCloseButton" value="0" />
<param name="EnableProgressControl" value="-1" />
<param name="EnableSearchControl" value="-1" />
<param name="EnableRefreshButton" value="0" />
<param name="EnableDrillDown" value="0" />
<param name="EnableAnimationControl" value="1" />
<param name="EnableSelectExpertButton" value="0" />
<param name="EnableToolbar" value="-1" />
<param name="DisplayBorder" value="0" />
<param name="DisplayTabs" value="0" />
<param name="DisplayBackgroundEdge" value="-1" />
<param name="SelectionFormula" value />
<param name="EnablePopupMenu" value="-1" />
<param name="EnableExportButton" value="-1" />
<param name="EnableSearchExpertButton" value="0" />
<param name="EnableHelpButton" value="0" />
</object>
相关推荐
动网论坛 水晶黑魅
动网论坛 水晶黑魅
SSRF漏洞从原理到实战:零基础掌握服务端请求伪造攻防
服务端请求伪造(SSRF)是一种常见的Web安全漏洞,其核心原理在于服务器对用户提供的请求目标(如URL、IP)缺乏有效校验,导致攻击者能够诱导服务器向内部或外部任意地址发起请求。从技术价值看,SSRF的危害性极大,它不仅是内网渗透的跳板,还能与云元数据服务、Redis未授权访问等漏洞形成组合攻击链,最终可能导致远程代码执行(RCE)或云服务器接管。在应用场景上,SSRF常隐藏于网页抓取、文件上传、PDF生成、Webhook回调等需要服务器发起外部请求的功能中。理解SSRF的挖掘方法、绕过技巧及防御策略,是
CSRF(跨站请求伪造)和SSRF(服务端请求伪造)漏洞复现:风险与防护方法
CSRF漏洞指的是攻击者利用受害者的身份,在其不知情的情况下发送恶意请求给目标网站。由于目标网站无法区分恶意请求和正常请求,因此会执行该请求。这使得攻击者能够以受害者的名义执行一些不被授权的操作,例如更改密码、发表言论、转账等。不过我这里是测试就直接在浏览器打开脚本复现成功,其他类型的攻击方式操作也是这样。SSRF漏洞指的是攻击者通过操纵目标Web应用程序中的请求来发起伪造请求。攻击者利用这种漏洞可以访问应用程序所在服务器上的本地资源,或者攻击内部网络中的其他系统,并执行恶意操作。
从注意力到行动 pdf Agent
从注意力到行动 pdf
同步电机与构网型变流器的频率稳定特性及多时间尺度交互机理研究(Simulink仿真实现)
内容概要:本文系统解读了一套完整的多机器人路径规划(MAPF)MATLAB代码库,重点围绕优先级规划算法展开,涵盖从地图解析、拓扑构建、路径规划、冲突消解到可视化呈现的全流程。文章提出四层架构设计:几何层负责地图解析与栅格化;拓扑层构建四邻域图与Petri网模型;调度层实现基于动态边权膨胀的优先级路径规划与时间同步冲突消解;呈现层完成动画与视频输出。核心创新包括动态边权膨胀机制避免硬封锁导致的虚假不可解、节点预留历史实现高效冲突查询、几何惩罚驱动的局部同步提升效率,以及Petri网双阶段优化支持解的存在性与最优性分离判断。框架兼顾实用性与可扩展性,适用于大规模智能体场景。; 适合人群:具备MATLAB编程基础,从事机器人、自动化、智能交通或路径规划相关研究的科研人员与研究生。; 使用场景及目标:① 学习并复现多机器人无冲突路径规划的经典与先进算法;② 掌握动态边权膨胀、时间同步、冲突消解等关键技术的工程实现;③ 借助模块化框架进行算法改进与性能优化,支撑仓储物流、无人机编队等应用场景的仿真研究。; 阅读建议:建议按文中所述的数据流顺序逐步阅读,重点关注各模块接口设计与算法取舍逻辑,结合提供的完整资源进行代码调试与实验验证,深入理解“空间规划-时间消解”分离的设计思想。


