推薦：在ASP中使用事務(wù)控制
julyclyde(原作) 作者系2月份微軟社區(qū)之星Microsoft China Community Star 在編程中，經(jīng)常需要使用事務(wù)。所謂事務(wù)，就是一系列必須都成功的操作，只要有一步操作失敗，所有其他的步驟也必須撤銷。比如用ASP開發(fā)一個(gè)網(wǎng)絡(luò)硬盤系統(tǒng)，其用戶注冊部分要做的事有： 將用戶信

 　　概要

　　從 Active Server Pages (ASP) Web 頁返回 XML 數(shù)據(jù)是一種常見的編程要求。 實(shí)現(xiàn)此要求所用的方法因用來托管 ASP 應(yīng)用程序的 Microsoft Internet 信息服務(wù) (IIS) 的版本而異。 本文中的分步指南帶有相關(guān)的示例代碼，演示了怎樣從 ASP 頁返回可擴(kuò)展標(biāo)記語言 (XML) 數(shù)據(jù)。

　　下面的示例代碼創(chuàng)建一個(gè) ASP 頁，此頁返回XML 格式的 ActiveX Data Objects (ADO) 記錄集的內(nèi)容。 此代碼連接著 SQL Server PUBS 示例數(shù)據(jù)庫的一個(gè)實(shí)例，而且它通過執(zhí)行 SELECT 查詢語句以從 Authors 表中檢索數(shù)據(jù)的這一方式來打開 ADO 記錄集。 然后，使用 ADO 的保存功能和 ASP Response 對象的 Write 方法，將此記錄集以 XML 的格式返回給客戶端瀏覽器。

　　1. 先決條件

　　下面簡要列出了推薦使用的硬件、軟件、網(wǎng)絡(luò)架構(gòu)以及所需的 Service Pack：

　　Microsoft Windows 2000 專業(yè)版、Windows 2000 Server 或 Windows 2000 Advanced Server

　　Microsoft Internet Information Server (IIS) 5.0

　　或

　　Microsoft Windows NT 4.0 Server

　　Microsoft Internet Information Server (IIS) 4.0

　　2. 準(zhǔn)備 Web 站點(diǎn)

　　在 Windows 資源管理器中，在 Web 服務(wù)器的根文件夾(通常在 C:InetpubWwwroot)下創(chuàng)建一個(gè)名為 Xmltest 的文件夾。

　　右鍵單擊新創(chuàng)建的文件夾，然后單擊屬性。

　　在安全選項(xiàng)卡上，添加所有人組，并向“所有人”組授予對此文件夾的讀和寫權(quán)限。單擊確定接受更改。

　　在開始菜單上，指向程序，指向管理工具，然后單擊 Internet 服務(wù)管理器。

　　在 Internet 信息服務(wù)下，雙擊展開對應(yīng)于本地服務(wù)器的條目。

　　右鍵單擊“默認(rèn) Web 站點(diǎn)”，指向新建，然后單擊虛擬目錄。 在向?qū)е校�按照下列步驟操作：

　　系統(tǒng)提示時(shí)，在虛擬目錄別名文本框中鍵入 XMLTest，然后單擊下一步。

　　當(dāng)提示您鍵入 Web 站點(diǎn)內(nèi)容目錄時(shí)，單擊瀏覽，選擇新創(chuàng)建的 XMLTest 目錄，然后單擊下一步。

　　在提示您選擇訪問權(quán)限時(shí)，選擇讀和運(yùn)行腳本(例如 ASP)。 本例中不需要其他任何訪問權(quán)限。單擊下一步以完成向?qū)А?/p>

　　雙擊“默認(rèn) Web 站點(diǎn)”。

　　右鍵單擊新的虛擬目錄，然后單擊屬性。

　　在目錄選項(xiàng)卡上，檢查在應(yīng)用程序設(shè)置下面的應(yīng)用程序名文本框中是否列出了 Web 站點(diǎn)名稱(在步驟 6a 中鍵入的名稱)。如果未列出，請單擊創(chuàng)建以創(chuàng)建該應(yīng)用程序。

　　關(guān)閉屬性對話框和 IIS。

　　3. Windows 2000 XML 示例代碼

　　在開始菜單上，指向程序，指向附件，然后單擊記事本。

　　選定以下代碼，右鍵單擊所選內(nèi)容，然后單擊復(fù)制。在記事本中，單擊編輯菜單上的粘貼，將以下代碼添加到該文件中：

