ASP教程之Delphi编写组件封装asp代码的基础步骤

只看该作者 · 发表于 2015-1-16 22:30:51

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有帐号？立即注册

x

专业性的服务。有的ASP商提供垂直型的应用服务，针对某一特定行业提供应用服务。假如你想离开asp喜好者的程度，那末你就应当学会为asp编写组件。我在google上搜刮了一下，Delphi编写asp组件的文章一共就几篇，以是明天写了这篇Delphi编写asp组件的基本文章，但愿对老手有点匡助。入手下手吧，让我们一同编写一个”helloworld!”的示例。我这里用的是Delphi7。
1.文件->新建->其他->ActiveX->ActiveXLibrary,然后保留成showdll.dpr

登录/注册后可看大图

2.再次，文件->新建->其他->ActiveX->ActiveXServerObject,填写CoClassName:showhello,其他稳定，点击ok。

登录/注册后可看大图

3.如今入手下手写程序，先增加一个办法。选择Ishowhello->右键->New->Method,填写办法称号：sayworld。

登录/注册后可看大图

4．如今入手下手写程序，将Unit1保留成show.pas,然后增加办法sayworld的代码

登录/注册后可看大图

show.pas的全体代码以下：
unitshow;
{$WARNSYMBOL_PLATFORMOFF}
interface
uses
ComObj,ActiveX,AspTlb,showdll_TLB,StdVcl;
type
Tshowhello=class(TASPObject,Ishowhello)
protected
procedureOnEndPage;safecall;
procedureOnStartPage(constAScriptingContext:IUnknown);safecall;
proceduresayworld;safecall;//sayworld办法
end;
implementation
usesComServ;
procedureTshowhello.OnEndPage;
begin
inheritedOnEndPage;
end;
procedureTshowhello.OnStartPage(constAScriptingContext:IUnknown);
begin
inheritedOnStartPage(AScriptingContext);
end;
procedureTshowhello.sayworld();//界说sayworld办法
begin
response.Write(Helloworld);//里边的语法和asp一样的写法了，就在这里封装了。
end;
initialization
TAutoObjectFactory.Create(ComServer,Tshowhello,Class_showhello,
ciMultiInstance,tmApartment);
end.
4．点击运转，编译成dll，并主动注册了。这时候候会提醒：

登录/注册后可看大图

让你放到web服务器上运转，好了如今写个asp文件挪用一下吧，注重Delphi已天生了一个asp文件，我们改一下挪用的办法就能够了。

登录/注册后可看大图

修正后的showhello.asp代码以下：
<HTML>
<BODY>
<TITLE>TestingDelphiASP</TITLE>
<CENTER>
<H3>YoushouldseetheresultsofyourDelphiActiveServermethodbelow</H3>
</CENTER>
<HR>
<%SetDelphiASPObj=Server.CreateObject("showdll.showhello")
DelphiASPObj.sayworld
%>
<HR>
</BODY>
</HTML>
在iis的站点下运转看看效果吧：

登录/注册后可看大图

5．其他：
Delphi编写的组件，用win2000的组件服务注册后能够看该组件的接口的办法

登录/注册后可看大图

6．另有asp页面和组件间传送参数,实在就是给挪用的办法（函数）传送参数，注重Delphi里界说的时分要和vbs的数据范例分歧。这些仍是人人多理论吧。这里次要是想人人学会封装asp中心代码的办法，起个举一反三的感化。
写这些，笔墨未几，就是截图贫苦了点。程度无限，毛病的中央，人人拍砖，拍的轻点啊！！！！
一风一云
2004-10-18
问题是他们究竟是喜欢他们是使用软件时,速度快还是速度慢好.(当然在3秒以内).无论是他们输入资料时,查找资料时,分析资料时.

只看该作者 · 发表于 2015-1-19 15:57:57

他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。

只看该作者 · 发表于 2015-1-27 20:45:20

那么，ASP.Net有哪些改进呢？

只看该作者 · 发表于 2015-2-5 11:20:29

封装性使得代码逻辑清晰，易于管理，并且应用到ASP.Net上就可以使业务逻辑和Html页面分离，这样无论页面原型如何改变，业务逻辑代码都不必做任何改动；继承性和多态性使得代码的可重用性大大提高。

只看该作者 · 发表于 2015-2-11 13:33:45

完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

只看该作者 · 发表于 2015-3-2 13:26:14

另外因为asp需要使用组件，所以了解一点组件的知识(ADODB也是组件)

只看该作者 · 发表于 2015-3-17 20:27:12

ASP（ActiveServerPages）是Microsfot公司1996年11月推出的WEB应用程序开发技术，它既不是一种程序语言，也不是一种开发工具，而是一种技术框架，不须使用微软的产品就能编写它的代码，能产生和执行动态、交互式、高效率的站占服务器的应用程序。

只看该作者 · 发表于 2015-3-25 01:33:33

它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。

		自动登录	找回密码
密码			立即注册

[学习教程] ASP教程之Delphi编写组件封装asp代码的基础步骤

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子