Runnig as Isapi.dll on server cause to Acces Denied on HTMLFile

[Andrew A. Yashchuk]

Hello,

Trying to execute the VBScript in external file, using PageProducer HTMLFile
property cause to the Internal Application Error Access Denied on server.
And the next websnap page module, which hold the external file refference,
does not showing. Debugging the same using Web App Debugger cause no error.
I've checked the ISR_Machinename access to thet file, file are in local
folder. Even the ini file (in the same folder) writed fine from isapi.dll

Please any suggestions?

The vbscipt in external file is

<OBJECT ID="CRViewer"
CLASSID="CLSID:C4847596-972C-11D0-9567-00A0C9273C2A"
WIDTH=100% HEIGHT=95%
CODEBASE="/viewer/activeXViewer/activexviewer.cab#Version=8,0,0,371">

<PARAM NAME="EnableDrillDown" VALUE=1>
<PARAM NAME="EnableExportButton" VALUE=1>
<PARAM NAME="DisplayGroupTree" VALUE=1>
<PARAM NAME="EnableGroupTree" VALUE=1>
<PARAM NAME="EnableAnimationControl" VALUE=1>
<PARAM NAME="EnablePrintButton" VALUE=1>
<PARAM NAME="EnableRefreshButton" VALUE=1>
<PARAM NAME="EnableSearchControl" VALUE=1>
<PARAM NAME="EnableZoomControl" VALUE=1>
<PARAM NAME="EnableSearchExpertButton" VALUE=0>
<PARAM NAME="EnableSelectExpertButton" VALUE=0>
</OBJECT>

<SCRIPT LANGUAGE="VBScript">
<!--
Sub window_onLoad()
Page_Initialize()
End Sub
Sub Page_Initialize
On Error Resume Next
Dim webBroker
Set webBroker =
CreateObject("WebReportBroker.WebReportBroker")
if err.number <> 0 then
window.alert "The Seagate Software ActiveXViewer is unable to create it's
resource objects. To
rectify this problem, please install Internet Explorer
4.0 or install DCOM for Windows 95 and the latest
Microsoft Scripting Engine. These files are available
at Microsoft's web site."
CRViewer.ReportName ="<#REPORTURL>"
else
Dim webSource0
Set webSource0 = CreateObject("WebReportSource.WebReportSource")
webSource0.ReportSource = webBroker
webSource0.URL = "<#REPORTURL>"
webSource0.PromptOnRefresh = True
<#LOGININFO>
<#PARAMINFO>
CRViewer.ReportSource = webSource0
end if
CRViewer.ViewReport
End Sub
-->
</SCRIPT>

[Andrew A. Yashchuk]

I've found the string

rReportServer = 'http://localhost:80/wbweb/'; wich should be rReportServer =
'http://servername:80/wbweb/';

Sorry for inconvenience,
Andrew

"Andrew A. Yashchuk" <just...@mail.ru> сообщил/сообщила в новостях
следующее: news:460d...@newsgroups.borland.com...