推薦：解析ASP檢查網站鏈接是否正常的函數% FunctionurlChk(sUrl) onerrorresumenext SetxmlHttp=Server.CreateObject(Microsoft.XMLHTTP) xmlHttp.openGET,sUrl,false xmlHttp.send ifxmlHttp.Status200then urlChk=false else urlChk=true endif EndFunction sUrl=http://www.code-123.com ifu
用ASP實現搜索引擎的功能是一件很方便的事，可是，如何實現類似3721的智能搜索呢？比如，當在搜索條件框內輸入中國人民時，自動從中提取中國、人民等關鍵字並在數據庫內進行搜索。看完本文後，你就可以發現，這個功能實現起來竟然是如此的簡單。第一步，我們要建立一個名為db_sample.mdb的數據庫（本文以Access2000數據庫為例），並在其中建立表T_Sample.表T_Sample包括如下字段：
ID自動編號
U_Name文本
U_Info備註
第二步，我們開始設計搜索頁面Search.asp.該頁麵包括一個表單（Frm_Search），表單內包括一個文本框和一個提交按鈕。並將表單的method屬性設為get，action屬性設為Search.asp，即提交給網頁自身。代碼如下：
| <!--Search.asp--> <formname=frm_Searchmethod=getaction=Search.asp> 請輸入關鍵字： <inputtype=textname=keysize=10> <inputtype=submitvalue=搜索> </form> |
下面，就進入了實現智能搜索的關鍵部分。
首先，建立數據庫連接。在Search.asp的開始處加入如下代碼：
| <% DimstrProvider,CNN strProvider=Provider=Microsoft.Jet.OLEDB.4.0;DataSource= strProvider=strProvider&Server.MapPath(/)&/data/db_Sample.mdb '假設數據庫存放在主頁根目錄下的data目錄下 SetCNN=Server.CreateObject(ADODB.connection) CNN.OpenstrProvider打開數據庫連接 %> |
接下來，判斷ASP頁所接收到的數據，並在數據庫中進行搜索。
| <fontcolor=#FF0000>未找到任何結果！ ！ ！ </font> <% Else %> |
搜索名稱為<fontcolor=#FF0000><%=S_Key%></font>的項，共找到<fontcolor=#FF0000><%=RST.RecordCount%></font>項：
| <% WhileNotRST.EOF遍歷整個記錄集，顯示搜索到的信息並設置鏈接 %> <!--此處可設為你所需要的鏈接目標--> <fontstyle=font:12pt宋體><ahref=info.asp?ID=<%=RST(ID)%>target=_blank><%=RST(U_Name)%></a></font> <!--顯示部分詳細內容--> <fontstyle=font:9pt宋體><%=Left(RST(U_Info),150)%></font><p> <% RST.MoveNext Wend RST.Close SetRST=Nothing EndIf EndIf %> |
分享：ASP教程之asp製作常見flash新聞圖片輪換代碼這是一個正常的網頁文件html head metahttp-equiv=Content-Typecontent=text/html;charset=gb2312/ title 新聞圖片輪換/title /head body !--#Includefile=diaoyong.asp-- /body /html 任何網頁只要調用下面這個文件（diaoyong.asp）就可以了，所用f
共2頁上一頁12下一頁