非常不错的页面搜索器,还可以移动 -- [表单特效]─ 深山工作室提供网络投票系统|微信公众号投票|微信公众号小程序|抖音小程序|百度小程序|微信公众号开发|企业网站建设

非常不错的页面搜索器,还可以移动

网络 2008/6/6 21:02:00 深山行者字体:大中小浏览 5896

以下为详细代码

脚本说明:
把如下代码加入<body>区域中
<style type=text/css>
BODY {
	FONT-FAMILY: "宋体","Arial","Times New Roman"; FONT-SIZE: 12px; LETTER-SPACING: 1pt; LINE-HEIGHT: 22px; MARGIN-LEFT: 5pt; MARGIN-TOP: 5pt
}
#scontentmain {
	HEIGHT: 30px; POSITION: absolute; TOP: 28px; WIDTH: 228px
}
#scontentbar {
	BORDER-BOTTOM: black 1px solid; BORDER-LEFT: black 1px solid; BORDER-RIGHT: black 1px solid; BORDER-TOP: black 1px solid; CURSOR: hand; HEIGHT: 15px; PADDING-BOTTOM: 1px; PADDING-LEFT: 1px; PADDING-RIGHT: 1px; PADDING-TOP: 1px; POSITION: absolute; TOP: 5px; WIDTH: 100%
}
#scontentsub {
	POSITION: absolute; TOP: 28px; WIDTH: 100%
}
A.a1:hover {
	BORDER-BOTTOM: #4a8ff2 1px solid; BORDER-LEFT: #4a8ff2 1px solid; BORDER-RIGHT: #4a8ff2 1px solid; BORDER-TOP: #4a8ff2 1px solid; LINE-HEIGHT: 13pt; WIDTH: 83px; 12px;: 1869FE; align: center
}
A.a1:link {
	COLOR: #ffffff; TEXT-DECORATION: none; 12px;align: center
}
TD {
	FONT-SIZE: 12px
}
.pos {
	POSITION: relative
}
</style>
<SCRIPT language=JavaScript>
/*** DownLoad.PcHome.net Online Search Engine ***/
/*** Author:Yoo Lee ***/
/*** Version:1.0 2001/06/04 ***/
var dragapproved=false
var zcor,xcor,ycor
function drag_onclick() {
	if  (search1.drag.checked == true ) dragapproved=false
	else dragapproved=true
	}
function movescontentmain(){
if (event.button==1&&dragapproved&&search1.drag.checked == true){
zcor.style.pixelLeft=tempvar1+event.clientX-xcor
zcor.style.pixelTop=tempvar2+event.clientY-ycor
leftpos=document.all.scontentmain.style.pixelLeft-document.body.scrollLeft
toppos=document.all.scontentmain.style.pixelTop-document.body.scrollTop
return false
}
}
function dragscontentmain(){
if (!document.all)
return
if (event.srcElement.id=="scontentbar"){
dragapproved=true
zcor=scontentmain
tempvar1=zcor.style.pixelLeft
tempvar2=zcor.style.pixelTop
xcor=event.clientX
ycor=event.clientY
document.onmousemove=movescontentmain
}
}
document.onmousedown=dragscontentmain
document.onmouseup=new Function("dragapproved=false")
function aa(e)
{
if (e==0) alert("\n-　　=  页面字符搜索引擎 1.0 测试版    =      \n\n-　　             电脑之家 版权所有\n\n-         重写了部分代码\n-         修正鼠标拖动跳跃的bug，\n-         保留选择可否拖动……\n\n-             其他功能正在测试中！\n\n");
return;	
}
function  cose()
{
if(confirm("即将关闭此窗口，如确认请按确定！\n\n如要重开此窗口请刷新页面。"))
scontentmain.style.display='none'
else 
scontentmain.style.display=''
}
//screen.width,screen.height
document.write('<div id="scontentmain"><form name="search1" onSubmit="return findInPage(this.Word.value);"><div id="scontentbar">                      <img src="images/alt0415.gif" alt="帮助" border="0" onClick="aa(0)"><img src="images/usr0415.gif" usemap="#Map" border="0"><map name="Map"><area shape="rect" coords="20,0,40,20" alt="最大化" onclick="offdisplay()"><area shape="rect" coords="0,0,20,20" alt="最小化" onclick="ondisplay()"><area shape="rect" shape="rect"  coords="34,0,60,19" alt="关闭" onclick="cose()"></map></div><div id="scontentsub"" style="visibility: show"><table width="228" border="1" cellpadding="2" cellspacing="0" bordercolorlight="#000000" bordercolordark="#FFFFFF" bgcolor="#0099CC" class=font1><tr bgcolor="#2D96FF"><td height="2" colspan="2" align="center"><input type="text"  name="Word" size="30" onChange="n = 0;" onFocus=window.document.search1.Word.value=""  ></td></tr><tr bgcolor="#CCCCCC"><td width="222">   <input type="checkbox" name="drag" value="搜索" LANGUAGE=javascript onclick="return drag_onclick()">可用鼠标拖动窗口 <a href="#top">↑</a></td><td width="61" align="center"><input type="submit" name="Submit" value="搜索"></td></tr></form></table></div></DIV>');

