NewsRhzhi | 先创资讯 | 旧版入口
rhzhi.net
网站首页 | NewsRhzhi | 先创资讯 | 操作系统 | 工具软件 | 办公软件 | 网站设计 | 组网专栏 | 平面设计 | 多 媒 体 | 程序开发 | 硬件资料 | 聊天软件
您现在的位置: 先创网 >> 程序开发 >> ASP >> 文章正文
站内搜索脚本例子五(javascript)
不详
2005-6-16文/佚名
    

脚本说明:
第一步:把如下代码加入<body>区域中
<SCRIPT LANGUAGE="JavaScript">
<!-- Hide Script from Old Browsers
Keyword = new Object();
Descrip = new Object();
Address = new Object();

// Keyword[0] = n (where n is the number of keywords which can be searched
Keyword[0] = 5 //对应查询组的数量;

Keyword[1] = "javascript"
Descrip[1] = "最全的javascript资源站-javascript2000.com"
Address[1] = "http://www.javascript2000.com"

Keyword[2] = "javascript"
Descrip[2] = "很好的javascript站点"
Address[2] = "http://www.cnlot.com/"

Keyword[3] = "javascript"
Descrip[3] = "java神捕"
Address[3] = "http://pcafei.3322.net/"

Keyword[4] = "javascript"
Descrip[4] = "精彩天地"
Address[4] = "http://demoy.3322.net/"

Keyword[5] = "javascript"
Descrip[5] = "国外最大的javascript资源站"
Address[5] = "http://www.javascript.com/"
function checkDatabase() {

var Found = false
var Item = document.forms[0].searchfor.value.toLowerCase();

stats='toolbar=no,location=no,directories=no,status=no,menubar=no,'
stats += 'scrollbars=yes,resizable=yes'
MsgBox = window.open ("","msgWindow",stats)
MsgBox.document.write("<head><title>查询结果</title></head>");
MsgBox.document.write ("<BODY BGCOLOR=#ffffff TEXT=#000000 LINK=#000080 VLINK=#800040
ALINK=#FF0000><CENTER>查询结果</CENTER>")
MsgBox.document.write ("For the keyword: "+Item+"<HR>");
for (var i=1; i <= Keyword[0]; i++) {
if(Item == Keyword[i]) {
Found = true;
MsgBox.document.write (Descrip[i]+"<BR><A HREF="+Address[i]+">Click Here To View</A><br>")

}
}
if(!Found)
MsgBox.document.write ("没有发现与该关键词有关的条目。")
MsgBox.document.write ("<H6>Enjoy it!<BR><A HREF=http://java2000.126.com>http://java2000.126.com</A></H6>")
MsgBox.document.write ("<FORM class='pt9'><CENTER>")
MsgBox.document.write ("<INPUT type='button' value='关闭查询窗口' onClick = 'self.close()'>")
MsgBox.document.write ("</CENTER></FORM>") }
// -->
</SCRIPT>

如下代码生成查询表单界面:

<form name="form1">
<u>请输入查询关键词:</u><br>
<input type="text" name="searchfor" value="" size=20>
<input type="button" value="查询" onClick="checkDatabase()" name="button">
<br>
<!-- End Of File -->
<font color="#FF0000">输入小写字符</font>
<p>
</form>

打印此页 投稿与建议 返回顶部
栏 目 索 引
软件应用 SOFTWARE
Win XP | NT/2003
Win2000 | DOS/Win9x
PowerPoint | Office
Excel | Word
网络软件 | 实用软件
媒体软件 | 系统软件
常用软件 | 办公软件
聊天软件 | 网络安全
新软试用 | Vista
设计在线 DESIGN
Dreamweaver | 3DMax
Photoshop | Flash
平面设计 | 网页设计
多 媒 体 | 精品画廊
精彩专区 SPECIAL
Q Q 专区 | 热门专题
组网玩网 | 程序开发
应用集锦 |

没有任何图片文章
相关文章
关于我们 - 联系方式 - 合作伙伴 - 网站大事记 - 网站地图 - 我要投稿
Copyright ©1997-2008 先创网 All Rights Reserved.
先创科技 版权所有