分手快乐 发表于 2015-1-16 22:30:51

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

专业性的服务。有的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可以轻松地访问数据库。
页: [1]
查看完整版本: ASP教程之Delphi编写组件封装asp代码的基础步骤