　　<%

　　'Very Important : Set the ContentType property of the Response object to text/xml.

　　Response.ContentType = "text/xml"

　　Dim cn

　　Dim rs

　　Dim xmlDoc

　　Set cn=Server.CreateObject("ADODB.Connection")

　　Set rs=Server.CreateObject("ADODB.Recordset")

　　'Replace the ADO Connection string attributes

　　'in the following line of code to point to your

　　'instance of SQL Server, and to specify the

　　'required security credentials for User ID and Password.

　　cn.Open "Provider=SQLOLEDB.1;" & _

　　"User ID=;" & _

　　"Password=;" & _

　　"Initial Catalog=pubs;" & _

　　"Data Source="

　　rs.CursorLocation = 3

　　rs.Open "Select * from Authors",cn

　　'Persist the Recorset in XML format to the ASP Response object.

　　'The constant value for adPersistXML is 1.

　　rs.Save Response, 1

　　%>

　　在第 20 行代碼中，將 替換為您的用戶名。

　　在第 21 行代碼中，將 替換為您的密碼。

　　在第 23 行代碼中，將 替換為您的 SQL Server。

　　在文件菜單上，單擊保存。

　　在保存在下拉列表框中，瀏覽到您在前面創(chuàng)建的 Xmltest 文件夾。 在文件名文本框中，鍵入 Xmlw2k.asp，并在保存類型下拉框中單擊所有文件。最后單擊保存以保存該文件。

　　若要查看該頁，請啟動(dòng) Web 瀏覽器，然后在地址欄中鍵入該頁的 HTTP 位置。 如果您將文件保存到了前面提到的位置，則請?jiān)诘刂窓谥墟I入 http://< 服務(wù)器名 >/Xmltest/Xmlw2k.asp 。

　　4. Windows NT 4.0 XML 示例代碼

　　在開始菜單上，指向程序，指向附件，然后單擊記事本。

　　選定以下代碼，右鍵單擊所選內(nèi)容，然后單擊復(fù)制。在記事本中，單擊編輯菜單上的粘貼，將以下代碼添加到該文件中：

　　<%

　　'Very Important : Set the ContentType property of

　　'the Response object to text/xml.

　　Response.ContentType = "text/xml"

　　Dim cn

　　Dim rs

　　Dim xmlDoc

　　Set cn=Server.CreateObject("ADODB.Connection")

　　Set rs=Server.CreateObject("ADODB.Recordset")

　　'Replace the ADO Connection string attributes

　　'in the following line of code to point to your

　　'instance of SQL Server, and to specify the

　　'required security credentials for User ID and Password.

　　cn.Open "Provider=SQLOLEDB.1;" & _

　　"User ID=;" & _

　　"Password=

　　"Initial Catalog=pubs;" & _

　　"Data Source="

　　rs.CursorLocation = 3

　　rs.Open "Select * from Authors",cn

　　Set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")

　　'Persist the Recorset in XML format to the DOMDocument object.

　　'The constant value for adPersistXML is 1.

　　rs.Save xmlDoc,1

　　rs.Close

　　cn.Close

　　Set rs = Nothing

　　Set cn = Nothing

　　'Write out the xml property of the DOMDocument

　　'object to the client Browser

　　Response.Write xmldoc.xml

　　%>

　　在第 20 行代碼中，將 替換為您的用戶名。

　　在第 21 行代碼中，將 替換為您的密碼。

　　在第 23 行代碼中，將 替換為您的 SQL Server。

　　在文件菜單上，單擊保存。

　　在保存在下拉列表框中，瀏覽到您在前面創(chuàng)建的 Xmltest 文件夾。 在文件名文本框中，鍵入 Xmlnt4.asp，并在保存類型下拉框中單擊所有文件。最后單擊保存以保存該文件。

分享：ASP腳本循環(huán)語句
本篇教大家ASP腳本循環(huán)語句： ASP 動(dòng)態(tài)服務(wù)器頁面環(huán)境的特點(diǎn)就在于它是通過一種或幾種腳本語言而寫成的，腳本語言可以看作是編程語言的簡化版，它易于學(xué)習(xí)和掌握，這給廣大動(dòng)態(tài)網(wǎng)站的設(shè)計(jì)者們提供了相當(dāng)大的便利�？梢赃@么說 : 腳本語言運(yùn)用的得當(dāng)與否直接關(guān)系到 ASP