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

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

10年积累的成都做网站、网站制作经验，可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你，你也不认识我。但先网站设计后付款的网站建设流程，更有颍州免费网站建设让你可以放心的选择与我们合作。

一、概述

大家知道，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.   
  
  
  2. Set NextItem=SearchTpl 
    3.   
  
  
  3. End sub 
    4.

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.   
  
  
  2. SearchTpl.Write Template  
    3.   
  
  
  3. End Sub 
    4.

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

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

3、添加自定义的Webitem到Webclass

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

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

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应用程序中多线程的应用实例

网站标题：详细讲解VB开发IIS应用程序
网页地址：http://www.36103.cn/qtweb/news46/38546.html

网站建设、网络推广公司-创新互联，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联

猜你还喜欢下面的内容

网站建设知识

各行业网站

小程序开发　　 　网站免费收录　　 　重庆水土三线托管　　 　康明斯发电机　　 　雅安主机托管　　 　成都网站建设　　 　成都网站设计　　 　网站营销推广　　 　温江做网站　　 　成都服务器托管　　 　和县翔豪网站　　 　安卓开发　　 　广告媒介投放　　 　绵阳服务器托管　　 　租用服务器　　 　网站建设方案　　 　郫县封阳台　　 　宜宾网站建设　　 　成都广告招牌　　 　物流公司网站建设方案