推薦：10行代碼讓你告別Arp作惡導致的掉線一同學在宿舍是很多人一起上網，有不少人用arp作惡，導致上網老是掉線。問我有什么辦法嗎，于是就寫了下面的vbs腳本，同學說用了后聊天也不掉線了。 以
我們經常會遇到多重查詢問題，而長長的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 3.0高級編程(三十四)7.4.4 使用IIS錯誤頁面與ASP錯誤處理過程相關的內容是為IIS提供可定制的錯誤頁面。事實上，在IIS 4.0中也有這個特點。但新的ASP內置對象ASPError，更易于使用且提供更加強大的功能。在第4章，
新聞熱點
疑難解答
