利用VB6.0開發(fā)基于IIS的應(yīng)用程序

字號:

本文介紹了利用VisualBasic開發(fā)IIS應(yīng)用程序的方法和步驟。使用這種開發(fā)方法不但大大簡化了IIS應(yīng)用程序的開發(fā)過程,而且使我們的Web站點具有更強的功能和更大的靈活性。
    一、概述
    大家知道,IIS(Internet Information Server)應(yīng)用程序是VisualBasic應(yīng)用程序,它在動態(tài)的、基于瀏覽器的應(yīng)用程序中使用HTML和已編譯的VisualBasic代碼。IIS應(yīng)用程序駐留在Web服務(wù)器上,接受來自瀏覽器的請求,運行與請求相關(guān)聯(lián)的代碼并返回響應(yīng)到瀏覽器。IIS應(yīng)用程序可以使用VisualBasic代碼來完成以前用腳本、CGI處理和其他方法完成的功能。IIS應(yīng)用程序可以在任何瀏覽器上運行,因此它很容易得到廣泛的應(yīng)用。對用戶來說,一個IIS應(yīng)用程序好象是由一系列的HTML頁面組成。對開發(fā)者來說,一個IIS應(yīng)用程序是由一些被稱為Webclass的特殊類型對象組成。而Webclass包含一系列稱為Webitem的資源。Webclass作為應(yīng)用程序的核心,處理來自瀏覽器的數(shù)據(jù)并向用戶發(fā)送信息。Webitem是Webclass為響應(yīng)一個請求發(fā)送給瀏覽器的HTML頁面和其他數(shù)據(jù)。
    二、IIS應(yīng)用程序的開發(fā)過程
    IIS應(yīng)用程序的開發(fā)過程大體分為五個步驟。我們結(jié)合一個公文數(shù)據(jù)檢索程序來說明。
    1、建立IIS應(yīng)用程序工程
    當(dāng)建立一個IIS應(yīng)用程序時,應(yīng)選擇IIS應(yīng)用程序類型工程。IIS應(yīng)用程序工程是一個ActiveXDLL工程類型,它自動包括一個ActiveX設(shè)計器。這個稱為Webclass的設(shè)計器作為創(chuàng)建應(yīng)用程序的基礎(chǔ)。一個Webclass設(shè)計器對應(yīng)一個Webclass,但它可以包含多個HTML模板和Webitem。如果想在應(yīng)用程序中包括多個Webclass,必須在工程中插入另外的設(shè)計器。多數(shù)情況下,必須編寫代碼告訴Webclass當(dāng)應(yīng)用程序第一次啟動時做哪些工作,使用Start事件來完成它。當(dāng)用戶第一次訪問你的應(yīng)用程序時,Start事件發(fā)生。使用Start事件代碼漫游到應(yīng)用程序中的第一個Webitem。
    例如,我們建立一個名為SearchData的IIS應(yīng)用程序,編寫Webclass的Start事件代碼如下:
    Private Sub Webclass_Start()
    Set NextItem=SearchTpl
    End sub
    2、添加HTML模板到Webclass
    添加HTML模板到IIS應(yīng)用程序,可使Webclass在響應(yīng)用戶請求時向瀏覽器發(fā)送HTML頁面。當(dāng)添加一個模板到Webclass時,要選擇一個與它關(guān)聯(lián)的HTML頁面。一個Webclass可以包含多個模板Webitem,但每個模板Webitem僅能表示一個HTML頁面。你必須為每一個HTML頁面添加相應(yīng)的模板。在插入一個HTML頁面文件之后,可以使用HTML編輯器對頁面的內(nèi)容和布局進(jìn)行更改。例如,我們添加一個名為SearchTpl的模板Webitem,它與SearchCondition頁面關(guān)聯(lián),并編寫Respond事件將此HTML頁面的內(nèi)容寫到瀏覽器。
    Private Sub SearchTpl_Respond()
    SearchTpl.Write Template
    End Sub
    與SearchTpl模板關(guān)聯(lián)的SearchCondition頁面讓用戶輸入檢索條件。其內(nèi)容如下:
    <HTML>
    <head>
    <metahttp-equiv= "Content-Type" content="text/HTML;charset=gb_2312-80">
    <title>檢索條件</title>
    </head>
    <body bgcolor= "#FFFFFF">
    <form action= "SearchData_Webclass.ASP?WCI=SearchResult" method="POST">
    <p>起始日期<input Type= "text" size="10" name="date1"></p>
    <p>終止日期<inputType= "text" size="10" name="date2"></p>
    <p>文件字號<inputType= "text" size="50" name="code"></p>
    <p>文件標(biāo)題<inputType= "text" size="50" name="title"></p>
    <p><inputType= "submit" name="submit" value="確定">
    <inputType= "reset" name="clear" value="清除">
    </p>
    </form>
    </body>
    </HTML>