详细讲解VB开发IIS应用程序

开发 后端
这里介绍VB开发IIS应用程序,当建立一个IIS应用程序时,应选择IIS应用程序类型工程。IIS应用程序工程是一个ActiveXDLL工程类型,它自动包括一个ActiveX设计器。

VB还是比较常用的,于是我研究了一下VB开发IIS应用程序,在这里拿出来和大家分享一下,希望对大家有用。利用VB开发IIS应用程序的方法和步骤。使用这种开发方法不但大大简化了IIS应用程序的开发过程,而且使我们的Web站点具有更强的功能和更大的灵活性。

一、概述

大家知道,IIS(Internet Information Server)应用程序是VB应用程序,它在动态的、基于浏览器的应用程序中使用HTML和已编译的VB代码。IIS应用程序驻留在Web服务器上,接受来自浏览器的请求,运行与请求相关联的代码并返回响应到浏览器。IIS应用程序可以使用VB代码来完成以前用脚本、CGI处理和其他方法完成的功能。IIS应用程序可以在任何浏览器上运行,因此它很容易得到广泛的应用。对用户来说,一个IIS应用程序好象是由一系列的HTML页面组成。对开发者来说,一个IIS应用程序是由一些被称为Webclass的特殊类型对象组成。而Webclass包含一系列称为Webitem的资源。 Webclass作为应用程序的核心,处理来自浏览器的数据并向用户发送信息。Webitem是Webclass为响应一个请求发送给浏览器的HTML页面和其他数据。

二、IIS应用程序的VB开发过程

IIS应用程序的开发过程大体分为五个步骤。我们结合一个公文数据检索程序来说明。

1、建立IIS应用程序工程

当建立一个IIS应用程序时,应选择IIS应用程序类型工程。IIS应用程序工程是一个ActiveXDLL工程类型,它自动包括一个ActiveX设计器。这个称为Webclass的设计器作为创建应用程序的基础。一个Webclass设计器对应一个Webclass,但它可以包含多个HTML模板和 Webitem。如果想在应用程序中包括多个Webclass,必须在工程中插入另外的设计器。多数情况下,必须编写代码告诉Webclass当应用程序***次启动时做哪些工作,使用Start事件来完成它。当用户***次访问你的应用程序时,Start事件发生。使用Start事件代码漫游到应用程序中的***个Webitem。

例如,我们建立一个名为SearchData的IIS应用程序,编写Webclass的Start事件代码如下:

  1. Private Sub Webclass_Start()  
  2. Set NextItem=SearchTpl 
  3. End sub 

2、添加HTML模板到Webclass

添加HTML模板到IIS应用程序,可使Webclass在响应用户请求时向浏览器发送 HTML页面。当添加一个模板到Webclass时,要选择一个与它关联的HTML页面。一个Webclass可以包含多个模板Webitem,但每个模板Webitem仅能表示一个HTML页面。你必须为每一个HTML页面添加相应的模板。在插入一个HTML页面文件之后,可以使用HTML编辑器对页面的内容和布局进行更改。例如,我们添加一个名为SearchTpl的模板Webitem,它与SearchCondition页面关联,并编写 Respond事件将此HTML页面的内容写到浏览器。

  1. Private Sub SearchTpl_Respond()  
  2. SearchTpl.Write Template  
  3. End Sub 

与SearchTpl模板关联的SearchCondition页面让用户输入检索条件。其内容如下:

  1. <HTML>  
  2. <head>  
  3. metahttp-equiv="Content-Type" content="text/HTML;charset=gb_2312-80">  
  4. <title>检索条件</title>  
  5. </head>  
  6. <body bgcolor="#FFFFFF">  
  7. <form action="SearchData_Webclass.asp?WCI=SearchResult" method="POST">  
  8. <p>起始日期<input Type="text" size="10" name="date1"></p>  
  9. <p>终止日期<inputType="text" size="10" name="date2"></p>  
  10. <p>文件字号<inputType="text" size="50" name="code"></p>  
  11. <p>文件标题<inputType="text" size="50" name="title"></p>  
  12. <p><inputType="submit" name="submit" value="确定">  
  13. inputType="reset" name="clear" value="清除">  
  14. </p>  
  15. </form>  
  16. </body>  
  17. </HTML> 

3、添加自定义的Webitem到Webclass

