将ASP代码移植为VB COM组件-3

2016-01-29 18:04 1 1 收藏

将ASP代码移植为VB COM组件-3,将ASP代码移植为VB COM组件-3

【 tulaoshi.com - ASP 】

  一个快速回答的问题:为什么关于ASP的书中,讨论使用子程序和函数的代码的那么少?

     虽然一行一行地写ASP代码要更加简单,但是以程序的形式来编码却有许多益处。

     首先,非程序化的代码不容易移植到Visual Basic。也许目前你没有这个计划,但是总有一天你会为了
其性能或可扩展性而将一些代码移植到组件中。

     其次是程序是运行得更快。对ASP性能的最大消耗是上下文转换,每次从ASP代码区< % % 移到无格式的
HTML时都会发生。因为你不会在程序内部编码一个上下文转换,就不讳感觉到这种消耗。另外,ASP的
缓冲器也显示当子程序用程序化代码点击页面时会有很大的不同。这里是使用程序化代码的ASP应用程序
"Hello World" 的必须部分:

     Private Sub Main()
     Response.Write "Hello World!"
     End Sub

     Call Main

     为了完整起见,我在程序中包含了一个上下文转换的小例子。如果你试验这个代码,它会运行,但是请
不要在你自己的应用程序内部这样做。

     < %@ Language=VBScript %
     < %
     Private Sub DoStuff()
     %
     This is < b HTML Text! < /b
     < %
     End Sub
     %
     < HTML
     < HEAD
     < META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0"
     < /HEAD
     < BODY
     < P < % Call DoStuff % < /P
     < /BODY
     < /HTML

     程序化的代码还有一些其它益处。首先你会发现再利用包含在程序中的代码部分更加容易。其次,要
实现同样的目的所需要的代码行更少。第三,你将要开始开发一个大的可再利用代码库。开始时它的
形式是.inc 文件,最后你自己的普通COM组件看起来就像Jeff Gordon(著名赛车选手)一样棒。

     移植你的代码

     有几件事与从VBScript向Visual Basic移植代码一样简单。一般来说,你需要移走代码并增加数据类型。
有时,也可以在Visual Basic中应用一些更有效的算法,但是必须先保证代码可以正常工作。

     在我们这个应用程序举例中,将要移植一些简单的代码到两个Visual Basic COM 组件中。将一些HTML
表格格式拖到表述类中,将ADO 对象代码拖到包裹了ADO 的数据存取类中。通过将这两个类都放入
ActiveX DLL 工程文件中可以使工程文件稍稍简单化。在实际工作中,可以为每一层创建单独的工程
文件,但是这个工程文件要在一个DLL中表明思路。如果你想纠正这种情况,就将数据存取类移到另一个
工程文件中并作为一个DLL编译。必须在表述要应用它的DLL工程文件中增加对这个新DLL的引用。

     在这个样本工程文件中使用的数据库是一个Northwind 数据库,它与Visual Basic包含在一起。在这个
样本工程文件的ZIP 文件中,我为那些没有安装Visual Basic的人做了这个文件的一个表格的版本。样本
工程文件中还包含一个与ASP代码一起使用的编译过的DLL。

 

来源:https://www.tulaoshi.com/n/20160129/1504222.html

延伸阅读
在北美,人们对于 PostgreSQL 的热情不断升温。随着 PostgreSQL 的发展, PostgreSQL 8.x 已经从技术上超越 MySQL 5.x ,而市场的超越相信只是时间问题。而最终,用户也许有机会享受到可媲美 Oracle 的开源数据库也未尝没有可能。 我供职的互联网公司,服务约 50 万商务用户,经过多次的升级移植,目前公司已经全部将后台数据库从 MySQL 移植到...
标签: ASP
  作者: 沈晓刚 如果你是一名Active Server Page (ASP) 开发者,相信你可能经常使用COM对象来创建ASP页面。甚至在你使用中都忽略了他就是COM对象。比如:ADO。只个调用率最高的组件已让你的页面扩展了无限的功能。然而ASP本身是解释型脚本,在功能上不足COM强大。作为拥有快速开发,易用性强,支持COM的VB自然的作为了ASP中开发COM...
标签: Web开发
!--#include file="inc/conn.asp"--  %  dim rs,sql,filename,fso,myfile,x  Set fso = server.CreateObject("scripting.filesystemobject")  filename = Server.MapPath("download.txt")  if fso.FileExists(filename) then  fso.DeleteFile(filename)&nbs...
标签: ASP
  作者:杨忠勋 专业:计算机软件开发及应用 语言能力:TOFEL633 GRE2140 Email:zhongxunyang@yahoo.com.cn       在Mis系统的实际开发中,我们有时需要将当前页面上报表的数据以Word文档的格式下载到本地,这种实现并不困难。但是有时我们需要对下载的Word文档的格式做一些设置,比如标题颜色,字体大小,字...
标签: ASP
     如果你想脱离asp爱好者的水平,那么你就应该学会为asp编写组件。我在google上搜索了一下,Delphi编写asp组件的文章一共就几篇,所以今天写了这篇Delphi编写asp组件的基础文章,希望对新手有点帮助。     开始吧,让我们一起编写一个”hello world!”的示例。我这里用的是Delphi 7。     ...

经验教程

865

收藏

32
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部