Intra-site search script (III)

Last Update:2017-01-13 Source: Internet

Author: User

Developer on Alibaba Coud: Build your first app with APIs, SDKs, and tutorials on the Alibaba Cloud. Read more ＞

Tip: you can modify some code before running

<html><head><title>Intra-site search script (III)</title><style type="text/css"></style><meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head><body><br><br><center><font color=red face="隶书" size=6>Intra-site search script (III)</font></center><br><br><center><table border=0 bordercolor=#111111 borderlight=green cellpadding="0" cellspacing="0"><tr><td align=center><font size=5 color=red face="Arial, Helvetica, sans-serif"><strong>In the script display area</strong></font></td></tr><tr><td align=center width=300><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://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 p Assword 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 [arraycou Nt] = "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] =" Appie ie 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 [arra Ycount] = "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-mongoware.com/games/bzzz_jw01.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 schedment 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 urlsarrayray [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] = "Dbquick page 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] = "NetPopu P 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 policware 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>Keyword:</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 (" "+ links [q]. Name +" "); 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 (" "+ links [q]. Name +" "); 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=100% border=1 cellpadding=0 cellspacing=0 align=center valign=top> <tr> <td width=100% align=left bgcolor=#42526B height="232"> <form name="form"> <center> <p></p> </center> <center> <font color="yellow">Keywords (lowercase characters, Chinese supported ):</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">Number of returned records:</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>Search category<font face="Arial, Helvetica, sans-serif"> </font><b><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">Holobby<option value="homeuse">Home Use<option value="inet">Internet<option value="multi">Multimedia<option value="program">Programming<option value="tools">System Tools</select><br>Enter"<font color=red>A</font>"Try</font> </b> </font> </center> <font color="yellow"><b><font size=3> <br> <br> </font></b></font><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> </form> </table></td></tr></table></center><br><br><br><br></body></html>

Tip: you can modify some code before running

This article is an English version of an article which is originally in the Chinese language on aliyun.com and is provided for information purposes only. This website makes no representation or warranty of any kind, either expressed or implied, as to the accuracy, completeness ownership or reliability of the article or any translations thereof. If you have any concerns or complaints relating to the article, please send an email, providing a detailed description of the concern or complaint, to info-contact@alibabacloud.com. A staff member will contact you within 5 working days. Once verified, infringing content will be removed immediately.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

Get Started for Free

Sales Support

1 on 1 presale consultation

Chat Contact Sales
After-Sales Support

24/7 Technical Support 6 Free Tickets per Quarter Faster Response

Open a Ticket
Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.

Learn More

Intra-site search script (III)

Contact Us

A Free Trial That Lets You Build Big!

Sales Support

After-Sales Support