1,593
社区成员
发帖
与我相关
我的任务
分享请教delphi开发asp网页显示的问题.
谢谢各位！
我刚开始学用DELPHI开发ASP网页，就被一个问题难住了
我先new items-->active server object-->coclass填入"shen"-->按ok健-->添加方法名"shen"生成unit2.pas和shen.asp两个文件
unit2.pas:
unit Unit2;
{$WARN SYMBOL_PLATFORM OFF}
interface
uses
ComObj, ActiveX, AspTlb, Project1_TLB, StdVcl;
type
Tshen = class(TASPObject, Ishen)
protected
procedure OnEndPage; safecall;
procedure OnStartPage(const AScriptingContext: IUnknown); safecall;
procedure shen;safecall;
end;
implementation
uses ComServ;
procedure Tshen.OnEndPage;
begin
inherited OnEndPage;
end;
procedure Tshen.OnStartPage(const AScriptingContext: IUnknown);
begin
inherited OnStartPage(AScriptingContext);
end;
procedure Tshen.shen;
begin
response.Write('hello,world');
end;
initialization
TAutoObjectFactory.Create(ComServer, Tshen, Class_shen,
ciMultiInstance, tmApartment);
end.
shen.asp:
<HTML>
<BODY>
<TITLE> Testing Delphi ASP </TITLE>
<CENTER>
<H3> You should see the results of your Delphi Active Server method below </H3>
</CENTER>
<HR>
<%
Set DelphiASPObj = Server.CreateObject("Project1.shen")
DelphiASPObj.shen
%>
<HR>
</BODY>
</HTML>
但是我将他在iis中打开时：
错误类型：
服务器对象, ASP 0177 (0x800401F3)
无效的 ProgID。 若要获取关于此消息的更多的信息，请访问 Microsoft 联机支持站点: http://www.microsoft.com/contentredirect.asp 。
/aspnew/新建文件夹/shen.asp, 第 9 行
这个怎么解决啊！！！
谢谢大家！！
我刚开始学用DELPHI开发ASP网页，就被一个问题难住了
我先new items-->active server object-->coclass填入"shen"-->按ok健-->添加方法名"shen"生成unit2.pas和shen.asp两个文件
unit2.pas:
unit Unit2;
{$WARN SYMBOL_PLATFORM OFF}
interface
uses
ComObj, ActiveX, AspTlb, Project1_TLB, StdVcl;
type
Tshen = class(TASPObject, Ishen)
protected
procedure OnEndPage; safecall;
procedure OnStartPage(const AScriptingContext: IUnknown); safecall;
procedure shen;safecall;
end;
implementation
uses ComServ;
procedure Tshen.OnEndPage;
begin
inherited OnEndPage;
end;
procedure Tshen.OnStartPage(const AScriptingContext: IUnknown);
begin
inherited OnStartPage(AScriptingContext);
end;
procedure Tshen.shen;
begin
response.Write('hello,world');
end;
initialization
TAutoObjectFactory.Create(ComServer, Tshen, Class_shen,
ciMultiInstance, tmApartment);
end.
shen.asp:
<HTML>
<BODY>
<TITLE> Testing Delphi ASP </TITLE>
<CENTER>
<H3> You should see the results of your Delphi Active Server method below </H3>
</CENTER>
<HR>
<%
Set DelphiASPObj = Server.CreateObject("Project1.shen")
DelphiASPObj.shen
%>
<HR>
</BODY>
</HTML>
但是我将他在iis中打开时：
错误类型：
服务器对象, ASP 0177 (0x800401F3)
无效的 ProgID。 若要获取关于此消息的更多的信息，请访问 Microsoft 联机支持站点: http://www.microsoft.com/contentredirect.asp 。
/aspnew/新建文件夹/shen.asp, 第 9 行
这个怎么解决啊！！！
谢谢大家！！
...全文
请发表友善的回复…
发表回复
