ASP開發的三個技巧

2011/5/31 14:59:50  出處：本站   人氣：27次    字號：小  中  大

本文提供給大家分享的是在ASP開發中的三個技巧，希望能對大家派上用場。

一、 服務器端文件的動態包含（注一）
  在ASP開發過程中，我們經常會將通用的函數制作成一個獨立的asp文件，然后通過Include方法引入需要的頁面。由于在執行過程中，服務器會首先運行采用Include方法包含的文件，然后才是當前頁面的代碼，所以，在實際執行過程中我們不可能使用Include方法來實現服務器端的動態包含。
  看下面一段代碼：
  <%
  i=1
  str = "file" & i & "/a.asp"
  %>
  <!--#include virtual ="<% str %>"-->
  我們的本意是希望根據I的不同取值，包含不同目錄下的同名文件，可是在執行過程中，卻會返回“找不到包含文件 '<% str %>'。”的錯誤。也就是說在ASP中，我們不可能使用Include方法實現文件的動態包含。
  要在ASP中實現真正的動態文件包含，目前可行的方法是使用Server.Execute命令。Server.Execute是ASP3.0新增的一個控制程序流的新方法，可以在運行過程中臨時轉移到一個文件、執行其內容，然后再返回原先的程序。
  使用Server.Execute命令重新書寫的代碼如下：
  <%
  i=1
  str = "file" & i & "/a.asp"
  Server.Execute str
  %>
  注一：本文討論的文件動態包含，主要指包含文件為變量的情況，有別于被包含的文件名事先確定的情況。
  
  二、 數據庫記錄的批量刪除
  在用ASP開發管理程序中，會不可避免地涉及刪除數據庫記錄的操作。一般我們會采用下面兩種方法刪除記錄：使用Recordset.Delete方法或者直接使用SQL語句“Delete from 數據表 Where 主鍵=值”。而本文將要介紹的這種方法則可以同時刪除一條或多條記錄。下面我們首先來看一個具體的例子，在這個例子中我們會用到一張數據表（Subject）和兩個ASP文件（list.asp和code.asp），該數據表包含了兩個字段：
  ID、數據表主鍵，用來唯一標示數據庫中的記錄；
  Title：標題，用來顯示記錄的內容。
  兩個ASP文件的內容如下：
  list.asp
  <%@ Language=VBScript %>
  <%
  
   '創建數據庫連接
   Dim objConn
   Set objConn = Server.CreateObject("ADODB.Connection")
   objConn.Open"Provider=microsoft.Jet.OLEDB.4.0;Data Source=D:\Samples\Tooltips.mdb"
  
   '創建記錄集
   Dim objRS
   Set objRS = Server.CreateObject("ADODB.Recordset")
   objRS.Open "Subject", objConn
  
   '顯示記錄列表
   Response.Write "<FORM METHOD=POST ACTION=""Code.asp"">"
   Response.Write "<TABLE BORDER=1 CELLSPACING=1>"
  
   Response.Write "<TR>"
   Response.Write "<TH>刪除</TH>"
   Response.Write "<TH>標題</TH>"
   Response.Write "</TR>"
  
   Do While Not objRS.EOF
   Response.Write "<TR>"
   Response.Write "<TD><INPUT TYPE=CHECKBOX NAME=Delete "
   Response.Write "VALUE=" & CInt(objRS("ID")) & "></TD>"
   Response.Write "<TD>" & objRS("Title") & "</TD>"
   Response.Write "</TD></TR>"
   objRS.MoveNext
   Loop
  
   Response.Write "</TABLE>"
   Response.Write "<P><INPUT TYPE=SUBMIT VALUE=""刪除"">"
   Response.Write "</FORM>"
  
   ‘關閉ADO對象
   objRS.Close
   Set objRS = Nothing
  
   objConn.Close
   Set objConn = Nothing
  %>
  code.asp
  <%@ Language=VBScript %>
  <%
  
   '獲取刪除的記錄列表
   Dim strDeleteList
   strDeleteList = Request.Form ("Delete")
  
  
   '創建一個連接對象
   Dim objConn
   Set objConn = Server.CreateObject("ADODB.Connection")
   objConn.Open"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Samples\Tooltips.mdb"
  
   '生成刪除記錄的SQL語句
   Dim strSQL
   strSQL = "DELETE FROM Subject WHERE ID IN (" & strDeleteList & ")"
  
   ‘執行刪除操作
   objConn.Execute strSQL
  
   '關閉連接對象
   objConn.Close
   Set objConn = Nothing
  %>
  從上面的代碼可以看到，我們首先在list.asp頁面中生成一個記錄列表，每條記錄前面都包含了一個Checkbox，這些CheckBox都使用了同一個名稱，每個CheckBox的取值對應數據表中的唯一記錄，由于在ASP中，如果一個表單上包含多個相同命名的控件，會返回一個以“，”分隔的字符串，所以，在Code.asp文件中，我們首先取得所有Checkbox對應的取值，然后利用一個SQL語句“Delete from subject where id in (str)”完成記錄的刪除。其中的關鍵就在于“DELETE FROM TableNameWHERE TableID IN (String)”這個SQL語句。由于該SQL語句對于string沒有特殊的要求，所以我們既可以刪除一條記錄，也可以同時刪除多條記錄。
  這里還需要說明一點，如果數據表中作為的字段類型為字符型，則需要按下面的形式進行修改
  ……
  strDeleteList = Replace(strDeleteList,”,”,”’,’”)
  strSQL = "DELETE FROM Subject WHERE ID IN (‘" & strDeleteList & "’)"
  ……
  
  三、 用MetaDATA標記包含外部常量
  如果我們要在ASP程序中使用ADO事先定義的常量，那么必須在每個用到ADO常量的頁面上包含“adovbs.inc”，否則就只能直接用數字表示。顯然，直接數字并不利于今后程序的修改，而且可以規范化開發需要極力避免的事情，但是每個頁面都包含“adovbs.inc”，又煩瑣了一點。所以，下面介紹另外一種一次包含的方法。這就是Global.asa中的TypeLibrary Declarations。
  由于一般的COM對象都會將常量定義包含在類型庫中，所以利用TypeLibrary Declarations可以直接讀取這些類型庫中定義好的常量。加上TypeLibrary Declarations只要在Global.asa中一次定義就可以在所有的ASP頁面中使用，效率明顯高于單個頁面包含。
  TypeLibrary Declarations的語法形式為：
  <!--METADATA
  TYPE="TypeLib"
  FILE="file"
  UUID="typelibraryuuid"
  -->
  其中，File和UUID兩個屬性只要任選一個即可。File屬性指指向包含常量定義的完整文件路徑，而UUID則指外部庫的GUID。
  例如我們包含在ASP程序中使用ADO常量，則可以采用下面兩種方式：
  <!—MetaDATA
   Type =”TypeLib”
   File = “C:\Program Files\Common Files\SYSTEM\ADO\msado21.tlb”
  -->
  或者
  <!—MetaDATA
   Type =”TypeLib”
   UUID = “00000201-0000-0010-8000-00AA006D2EA4”
  -->
  相信大家看了上面兩種方法，會很自然的選擇第一種。的確，利用物理目錄的方式明顯比后一種方法方便，但是如果開發的ASP程序需要到其它機器上安裝，那么采用第二種方法會更好一點。為了方便大家，下面列出了ASP中一些常用的GUID
  名稱
  GUID
  ADO2.1
  {00000201-0000-0010-8000-00AA006D2EA4}
  ADO2.5
  {00000205-0000-0010-8000-00AA006D2EA4}
  ADO2.6
  {00000206-0000-0010-8000-00AA006D2EA4}
  ADO2.7
  {00000300-0000-0010-8000-00AA006D2EA4}
  FileSystemObject
  {420B2830-E718-11CF-893D-00A0C9054228}