top
Loading...
站內搜索腳本例子六(JavaScript)
腳本說明:
第一步:把如下代碼加入<body>區域中
<script language = "JavaScript">
var key = "";
function makeEntry ()
{
this.Name="";
this.URL = "";
this.Desc = "";
return this;
}

function makeArray(n)
{
this.length = n;
for (var k = 1; k <= n; k++)
{
this[k] = "";
}
return this;
}

function makeLinks(size)
{
this.length = size;
for (var r=1; r<= size; r++)
{
this[r] = new makeEntry();
this[r].Name = namesArray[r];
this[r].URL = urlsArray[r];
this[r].Desc = descArray[r];
}
return this;
}

var linksize=0;

namesArray = new makeArray(linksize);
urlsArray = new makeArray(linksize);
descArray = new makeArray(linksize);


var arraycount=0;

<!-- 以下是數據庫部分,隨意添加和刪除-->
arraycount += 1
urlsArray[arraycount] = "http://nettrain.163.net/java/navigation/newscript.htm"
namesArray[arraycount] = "網際快車Java腳本資源站"
descArray[arraycount] = "java javascript applet games activex asp cgi databases search media dw2 midi
music menu html dhtml intranet internet scripts games perl downloads password cookies free graphics
freescripts calander dw2 flash plugins 腳本 密碼保護頁 腳本 免費資源 主頁制作技巧 下載 搜索引擎 表單遞交 插
件 教學 動態頁面 圖形圖象 多媒體"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/desktop/adc120.html"
namesArray[arraycount] = "Advanced Disk Catalog v1.20 beta 1"
descArray[arraycount] = "Catalog your disks, folders and files"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/tools/azpr.html"
namesArray[arraycount] = "Advanced ZIP Password Recovery v0.91a"
descArray[arraycount] = "Recover lost password for encrypted ZIP file"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/games/AdveWith.html"
namesArray[arraycount] = "Adventures With Chickens 2.01"
descArray[arraycount] = "A Christian Windows-95 Arcade/Adventure Game"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/games/INV58FUL.html"
namesArray[arraycount] = "Alien Invasion 1.0"
descArray[arraycount] = "Action Game for players with disabilities"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/games/ayatze22.html"
namesArray[arraycount] = "All In One Yahtzee v2.2"
descArray[arraycount] = "Advanced yahtzee game with 5 variations."

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/games/atris_10.html"
namesArray[arraycount] = "Alphatris v1.0"
descArray[arraycount] = "Arcade style word game for windows 95"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/inet/amg32setup.html"
namesArray[arraycount] = "Amigo! v2.2 "
descArray[arraycount] = "Internet Enabled, Free Form PIM"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/games/32anbj12.html"
namesArray[arraycount] = "Animated Blackjack v1.2"
descArray[arraycount] = "A realistic game with great graphics.."

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/games/95ani12.html"
namesArray[arraycount] = "Animated Slots v1.2"
descArray[arraycount] = "A fun 5 wheel slot machine with great graphics.."

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/inet/pie184.html"
namesArray[arraycount] = "ApplePie Pro HTML Editor 1.8.4"
descArray[arraycount] = "Tag highlighting, JavaScript, Homepage Wizard"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/tools/apackmk1.html"
namesArray[arraycount] = "arclab Packager MK1 1.2.0.61"
descArray[arraycount] = "Split one or more files into packages"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/games/bbsetup.html"
namesArray[arraycount] = "BrainsBreaker 2.1"
descArray[arraycount] = "Create and play jigsaw puzzles in Windows95"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/business/bs1sb.html"
namesArray[arraycount] = "BS1 Small Business v1.1"
descArray[arraycount] = "Bill customers, pay vendors, and manage accounting"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/games/bubble97.html"
namesArray[arraycount] = "Bubble Puzzle 97 v1.1g"
descArray[arraycount] = "Bubble Puzzle 97 from Conmeg. Bust-a-move clone."

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/business/bfsnf216.html"
namesArray[arraycount] = "Budget for Success Win95 v2.16"
descArray[arraycount] = "Budget databases, mortgages, investment planner."

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/program/bc10.html"
namesArray[arraycount] = "Bug Collector 1.0"
descArray[arraycount] = "Manage feature requests and problem reports easier."

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/games/bzzz_1_01.html"
namesArray[arraycount] = "Bzzz! 1.01"
descArray[arraycount] = "Win95 Game Control a frog to catch flies."

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/inet/cachekil.html"
namesArray[arraycount] = "Cache Killer Pro 1.4"
descArray[arraycount] = "Clean up Internet Cache folders"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/business/cal9107b.html"
namesArray[arraycount] = "Calendar+ v1.07.00"
descArray[arraycount] = "Appointment scheduler and to do minder"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/business/cb32.html"
namesArray[arraycount] = "Calendar Builder v2.2b"
descArray[arraycount] = "Quickly and easily make your own custom calendars."

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/multi/cdm160.html"
namesArray[arraycount] = "CDMaster v1.6"
descArray[arraycount] = "CDPlayer w/Dubbing and Picture Attachment"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/inet/cgixpert.html"
namesArray[arraycount] = "CGI Expert 3.03"
descArray[arraycount] = "CGI/ISAPI/NSAPI component suite for Delphi and C++"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/tools/clox_5.html"
namesArray[arraycount] = "CLOX v1.3"
descArray[arraycount] = "Gives you world times on your desktop"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/desktop/snow_wi.html"
namesArray[arraycount] = "D2G Snow screen saver v1.00"
descArray[arraycount] = "Displays snow falling on a starry night w/snowman."

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/inet/dbQuickPage.html"
namesArray[arraycount] = "dbQuickPage 1.1"
descArray[arraycount] = "Database to HTML conversion for the Web."

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/misc/ftrim21.html"
namesArray[arraycount] = "Final Trim v2.1"
descArray[arraycount] = "A Win95 WWII Submarine Multimedia Publication"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/inet/np25.html"
namesArray[arraycount] = "NetPopup 2.51"
descArray[arraycount] = "Messaging tool for Networks"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/inet/nmong144.html"
namesArray[arraycount] = "NewsMonger Search Agent 1.44"
descArray[arraycount] = "Automatically monitor newsgroups for keywords"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/tools/notebk32.html"
namesArray[arraycount] = "Notebook v5.1"
descArray[arraycount] = "Large file text editor."

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/commun/nprsv15.html"
namesArray[arraycount] = "NotePager 1.5"
descArray[arraycount] = "An easy to use alphanumeric paging software"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/multi/ntrack10.html"
namesArray[arraycount] = "n-Track v1.5.2"
descArray[arraycount] = "An audio/MIDI shareware multitrack recorder"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/business/sd20.html"
namesArray[arraycount] = "SecurDesk! 2.0"
descArray[arraycount] = "Security environment and utilities for Win 95/NT"