自定义的Webitem允许你通过VB代码动态地向浏览器发送响应。自定义的Webitem通常是一组过程代码。IIS应用程序中的大多数处理发生在自定义Webitem的事件过程中。IIS应用程序接收 HTML页面的请求,与Webitem的事件进行匹配,并运行相应的事件过程代码。例如,我们添加一个名为SearchResult的自定义 Webitem。它使用Request对象在SearchCondition页面窗体中获取用户输入的查询条件,然后建立一个连接到ADO公文数据库,创建记录集并从中检索满足条件的信息。

  1. Private Sub SearchResult_Respond()  
  2. ′为获取窗体的信息声明变量  
  3. Private sDate1 as String  
  4. Private sDate2 as String  
  5. Private sTitle as String  
  6. Private sCode as String  
  7. ′获取窗体参数并赋给变量  
  8. sDate1=Request.Form("date1")  
  9. sDate2=Request.Form("date2")  
  10. sTitle=Request.Form("title")  
  11. sCode=Request.Form("code")  
  12. ′为数据库连接和记录集声明对象变量  
  13. Dim cn As New ADODB.Connection  
  14. Dim rs As New ADODB.Recordset  
  15. Dim QueryStr As String′  
  16.  
  17. '形成SQL数据查询字符串  
  18.  
  19. QueryStr="select form 公文 where "&"日期>="&"#" & sDate1 &"#"&"and" &"日期<
    ="&"# "& sDate2 & "#"&" and" &"文件标题like" & "* "&" *"& sTitle & “ * "&"*"& 
    "and" &"文件字号like"&"*"&" "& sCode&" * "&""  
  20.  
  21. ′建立数据库连接  
  22.  
  23. cn.ConnectionString="DSN=docUID=sa;  
  24. PWD=saDATABASE=document"  
  25. cn.Open  
  26. ′创建记录集  
  27. Open QueryStr,cn,adOpenStatic,adlockReadonly  
  28. ′将结果信息逐个记录地写到一个表格  
  29. With Response  
  30. .Write "<HTML>”  
  31. .Write "<BODY>"  
  32. .Write "<TABLE BORDER CELLSPACING=1 CELLPADDING=7>"  
  33. Do While rs.EOF=False 
  34. .Write "<TR><TD>"  
  35. .Write rs("文件标题")  
  36. .Write "</TD><TD>"  
  37. .Write rs("文件字号")  
  38. .Write "</TD><TD>"  
  39. .Write rs("日期")  
  40. .Write "</TD><TR>"  
  41. .Write rs("责任单位")  
  42. .Write "</TD><TR>"  
  43. .Write rs("主题词")  
  44. .Write "</TD><TR>"  
  45. rs.MoveNext  
  46. Loop  
  47. .Write"</TABLE>"  
  48. .Write"</BODY>"  
  49. .Write"</HTML>"  
  50. End With′  
  51.  
  52. '关闭记录集和数据库连接  
  53.  
  54. rs.Close  
  55. cn.Close  
  56. End Sub 

4、调试IIS应用程序

调试一个IIS应用程序的方法和调试其他VB应用程序一样,都是通过进入运行模式来进行的。VB为IIS应用程序创建虚拟目录,使用浏览器打开相应.asp文件启动Webclass。调试时,可以使用VB的所有工具来调试你的工程。如设置断点、查看变量、调试语句等。

5、部署IIS应用程序

可以使用VB打包和展开向导来包装和部署你的IIS应用程序。打包和展开向导将工程的.DLL文件和所有相关的文件包装到一个“压缩包”或.cab文件中。然后可以部署这个压缩包文件和相关文件到一个Web服务器上。

三、小结

利用VB开发IIS应用程序,不但可以使用VB的类模块和ActiveX部件,而且能够使用 VB所有的工具来调试IIS应用程序。这种开发方法大大简化了IIS应用程序的开发过程,使我们更加方便地建立功能强大的Web站点。

【编辑推荐】

  1. VB 2005中开发新一代控制台应用程序
  2. 简单讲解VB开发分布式
  3. 浅析VB Script开发自动化测试
  4. 浅谈VB开发系统知识
  5. VB.NET应用程序中多线程的应用实例
责任编辑:佚名 来源: 网易博客
相关推荐

2009-09-27 17:23:16

Hibernate应用

2010-02-24 13:25:22

Python线程应用程

2009-10-27 12:20:06

VB.NET多线程应用

2010-01-13 14:26:39

VB.NET开发

2009-10-21 09:38:34

VB QuickSor

2010-05-21 15:12:32

IIS应用程序池

2009-10-21 09:24:31

VB.NET应用程序

2011-07-20 15:58:58

iPhone 应用程序 生命周期

2009-12-25 10:39:49

WPF应用程序关闭

2010-05-17 16:31:04

IIS Request

2009-10-12 13:54:22

VB.NET Data

2012-02-08 15:06:31

ibmdw

2022-09-19 00:37:13

SaaS云计算开发

2009-10-09 17:01:32

VB.NET多线程

2013-02-21 14:15:41

开发Tizen

2013-02-21 14:14:40

开发Tizen

2009-10-12 16:56:36

VB.NET常量VB.NET枚举

2010-05-20 17:29:02

IIS安全

2013-11-19 15:35:01

2009-09-24 17:21:17

加速Hibernate
点赞
收藏

51CTO技术栈公众号