推薦：ASP如何生成html？
已經有很多生成html的新聞系統，但是都是用的模板，本函數實現把asp頁面產生的html代碼保存成為一個html文件，這樣就沒有必要改動原來的頁面就可以輕松完成一個生成html的新聞系統了。^_^ 由于代碼比較短，這里就不進行注釋了 以下為引用的內容： % '當目標

我們經常會遇到多重查詢問題，而長長的SQL語句往往讓人丈二和尚摸不著頭腦。特別是客戶端部分填入查詢條件時，如用普通方法將更是難上加難。

以下巧妙地利用"where 1=1"的恒等式（事實上很多，讓它值為TRUE即可）解決此問題。

正文概要

'subject 信息標題

'company 發布信息的公司名稱

'content 發布信息的內容

'address 公司地址

'infomation 公司簡介

'note 相關說明

以上值均由FORM提交，然后通過:subject=trim(Request.Form("subject"))等得到相應的值。

<%

'這個函數很關鍵！---------------------------

Function sql(a,b,sqls)

if b<>"" then '如果客戶端沒有提交此值，則不會產生相應的SQL語句。

sqls=sqls & " and " & a & " like '%" & b & "%'"

end if

sql=sqls

End Function

'-----------------調用數據庫

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

DBpath=Server.MapPath("/database/mydb.mdb")

Conn.Open "driver={Microsoft Access Driver (*.mdb)};pwd=;dbq=" & DBpath

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

sqls="select * from mytable where 1=1 "

'以下調用上面的函數即可,可以很多個調用（理論上是任意）

sqls=sql("subject",subject,sqls)

sqls=sql("company",company,sqls)

sqls=sql("content",content,sqls)

sqls=sql("address",address,sqls)

sqls=sql("infomation",infomation,sqls)

sqls=sql("note",note,sqls)

sqls=sqls & " order by id desc"

rs.open sqls,conn,3,2

%>

結束語

如果沒有關鍵的函數Function sql(a,b,sqls)，我們可以想象，需要多少判斷的一個接一個的語句！

分享：如何使用ASP腳本技術
在VB腳本中，你不必定義變量或者象在其他腳本語言中明確的定義他們的類型。一個變量在你第一次使用的時候存在。但是，這個特性讓你的代碼廣泛的存在打字稿中。如果你在代碼中錯誤的定義一個變量名，那么一個新的變量將被創建。你的腳本可能不能正常的工作，