arraycount += 1
urlsArray[arraycount] = "http://www.win-shareware.com/desktop/yapla16.html"
namesArray[arraycount] = "Yapla V1.6"
descArray[arraycount] = "YAPLA - Yet Another Program Launcher"

linksize = arraycount;

function searchLinks(links, keyword, hits, dirw)
{
var resultcount=0;
<!-- 如下是生成查詢結果顯示頁面!外觀自己可以修改相應代碼即可! -->
document.write('<HTML>');
document.write('<BODY BGCOLOR=#000000 TEXT=white LINK=yellow VLINK=yellow ALINK=yellow>');
document.write('<CENTER><TABLE BORDER=3 CELLSPACING=0 CELLPADDING=3 BGCOLOR="#ff0000
"><TR><TD><CENTER><TABLE BORDER=1 CELLSPACING=0 CELLPADDING=3 BGCOLOR="#42526B"><TR><TD>');
document.write("<CENTER><font color=red>Results for keywords: </font><font size=5 color=yellow>"
+keyword +"</font></CENTER>");
document.write('</TD></TR></TABLE></CENTER></TD></TR></TABLE></CENTER><P>');
document.write('<OL>');
for (var q=1; q<=links.length; q++)
{
if (links[q].URL.toLowerCase().indexOf(dirw) != -1)
{
if (links[q].Desc.toLowerCase().indexOf(keyword) != -1)
{
resultcount += 1;
if (resultcount > hits)
{
break;
}
else
{
document.write("<LI>");
document.write("<a href="" + links[q].URL + "">" + links[q].Name + "</a>");
document.write(" -" + links[q].Desc + "<br>");
continue;
}
}
if (links[q].Name.toLowerCase().indexOf(keyword) != -1)
{
resultcount += 1;
if (resultcount > hits)
{
break;
}
else
{
document.write("<LI>");
document.write("<a href="" + links[q].URL + "">" + links[q].Name + "</a>");
document.write(" -" + links[q].Desc + "<br>");
continue;
}
}
}
}

}

</script>
<script>
<!-- 如下是表單合法性檢查,主要是避免一些非法字符的查詢! -->
function validate_form()
{
txt = document.form.search.value;
newindex = document.form.numhits.selectedIndex;
dahits = document.form.numhits[newindex].value;
newindexb = document.form.whichdir.selectedIndex;
dadir = document.form.whichdir[newindexb].value;
if (txt.indexOf(".") != -1){
alert("Search is invalid! Contains a '.'"); return;}
if (txt.indexOf(",") != -1){
alert("Search is invalid! Contains a ','"); return;}
if (txt.indexOf("@") != -1){
alert("Search is invalid! Contains a '@''"); return;}
if (txt.indexOf("!") != -1){
alert("Search is invalid! Contains a '!''"); return;}
if (txt.indexOf("#") != -1){
alert("Search is invalid! Contains a '#''"); return;}
if (txt.indexOf("$") != -1){
alert("Search is invalid! Contains a '$''"); return;}
if (txt.indexOf("%") != -1){
alert("Search is invalid! Contains a '%''"); return;}
if (txt.indexOf("^") != -1){
alert("Search is invalid! Contains a '^''"); return;}
if (txt.indexOf("&") != -1){
alert("Search is invalid! Contains a '&''"); return;}
if (txt.indexOf("*") != -1){
alert("Search is invalid! Contains a '*''"); return;}
if (txt.indexOf("(") != -1){
alert("Search is invalid! Contains a '(''"); return;}
if (txt.indexOf(")") != -1){
alert("Search is invalid! Contains a ')''"); return;}
if (txt.indexOf("[") != -1){
alert("Search is invalid! Contains a '[''"); return;}
if (txt.indexOf("]") != -1){
alert("Search is invalid! Contains a ']''"); return;}
if (txt.indexOf(";") != -1){
alert("Search is invalid! Contains a ';''"); return;}
if (txt.indexOf(":") != -1){
alert("Search is invalid! Contains a ':''"); return;}
if (txt.indexOf("<") != -1){
alert("Search is invalid! Contains a '<''"); return;}
if (txt.indexOf(">") != -1){
alert("Search is invalid! Contains a '>''"); return;}
if (txt.indexOf("?") != -1){
alert("Search is invalid! Contains a '?''"); return;}
if (txt.indexOf("=") != -1){
alert("Search is invalid! Contains a '=''"); return;}
if (txt.indexOf("+") != -1){
alert("Search is invalid! Contains a '+''"); return;}
else
{
jsi = new makeLinks(linksize);
searchLinks(jsi, txt, dahits, dadir);
document.write('</OL>');
document.write('<font color=red>....... 查詢結果結束 .......</font><P>');
document.write('<hr>');
document.write('</body></html>');
}

}
</script>

<table width=59% border=1 cellpadding=0 cellspacing=0 align=center valign=top>
<tr>
<td width=100% align=left bgcolor=#42526B height="232">
<form name="form">
<center>
<font color="yellow"> </font>
</center>
<center>
<font color="yellow">關鍵字(小寫字符,支持中文):</font> <font color="yellow"><b>
<input name="search" type=text size="20">
</b> </font>
</center>
<font color="yellow"><b><br>
</b> </font>
<center>
<font color="#FFFF00">返回記錄數:</font> <font color="yellow"><font face="Arial, Helvetica,
sans-serif">
<select name="numhits" size="1">
<option selected value="25">25
<option value="50">50
<option value="75">75
<option value="100">100
<option value="150">150
<option value="200">200
</select>
</font>檢索分類<font face="Arial, Helvetica, sans-serif"> </font><b><font size=3><font size=3>
<select size=1 name="whichdir" class="pt9">
<option selected value="http">ALL
<option value="java">javaScript
<option value="business">Business
<option value="commun">Communications
<option value="desktop">Desktop
<option value="educate">Education
<option value="games">Games
<option value="graphics">Graphics
<option value="hobby">Hobby
<option value="homeuse">Home Use
<option value="inet">Internet
<option value="multi">Multimedia
<option value="program">Programming
<option value="tools">System Tools
</select>
</font></font> </b> </font>
</center>
<font color="yellow"><b><font size=3><font size=3> <br>
<br>
</font></font></b></font><font color=yellow size=3><font color=yellow size=3>
<center>
<font color="yellow"><b>
<input type="button" name="submit" value="Search" onClick="validate_form()">
<input type="reset" name="reset" value=" Clear ">
</b> </font>
</center>
</font></font>
</form>

北斗有巢氏 有巢氏北斗