/******************** do Floating Window's Mouse Action ********************/

var w=document.body.clientWidth-450
var h=190
w+=document.body.scrollLeft
h+=document.body.scrollTop

var leftpos=w
var toppos=h
scontentmain.style.left=w
scontentmain.style.top=h

function ondisplay(){
if (scontentsub.style.display=='')
scontentsub.style.display='none'
else
scontentsub.style.display==''
}

function offdisplay(){
if (scontentsub.style.display=='none')
scontentsub.style.display=''
else
scontentsub.style.display=='none'
}

function staticize(){
w2=document.body.scrollLeft+leftpos
h2=document.body.scrollTop+toppos
scontentmain.style.left=w2
scontentmain.style.top=h2
}
window.onscroll=staticize

function GetWord() 
{
	var tr
//	event.cancelBubble = true 
//	event.returnValue=false
}
function FindWord(w)
{
	for (var i=0;i<WordList.options.length;i++)
		if (WordList.options[i].text==w) 
		{
			WordList.options[i].selected=true
			Output.value=WordExpln[i]
			RESULT.style.visibility="visible"
			return true
		}
	return false
}
/******************** Main Part ********************/
var canDrag=0,canGetWord=0
var oldtop=0,oldscrolltop=0
var WordExpln=new Array()
var G_xmlHTTP
document.onmousemove = GetWord

var NS4 = (document.layers);
var IE4 = (document.all);

var win = this;
var n   = 0;

function findInPage(str)
{
	var txt, i, found;
	if (str == "")
		return false;
	if (NS4)
	{
		if (!win.find(str))
		while(win.find(str, false, true))
			n++;
		else
		n++;
	if (n == 0) alert(str + " ...             您要找的文字不存在。\n \n请试着输入页面中的关键字再次查找！\n \n 并且请注意，不要把“？”或“：”也输入查找！！！");
	}

if (IE4)
	{
		txt = win.document.body.createTextRange();
		for (i = 0; i <= n && (found = txt.findText(str)) != false; i++)
		{
			txt.moveStart("character", 1);
			txt.moveEnd("textedit");
		}
		if (found)
		{
		 txt.moveStart("character", -1);
		 txt.findText(str);
		 txt.select();
		 txt.scrollIntoView();
	 n++;		}
		else
		{
			if (n > 0)
			{
				n = 0;
				findInPage(str);
			}
			else
				alert(str + "...            您要找的文字不存在。\n \n请试着输入页面中的关键字再次查找！\n \n 并且请注意，不要把“？”或“：”也输入查找！！！");
		}
	}
	return false;
}

self.onError=null;
	currentX = currentY = 0;  
	whichIt = null;   
    lastScrollX = 0; lastScrollY = 0;
	NS = (document.layers) ? 1 : 0;
	IE = (document.all) ? 1: 0;
</SCRIPT>

前一页:非常漂亮的当前页面内容搜索代码

后一页:当鼠标经过表单,表单承现选择状效果

相关阅读: 启动旅行社管理系统3.0的开发服务; 四川省中国青年旅行社长顺分社; Web标准中XHTML的代码规范; 仿mop分页代码; 鼠标经过表格列时变色; 连云港旅游网; 对于转换的不确定数数用ubound进行下限处理; 详解VBScript里的对象正则表达式功能介绍

更多信息>>栏目类别选择: 百度小程序开发; 微信小程序开发; 微信公众号开发; uni-app; asp函数库; ASP; DIV+CSS; HTML; python

更多>>同类信息: input文本输入框只能输入数字或字母或汉字等; 用于深山在线投票的一个javascript统计checkbox现在选中的个数一边点复选框一边验证并计算现在选了多少个复选框; 利用javascript简短功能就可以检查form表单中的元素是否已经填写; javascript日期验证比较; javascript 根据汉字拼音首字母快速定位下拉列表; javascript取汉字拼音首字母缩写程序

更多>>最新添加文章: dw里面查找替换使用正则删除sqlserver里面的CONSTRAINT; Android移动端自动化测试：使用UIAutomatorViewer与Selenium定位元素; 抖音直播音挂载小雪花懂车帝小程序; javascript获取浏览器指纹可以用来做投票; 火狐Mozilla Firefox出现：无法载入您的Firefox配置文件它可能已经丢失或是无法访问问题解决集合处理办法; 在Android、iOS、Windows、MacOS中微信小程序的文件存放路径; python通过代码修改pip下载源让下载库飞起; python里面requests.post返回的res.text还有其它的吗

更多>>随机抽取信息: 旅行社网站模板默认风格5; 从数据库管理下手提升网站安全; 一个可以用来思考的故事，非常不错; ASP版通过身份证信息获取对应的生日性别年龄; 出境游旅行社建站解决方案; 符合web标准的嵌入Flash的方法

更多标签热门标签

市收藏夹对联配色左右论坛树型禁止淘宝编辑增高伪类 DW Response 教程文本 onload 背景 hidden 变化 checkbox max 框移字母 dw 访问量改变关于我们企业 css 透明过滤右键失效 hover 注册鎯排版工作表达 filter 省略 dl 我想你 ie 滑轮方法 mssql 九宫格效果货币三级系统