国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學(xué)院 > 開發(fā)設(shè)計 > 正文

使用組件搜索

2019-11-18 22:02:00
字體：大 中 小
供稿：網(wǎng)友
MicroSoft的asp(Active  Server  Page)技術(shù)極大的方便了在網(wǎng)絡(luò)中對于數(shù)據(jù)庫的訪問，而且由于ASP不同于CGI需要那么多的請求（減少了服務(wù)器的資源占用），以及ASP同Windows  NT  、2000的結(jié)合使得ASP技術(shù)被廣泛的應(yīng)用于今日的Internet，然而不知道你仔細(xì)的想過沒有！ASP除了利用ADO對數(shù)據(jù)庫的訪問和其他幾個內(nèi)置組件的利用外，就不能作其他什么的了，相對于perl,php等程序，ASP的功能看起來就非常簡單，而且功能缺乏；但是老比畢竟是老比，他給大家留了一手，那就是ASP組件(關(guān)于組件的概念，現(xiàn)在一大堆，你可不要搞錯了），通過組件的開發(fā)你可以做到其他語言（比如PHP,PERL,C++）能做到的一切，甚至在某些方面還能更加超出，本文力求給你展示一下ASP組件的強大功能，但是由于ASP組件自身的過（使用的是非注冊組件），可能有的時候使用會出現(xiàn)不穩(wěn)定的狀態(tài)，然而本文是力求向你展示一點東西以及提供一種思路給你，而不是其他，所以不足的地方就請求了原諒了！ 代碼思路：一般來看，我們提交一個表單給一個搜索引擎程序，搜索引擎獲得提交的數(shù)據(jù)然后處理，返回結(jié)果；然而這種東西其實都是取得了一個提交的變量，我們可以使用另外一種直接跟從連接的方式訪問搜索引擎，例如你可以使用yeah的首頁搜索一個關(guān)鍵字“xuankong”,也可以使用下面的連接“http://search.163.com/cgi-
bin/search/engine/search.fcgi?key=xuankong”取得使用結(jié)果，本文就是通過使用ASP  的HTTP組件訪問這種直接的連接，使用GET方式取得原本在WEB頁中返回的數(shù)據(jù)，然后輸出。 如果本組件能夠?qū)崿F(xiàn)多線程（如果那樣就可以同時對不同的引擎取得數(shù)據(jù)，不必象現(xiàn)在單一的訪問然后取得結(jié)果，）和代碼進一步的優(yōu)化和改進的話，將會極大的節(jié)約你的時間，讓你一次搜索同時返回多個引擎的結(jié)果！ 備注：搜索出來的結(jié)果中，由于某些引擎的類目使用了相對的連接，所以無效(這些結(jié)果其實你都可以處理的，只是筆者太懶了，所以不想花那些功夫)，但是所有的網(wǎng)站和網(wǎng)頁的連接都是有效的，本文提供的代碼只是適合于測試，不適合于具體的應(yīng)用，如果需要具體的應(yīng)用，需要使用適當(dāng)?shù)膆ttp組件，或者如果你是程序高手的話可以自己寫多線程的組件，關(guān)于http組件的代碼，你可以在www.chinaasp.com看到，欲得到更多的asp組件請訪問www.aspcn.com！
代碼開始：
<!--
有任何的意見和建議請Mail：pu.junjie@263.net，
本代碼使用了http組件同時搜索出了幾個搜索引擎的數(shù)據(jù)，讓所有的搜索結(jié)果顯示在一個頁面當(dāng)中，本文只是提供一種思路和思考
給大家展示ASP組件的強大功能！ 由于本組件是非注冊組件可能功能有一定限制，同時由于同時搜索了幾個引擎(搜索引擎可以任意擴充，但是會影響速度
的)，所以系統(tǒng)輸出數(shù)據(jù)的時間較長，請耐心等待 在使用本代碼前請你先去下載http://www.serverobjects.com/comp/asphttp3.zip，然好解壓縮到你的system32目錄(winnt  or  win2000)   
使用regsvr32  asphttp.dll  注冊本組件，然后拷貝本文件到相關(guān)的iis可執(zhí)行目錄，使用IE或者netscape瀏覽
-->
<%
'判斷是輸出頁面還是處理數(shù)據(jù)，從而調(diào)用不同的部分
keyWord=trim(request.form("keyword"))
if      isnull(keyword)  or  keyword=""  then
%>
<!--
html頁面代碼顯示
-->
<html>
<head>
<title>ASPCN.COM  超級搜索引擎</title>
<meta  http-equiv="Content-Type"  content="text/html;  charset=gb2312">
<META  NAME="Author"  CONTENT="蒲俊杰">
<META  NAME="Keywords"  CONTENT="ASP,組件,www.aspcn.com">
<style  type="text/CSS">
<!--
table  {    font-size:  9pt;  font-style:  normal}
.test  {    border:  1px  #000000  dashed;  border-color:  #000000  none}
.test1  {    background-color:  #CCFFCC;  clip:      rect(      );  font-size:  9pt;  font-style:  
normal;  border-style:  dashed;  border-top-width:  1px;  border-right-width:  1px;  border-bottom-width:  
1px;  border-left-width:  1px}
-->
</style>
</head>

<body  bgcolor="#FFFFFF"  leftmargin="0"  topmargin="0"  marginwidth="0"  marginheight="0">
<table  width="75%"  border="1"  align="center"  height="20"  cellpadding="0"  cellspacing="1"  
bgcolor="#66CC99"  bordercolor="#FFFFFF">
   <tr>   
       <td  height="4">   
           <div  align="center"><font  color="#000000"  size="2"  face="Arial">ASPCN.COM</font><font  
color="#000000"  size="3"  face="Arial"></font><b><font  color="#000000"  size="3"  face="Arial">   
               </font><font  color="#000000"  size="3"  face="仿宋_GB2312">超級搜索引擎</font></b></div>
       </td>
   </tr>
   <tr  bordercolor="#66CC99">   
       <td  height="21">請選擇下面的搜索引擎:（請注意：本搜索引擎只是適合于<font  color="#ffffff">網(wǎng)頁搜索
</font>）</td>
   </tr>
   <tr  bordercolor="#FFFFFF"  align="center"  valign="top">   
       <td  height="20">   
           <form  method="post"  action="http.asp">
               <table  width="96%"  border="0"  height="21"  align="center">
                   <tr>   
                       <td  height="10"  width="31%">   
                           <div  align="right">請輸入你要搜索的關(guān)鍵字：  </div>
                       </td>
                       <td  height="10"  width="69%">   
                           <input  type="text"  name="keyword"  class="test">
                       </td>
                   </tr>
                   <tr>   
                       <td  height="2"  width="31%">   
                           <div  align="right">請選擇你使用的搜索引擎：  </div>
                       </td>
                       <td  height="2"  width="69%">   
                           <input  type="checkbox"  name="yeah"  value="yeah">
                           Yeah   
                           <input  type="checkbox"  name="yahoo"  value="yahoo">
                           Yahoo   
                           <input  type="checkbox"  name="sina"  value="sina">
                           Sina   
                           <input  type="checkbox"  name="sohu"  value="sohu">
                           Sohu   
                           <input  type="checkbox"  name="goyoyo"  value="goyoyo">
                           Goyoyo</td>
                   </tr>
                   <tr>   
                       <td  height="2"  colspan="2">   
                           <div  align="right">   
                               <input  type="submit"  name="Submit"  value="讓我們開始吧"  class="test1">
                           </div>
                       </td>
                   </tr>
               </table>
           </form>
       </td>
   </tr>
   <tr  bordercolor="#FFFFFF">   
       <td  height="20">備注：由于使用了多個搜索引擎檢索，所以系統(tǒng)輸出的時間較長，請耐心等待...  ...</td>
   </tr>
   <tr  bordercolor="#FFFFFF">
       <td  height="20">
           <div  align="center">建議使用  IE  5.x  800*600訪問  ASPCN.COM  版權(quán)保留(2000-2001)  <font  
size="2">&copy;</font></div>
       </td>
   </tr>
</table>
</body>
</html>
<!--
頁面代碼顯示結(jié)束
數(shù)據(jù)處理代碼顯示
-->
<%else
   Server.ScriptTimeout  =  100'設(shè)置腳本時間，由于系統(tǒng)輸出時間較長所以必須修改腳本代碼執(zhí)行時間
   Set  http  =  Server.CreateObject("AspHTTP.Conn")'連結(jié)組件
   keyword=request.form("keyword")'取得搜索關(guān)鍵字
if  request.form("yeah")="yeah"  then'判斷是否選擇使用yeah搜索引擎
http.Url  =  "http://search.163.com/cgi-bin/search/engine/search.fcgi?key="&keyword'處理搜索地址
http.RequestMethod  =  "GET"'設(shè)置取得數(shù)據(jù)方式"GET，取得數(shù)據(jù)"
response.write    http.geturl'輸出搜索結(jié)果
end  if
'以下代碼請參考上例的說明，恕不羅嗦
'使用yahoo
if  request.form("yahoo")="yahoo"  then
http.Url  =  "http://google.yahoo.com/bin/query_gb?p="&keyword
http.RequestMethod  =  "GET"
response.write    http.geturl
end  if
'使用sohu
if  request.form("sohu")="sohu"  then
http.Url  ="http://search.sohu.com/cgi-bin/search_main.cgi?
txt_keyword="&keyword&"&page_index=0&fuzzy=0&catagory=main"
http.RequestMethod  =  "GET"
response.write    http.geturl
end  if
'使用goyoyo
if  request.form("goyoyo")="goyoyo"  then
http.Url  ="http://www.goyoyo.com.cn/gyy/query?dbs=guidedbs&code=GB&query="&keyword
http.RequestMethod  =  "GET"
response.write    http.geturl
end  if
set  http=nothing
end  if
'提交數(shù)據(jù)處理結(jié)束
%>

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板： 伊宁市| 大同市| 石棉县| 西峡县| 荔浦县| 四平市| 西乌珠穆沁旗| 连州市| 成武县| 綦江县| 鲜城| 广宗县| 淄博市| 察隅县| 梁山县| 县级市| 收藏| 河北区| 英吉沙县| 措美县| 施甸县| 商城县| 崇阳县| 河曲县| 保山市| 望奎县| 怀集县| 大化| 扎赉特旗| 宣汉县| 阿克苏市| 彰武县| 宁德市| 万荣县| 运城市| 高台县| 西平县| 白朗县| 若羌县| 乐平市| 沂源县|