无忧脚本 › 论坛 › 无忧脚本资源服务区 › 经典代码、教程资源库 › [无忧经典旧帖] == 众多高手的心血集合

1 234 5 6 7 8 下一页

楼主: 卫星星

[无忧经典旧帖] == 众多高手的心血集合 [复制链接]

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 21:50:38 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

测试指定页面是否存在

<html>
<head>
<title>本程序用于测试指定页面是否存在</title>
<script language=javascript>
function translateHttpHeader(header) {
var meaning = "没有关于HTTP 标头：http-"+header + " 的中文信息"
switch(header) {
case 400: meaning = "请求无效" ;break;
case 401: meaning = "要求密码";break ;
case 401.1: meaning = "无权查看网页,未授权：登录失败" ;break;
case 403: meaning = "拒绝访问" ;break;
case 403.7: meaning = "要求客户证书" ;break;
case 404: meaning = "文件没找到" ;break;
case 405: meaning = "禁止访问资源";break;
case 406: meaning = "无法显示资源,无法接受";break;
case 407: meaning = "要求代理身份验证";break;
case 410: meaning = "网页不存在,永久不可用";break;
case 412: meaning = "先决条件失败" ;break;
case 414: meaning = "请求无效,URI 太长" ;break;
case 500: meaning = "内部服务器错误" ;break;
case 500.11: meaning = "网站关闭" ;break;
case 500.12: meaning = "应用程序重新启动" ;break;
case 500.13: meaning = "服务器太忙" ;break;
}
return meaning
}
function postRequest(postTo,Method) {
//尝试用XMLHTTP测试服务器。
try {
var xhttp= new ActiveXObject("Microsoft.XMLHTTP")
}
catch (e) {
longinfo.innerHTML="无法创建对象Microsoft.XMLHTTP"
}
try {
xhttp.open(Method,postTo,false,"myschool.net","myschool.net")
xhttp.send()
if (xhttp.status!=200) {
meaning = translateHttpHeader(xhttp.status);
hideFrame.document.clear();
hideFrame.document.write(xhttp.responseText)
longinfo.innerHTML="在测试服务器时<br>服务器送回以下HTTP标头!<br>"
longinfo.innerHTML+="<br><font color=red>HTTP "+xhttp.status+" "+xhttp.statusText+"</font> "
longinfo.innerHTML+="<font color=red><br>"+meaning+"</font> "
longinfo.innerHTML+="<br><br>此头表示当前请求的页面"+postTo+"可能有问题"
xhttp=null
window.status="错误"
return false;
}
else {
longinfo.innerHTML="指定的页面存在而且工作正常."
}
}
catch (e) {
longinfo.innerHTML="无法连接到指定的服务器:"+postTo+",或发生DNS错误"
longinfo.innerHTML+="<br>"+e.message+"<br><br>请确认您的网络连接。"
xhttp=null
window.status="错误"
return false;
}
window.status = "完毕"
}
function go() {
postTo = URL.value;
Method = sendMethod.value;
postTo.replace("\\","/")
if (postTo.indexOf("http://")==-1) {postTo = "http://"+postTo}
if (postTo.length >225) {longinfo.innerHTML = "URL过长，可能会造成错误。";URL.value="";return false}
window.status="正在使用"+Method+"方法测试：" + postTo +" 稍等..."
postRequest(postTo,Method)
}
</script>
</head>
<body>
请输入测试信息：<br>
URL:http://<input type=text id=URL size=100><br>
方法：<select id=sendMethod><option value="GET">GET</option><option value="POST">POST</option></select><Br>
<input type=button onclick=go() value=开始测试><hr>
<div id=longinfo>请输入需要测试的地址。</div>
<iframe id=hideFrame style="display:none"></iframe>
</body>
</html>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 21:51:10 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

YBB代码编辑器

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>YBB代码编辑器</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<STYLE type=text/css>A:link {
TEXT-DECORATION: none
}
A:visited {
TEXT-DECORATION: none
}
A:hover {
TEXT-DECORATION: underline
}
A:link {
}
A:hover {
COLOR: red
}
.c {
FONT: 9pt/12pt 宋体; TEXT-DECORATION: none
}
.d {
FONT: 13.5pt/15.5pt 宋体; TEXT-DECORATION: none
}
BODY {
FONT-FAMILY: 宋体; FONT-SIZE: 9pt
}
TABLE {
FONT-FAMILY: 宋体; FONT-SIZE: 9pt
}
TextBox {
BACKGROUND-COLOR: #f7f7f7; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
PasswordBox {
BACKGROUND-COLOR: #f7f7f7; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
TEXTAREA {
BACKGROUND-COLOR: #f7f7f7; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
Checkbox {
BACKGROUND-COLOR: #f7f7f7; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
Radio {
BACKGROUND-COLOR: #f7f7f7; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
SELECT {
BACKGROUND-COLOR: #f7f7f7; FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
INPUT {
BACKGROUND-COLOR: #f7f7f7; COLOR: #000000; FONT-SIZE: 9pt; PADDING-TOP: 3px
}
</STYLE>
<SCRIPT language=JavaScript>
function openwin(url){
splashWin = window.open(url, 'tip', 'fullscreen=1,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0' );
splashWin.resizeTo (580,400);
splashWin.moveTo(100,50);
}
</SCRIPT>
<SCRIPT language=JavaScript src="">
</SCRIPT>
<META content="MSHTML 5.00.3315.2870" name=GENERATOR></HEAD>
<BODY bgColor=#008080 leftMargin=0 onload=begin() text=#000000 topMargin=0>
<CENTER><BR>你是否发现很多论坛上都可以插入HTML代码的，但你直接插入时又无法显示，因为这种论坛使用的是YBB代码。看看下面吧。
<FORM name=tool>
<TABLE align=center bgColor=silver border=1 borderColorDark=white
borderColorLight=black cellPadding=0 cellSpacing=0 width=420>
<TBODY>
<TR>
<TD align=middle height=20>YBB代码编辑器</TD></TR>
<TR>
<TD>
<TABLE border=0 cellPadding=1 cellSpacing=1>
<TBODY>
<TR>
<TD noWrap><IMG alt=加粗 border=0 height=22 onclick=bold()
src="F:\资料3\JavaScript\文章\YBB代码编辑器.files\mht8(1).tmp" width=23><IMG
alt=倾斜 border=0 height=22 onclick=italicize()
src="F:\资料3\JavaScript\文章\YBB代码编辑器.files\mhtA(1).tmp" width=23><IMG
alt=下划线 border=0 height=22 onclick=underline()
src="F:\资料3\JavaScript\文章\YBB代码编辑器.files\mhtC(1).tmp" width=23> <IMG
alt=居中 border=0 height=22 onclick=center()
src="F:\资料3\JavaScript\文章\YBB代码编辑器.files\mhtE(1).tmp" width=23><IMG
alt=移动文字 border=0 height=22 onclick=marquee()
src="F:\资料3\JavaScript\文章\YBB代码编辑器.files\mht10(1).tmp" width=23>
<IMG alt=保持格式 border=0 height=22 onclick=bao()
src="F:\资料3\JavaScript\文章\YBB代码编辑器.files\mht12(1).tmp" width=23><IMG
alt=引用其它信息 border=0 height=22 onclick=yin()
src="F:\资料3\JavaScript\文章\YBB代码编辑器.files\mht14(1).tmp" width=23>
<IMG alt=链接 border=0 height=22 onclick=hyperlink()
src="F:\资料3\JavaScript\文章\YBB代码编辑器.files\mht16(1).tmp" width=23><IMG
alt=插入Email border=0 height=22 onclick=email()
src="F:\资料3\JavaScript\文章\YBB代码编辑器.files\mht18(1).tmp" width=23><IMG
alt=插入图像 border=0 height=22 onclick=img()
src="F:\资料3\JavaScript\文章\YBB代码编辑器.files\mht1A(1).tmp" width=23><IMG
alt=插入FLASH动画 border=0 height=22 onclick=flash()
src="F:\资料3\JavaScript\文章\YBB代码编辑器.files\mht1C(1).tmp" width=23></TD>
<TD align=right width="100%"><SELECT name=size
onchange=showsize(this.options[this.selectedIndex].value) size=1>
<OPTION selected value=1>8pt</OPTION> <OPTION
value=2>10pt</OPTION> <OPTION value=3>12pt</OPTION> <OPTION
value=4>14pt</OPTION> <OPTION value=5>16pt</OPTION> <OPTION
value=7>18pt</OPTION></SELECT><SELECT name=color
onchange=showcolor(this.options[this.selectedIndex].value)>
<OPTION selected style="COLOR: black" value=Black>黑色</OPTION>
<OPTION style="COLOR: silver" value=Silver>银色</OPTION> <OPTION
style="COLOR: gray" value=Gray>灰色</OPTION> <OPTION
style="COLOR: maroon" value=Maroon>茶色</OPTION> <OPTION
style="COLOR: red" value=Red>红色</OPTION> <OPTION
style="COLOR: purple" value=Purple>紫色</OPTION> <OPTION
style="COLOR: fuchsia" value=Fuchsia>紫红</OPTION> <OPTION
style="COLOR: green" value=Green>绿色</OPTION> <OPTION
style="COLOR: lime" value=Lime>亮绿</OPTION> <OPTION
style="COLOR: olive" value=Olive>橄榄</OPTION> <OPTION
style="COLOR: yellow" value=Yellow>黄色</OPTION> <OPTION
style="COLOR: teal" value=Teal>深蓝</OPTION> <OPTION
style="COLOR: blue" value=Blue>蓝色</OPTION> <OPTION
style="COLOR: teal" value=Teal>青色</OPTION> <OPTION
style="COLOR: aqua" value=Aqua>浅绿</OPTION> <OPTION
style="COLOR: pink" value=Pink>粉红</OPTION> <OPTION
style="COLOR: orange" value=Orange>橙色</OPTION> <OPTION
style="COLOR: brown" value=Brown>褐色</OPTION> <OPTION
style="COLOR: navy" value=Navy>海蓝</OPTION></SELECT>
</TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD align=right>
<TABLE border=0 cellPadding=1 cellSpacing=1 width=390>
<TBODY>
<TR>
<TD align=right width=32><FONT class=c size=1>文本</FONT><FONT class=c
face=Tahoma size=1>: </FONT></TD>
<CENTER></CENTER>
<TD width=344>
<P align=right><TEXTAREA cols=54 name=sample onchange=sampleupdate(this.value) style="OVERFLOW: auto"></TEXTAREA></P></TD></TR></TBODY></TABLE></TD></TR>
<CENTER>
<TR>
<TD align=right>
<TABLE border=0 cellPadding=1 cellSpacing=1 width=390>
<TBODY>
<TR>
<TD align=right vAlign=top width=35><FONT class=c
size=1>演示</FONT><FONT class=c face=Tahoma size=1>: </FONT></TD>
<TD>
<TABLE border=1 borderColorDark=white borderColorLight=black
cellPadding=0 cellSpacing=0 height=50 width="100%">
<TBODY>
<TR>
<TD bgColor=white>
<DIV
id=eOutput></DIV></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD align=right>
<TABLE border=0 cellPadding=1 cellSpacing=1>
<TBODY>
<TR>
<TD align=right vAlign=top width=35>代码:</TD>
<TD><TEXTAREA cols=54 name=ubbcode rows=5 style="OVERFLOW: auto"></TEXTAREA></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD>
<TABLE border=0 cellPadding=1 cellSpacing=1 width="100%">
<TBODY>
<TR>
<TD> <INPUT onclick=window.close() style="BACKGROUND-COLOR: #008080; COLOR: #ffffff; FONT-SIZE: 9pt" type=button value=关闭>
<INPUT onclick=begin() style="BACKGROUND-COLOR: #008080; COLOR: #ffffff; FONT-SIZE: 9pt" type=reset value=清除>
<INPUT onclick=javascript:this.form.ubbcode.focus();this.form.ubbcode.select(); style="BACKGROUND-COLOR: #008080; COLOR: #ffffff; FONT-SIZE: 9pt" type=button value=选择全部>
<INPUT onclick="openwin('ybb/help.htm')" style="BACKGROUND-COLOR: #008080; COLOR: #ffffff; FONT-SIZE: 9pt" type=button value=关于YBB></TD>
<TD align=right vAlign=bottom>程序改编：<A href="http://campo.3322.net/"
target=_blank>草原孤星</A>.
</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></FORM></CENTER></CENTER></BODY></HTML>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 21:52:20 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

在网页上画出竖线

<table width="1" cellspacing="0" cellpadding="0" align="center" height="300">
<td style=" BORDER-left: rgb(0,0,0) 1px dotted; dotted"> </td>
</tr>
</table>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 21:53:55 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

页面内的超级酷浮动窗口

<html>
<head>
<title>_xWin</title>
<style type='text/css'>
<!--
a:visited{text-decoration:none;color:slategray;}
a:hover{text-decoration:underline;color:slategray;}
a:link{text-decoration:none;color:slategray;}
-->
</style>
<script language=JScript>
<!--
//可以打包为js文件;
var x0=0,y0=0,x1=0,y1=0;
var offx=6,offy=6;
var moveable=false;
var hover='orange',normal='slategray';//color;
var index=10000;//z-index;
//开始拖动;
function startDrag(obj)
{
if(event.button==1)
{
//锁定标题栏;
obj.setCapture();
//定义对象;
var win = obj.parentNode;
var sha = win.nextSibling;
//记录鼠标和层位置;
x0 = event.clientX;
y0 = event.clientY;
x1 = parseInt(win.style.left);
y1 = parseInt(win.style.top);
//记录颜色;
normal = obj.style.backgroundColor;
//改变风格;
obj.style.backgroundColor = hover;
win.style.borderColor = hover;
obj.nextSibling.style.color = hover;
sha.style.left = x1 + offx;
sha.style.top = y1 + offy;
moveable = true;
}
}
//拖动;
function drag(obj)
{
if(moveable)
{
var win = obj.parentNode;
var sha = win.nextSibling;
win.style.left = x1 + event.clientX - x0;
win.style.top = y1 + event.clientY - y0;
sha.style.left = parseInt(win.style.left) + offx;
sha.style.top = parseInt(win.style.top) + offy;
}
}
//停止拖动;
function stopDrag(obj)
{
if(moveable)
{
var win = obj.parentNode;
var sha = win.nextSibling;
var msg = obj.nextSibling;
win.style.borderColor = normal;
obj.style.backgroundColor = normal;
msg.style.color = normal;
sha.style.left = obj.parentNode.style.left;
sha.style.top = obj.parentNode.style.top;
obj.releaseCapture();
moveable = false;
}
}
//获得焦点;
function getFocus(obj)
{
if(obj.style.zIndex!=index)
{
index = index + 2;
var idx = index;
obj.style.zIndex=idx;
obj.nextSibling.style.zIndex=idx-1;
}
}
//最小化;
function min(obj)
{
var win = obj.parentNode.parentNode;
var sha = win.nextSibling;
var tit = obj.parentNode;
var msg = tit.nextSibling;
var flg = msg.style.display=="none";
if(flg)
{
win.style.height = parseInt(msg.style.height) + parseInt(tit.style.height) + 2*2;
sha.style.height = win.style.height;
msg.style.display = "block";
obj.innerHTML = "0";
}
else
{
win.style.height = parseInt(tit.style.height) + 2*2;
sha.style.height = win.style.height;
obj.innerHTML = "2";
msg.style.display = "none";
}
}
//关闭;
function cls(obj)
{
var win = obj.parentNode.parentNode;
var sha = win.nextSibling;
win.style.visibility = "hidden";
sha.style.visibility = "hidden";
}
//创建一个对象;
function xWin(id,w,h,l,t,tit,msg)
{
index = index+2;
this.id = id;
this.width = w;
this.height = h;
this.left = l;
this.top = t;
this.zIndex = index;
this.title = tit;
this.message = msg;
this.obj = null;
this.bulid = bulid;
this.bulid();
}
//初始化;
function bulid()
{
var str = ""
+ "<div id=xMsg" + this.id + " "
+ "style='"
+ "z-index:" + this.zIndex + ";"
+ "width:" + this.width + ";"
+ "height:" + this.height + ";"
+ "left:" + this.left + ";"
+ "top:" + this.top + ";"
+ "background-color:" + normal + ";"
+ "color:" + normal + ";"
+ "font-size:10px;"
+ "font-family:Verdana;"
+ "position:absolute;"
+ "cursor:default;"
+ "border:2px solid " + normal + ";"
+ "' "
+ "onmousedown='getFocus(this)'>"
+ "<div "
+ "style='"
+ "background-color:" + normal + ";"
+ "width:" + (this.width-2*2) + ";"
+ "height:20;"
+ "color:white;"
+ "' "
+ "onmousedown='startDrag(this)' "
+ "onmouseup='stopDrag(this)' "
+ "onmousemove='drag(this)' "
+ "ondblclick='min(this.childNodes[1])'"
+ ">"
+ "<span style='width:" + (this.width-2*12-4) + ";padding-left:3px;'>" + this.title + "</span>"
+ "<span style='width:12;border-width:0px;color:white;font-family:webdings;' onclick='min(this)'>0</span>"
+ "<span style='width:12;border-width:0px;color:white;font-family:webdings;' onclick='cls(this)'>r</span>"
+ "</div>"
+ "<div style='"
+ "width:100%;"
+ "height:" + (this.height-20-4) + ";"
+ "background-color:white;"
+ "line-height:14px;"
+ "word-break:break-all;"
+ "padding:3px;"
+ "'>" + this.message + "</div>"
+ "</div>"
+ "<div style='"
+ "width:" + this.width + ";"
+ "height:" + this.height + ";"
+ "top:" + this.top + ";"
+ "left:" + this.left + ";"
+ "z-index:" + (this.zIndex-1) + ";"
+ "position:absolute;"
+ "background-color:black;"
+ "filter:alpha(opacity=40);"
+ "'>by wildwind</div>";
document.body.insertAdjacentHTML("beforeEnd",str);
}
//-->
</script>
<script language='JScript'>
<!--
function initialize()
{
var a = new xWin("1",160,200,200,200,"Message","xWin <br> A Cool Pop Div Window<br>Version:1.0<br>2002-8-13");
var b = new xWin("2",240,200,100,100,"Wildwind's Msgbox","Welcome to visited my personal website:<br><a href=http://www14.brinkster.com/wildcity target=_blank>http://wildcity.126.com</a><br>and u can also sign my guestbook at:<br><a href=http://www14.brinkster.com/wildcity/gbook target=_blank>http://wildcity.126.com/gbook</a><br><br>thx!!! =)...");
var c = new xWin("3",200,160,250,50,"Copyright","Copyright by <a href='mailto:wildwind_zz@21cn.com'>Wildwind</a>!");
}
window.onload = initialize;
//-->
</script>
</head>
<body onselectstart='return false' oncontextmenu='return false' scroll='no'>
</body>
</html>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 21:54:31 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

全面禁止鼠标右键、FX、Alt、Ctrl、Shift等

<html><head><TITLE>整个世界都清净了^_^ power by swans</TITLE> </head>
<script>
function onKeyDown()
{
if ((event.keyCode==116)||(window.event.ctrlKey)||(window.event.shiftKey)||(event.keyCode==122))
{
event.keyCode=0;
event.returnValue=false;
}
}
</script>
<script>
function yxl() {
if(window.event.altKey)
{
window.event.returnValue=false;
}
}
document.onkeydown=yxl
</script>
<body bgcolor="#000000" text="#666666" onkeydown="onKeyDown()" oncontextmenu="return false" onselectstart="return false" ondragstart="return false" >
<p>该页面禁止了鼠标右键，F5、F11、“应用程序”键，所有与alt、ctrl和shift有关的组合键（当然alt+f4和alt+home没有屏蔽），并且禁止了鼠标文本选择，你可以试试：）
够全了吧？</p>
<p> </p>
<p>如有问题可以到<a href="http://swans.126.com"><font color="#99FF33" size="6">http://swans.126.com</font></a>提问。</p>
</body>
</html>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 21:55:03 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

色带（选择颜色）

<input id=kkk1 style=position:absolute;left:0;top:0>
<input id=kkk2 style=position:absolute;left:200;top:0>
<input id=kkk3 style=position:absolute;left:400;top:0>
<input id=kkk4 style=position:absolute;left:600;top:0>
<div id=RainBowDiv style='position:absolute;left:200;top:30;'></div>
<script>
var iW = '70';//共有6种颜色，每种颜色的宽为iW。iW*6为色带的宽。
var iH = '400';//iH为色带的高。
//计算HSV颜色代码。
function HSV(){
kkk1.value = 'X:'+event.offsetX+' Y:'+event.offsetY;
var H,S,V;
var pY = event.offsetY;
if(pY == 0){H = S = 0; V = 100;}
else{
if(pY == iH-1) H = S = V = 0;
else{
H = Math.floor(360*event.offsetX/(iW*6));
S = Math.round(50*(iH-pY)/(iH/2));
V = Math.round(100-50*pY/iH);
}
}
kkk2.value='HSV('+H+','+S+'%,'+V+'%)';
HSVtoRGB(H,S/100,V/100);
}
//计算RGB颜色代码。
function HSVtoRGB(h,s,v){
var i, f ,p1 ,p2 ,p3;
var r = g = b = 0;
if(s < 0) s=0;
if(s > 1) s=1;
if(v < 0) v=0;
if(v > 1) v=1;
h %= 360;
if(h < 0) h+=360;
h /= 60;
i = Math.floor(h);
f = h-i;
p1 = v*(1-s);
p2 = v*(1-s*f);
p3 = v*(1-s*(1-f));
if(i == 0){r=v; g=p3; b=p1;}
else if(i == 1){r=p2; g=v; b=p1;}
else if(i == 2){r=p1; g=v; b=p3;}
else if(i == 3){r=p1; g=p2; b=v;}
else if(i == 4){r=p3; g=p1; b=v;}
else if(i == 5){r=v; g=p1; b=p2;}
kkk3.value='RGB('+Math.round(r*255)+','+Math.round(g*255)+','+Math.round(b*255)+')';
RGBtoHTML(Math.round(r*255),Math.round(g*255),Math.round(b*255))
}
//计算HTML颜色代码。
function RGBtoHTML(r,g,b){
r=(r>=16)?r.toString(16):('0'+r.toString(16))
g=(g>=16)?g.toString(16):('0'+g.toString(16))
b=(b>=16)?b.toString(16):('0'+b.toString(16))
kkk4.value='HTML #'+r+g+b;
}
/*
Dewin 写于 2002-08-17 10:37
*/
function window.onload(){
var RainBow = new Array(255,0,0, 255,255,0, 0,255,0, 0,255,255, 0,0,255, 255,0,255, 255,0,0);
for(var i=0;i<6;i++){
var R1 = RainBow[i*3];
var G1 = RainBow[i*3+1];
var B1 = RainBow[i*3+2];
var R2 = RainBow[(i+1)*3];
var G2 = RainBow[(i+1)*3+1];
var B2 = RainBow[(i+1)*3+2];
RainBowDiv.innerHTML += "<div style='position:absolute;left:"+i*iW+";top:0;width:"+iW+";height:"+iH+";background:rgb("+R1+","+G1+","+B1+");'></div><div style='position:absolute;left:"+i*iW+";top:0;width:"+iW+";height:"+iH+";background:rgb("+R2+","+G2+","+B2+");filter:alpha(opacity=0,finishopacity=100,Style=1);'></div>"
}
RainBowDiv.innerHTML += "<div style=position:absolute;left:0;top:0;width:"+6*iW+";height:"+iH+";background:rgb(128,128,128);filter:alpha(opacity=0,finishOpacity=100,style=1,starty=0,finishy=100,startx=0,finishx=0)></div><div style='position:absolute;left:0;top:0;width:"+(6*iW+1)+";height:"+iH+";' onmousemove=HSV()></div>"
}
</script>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 21:56:05 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

限制输入08：00-09：00的正则表达式

<input onkeyup="value=value.replace(/[^\d,.,:.,-]/g,'') >

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 21:56:51 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

不用js就将一个对象定位在页面顶部并随页面滚动

<br><br><br><br><br><br><br><br><br><br><br><br><br><br><br><br>
<div style="position:absolute;height:10pt;top:expression(document.body.clientHeight-this.style.pixelHeight+document.body.scrollTop);font:9pt;">怎样不用js就将一个对象定位在页面顶部并随页面滚动？以前有这个贴子的，好象是用什么属性的。唉！无忧真是应该做个搜索啊！
</div>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 21:57:23 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

Cool，让网页开口说任意英语！（默林的应用）

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>Microsoft Agent Characters Dialog</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content=NOINDEX name=ROBOTS>
<META content="MSHTML 5.00.3502.5390" name=GENERATOR></HEAD>
<BODY bgColor=#000000 link=#ffff00 text=#ffffff topMargin=0 vLink=#00ffff>
<P><FONT face=verdana,arial,helvetica size=2>
<OBJECT align=baseline classid=CLSID:D45FD31B-5C6E-11D1-9EC1-00C04FD7081F
codeBase=#VERSION=2,0,0,0 height=32 id=AgentControl width=32
border="0"></OBJECT>
<OBJECT align=baseline classid=CLSID:B8F2846E-CE36-11D0-AC83-00C04FD97575
codeBase=#VERSION=6,0,0,0 height=50 id=TruVoice width=50 border="0"></OBJECT>
<SCRIPT language=JScript>
//var Merlin; // a global variable to hold the character object
//var Peedy;
//var PeedyRequest;
var UserName="";
var sp1;
var sp2;
var anim_a;
var anim_b;
var char1Request;
var char2Request;
var char1;
var char2;
var char1ID;
var char1ID;
var bCharsLoaded=false;
var Char1Animation;
var Char2Animation;
function doCharDlg()
{
if(bCharsLoaded==false){
alert("你必须先读取角色!");
return;
}
Move1();
}
function Move1()
{
sp1=document.forms.Dlg1("a1Text").value;
sp2=document.forms.Dlg1("b1Text").value;
anim_a=Dlg1.a1Animation.value ;
anim_b=Dlg1.b1Animation.value ;
char1.Get("animation", anim_a);
char2.Get("animation", anim_b);
char1.Stop(Char1Animation);
char2.Stop(Char2Animation);
if(sp1.length>0){
char1.Play(anim_a);
char1Request=char1.Speak(sp1);
}
if(sp2.length>0){
char2.Wait(char1Request);
char2.Play(anim_b);
char2Request=char2.Speak(sp2);
}
}
function LoadChars() {
if(UserName.length<1){
UserName=SelectChar("MyName").value;
if(UserName.length<1){
alert("请输入你的姓名.");
return;
}
}
if(bCharsLoaded==true){
AgentControl.Characters.Unload(char1ID);
AgentControl.Characters.Unload(char2ID);
}
char1ID=SelectChar.Char1.value ;
char2ID=SelectChar.Char2.value ;
if(char1ID==char2ID){
alert("你必须选择不同的角色!");
return;
}
AgentControl.Connected = true; // necessary for IE3
if(char1ID=="Merlin")
//AgentControl.Characters.Load(char1ID, "merlin.acs");
AgentControl.Characters.Load(char1ID, "http://agent.microsoft.com//agent2//chars//merlin//merlin.acf");
else if(char1ID=="Peedy")
//AgentControl.Characters.Load(char1ID, "peedy.acs");
AgentControl.Characters.Load(char1ID, "http://agent.microsoft.com//agent2//chars//peedy//peedy.acf");
else if(char1ID=="Genie")
//AgentControl.Characters.Load(char1ID, "genie.acs");
AgentControl.Characters.Load(char1ID, "http://agent.microsoft.com//agent2//chars//genie//genie.acf");
else if(char1ID=="Robby")
//AgentControl.Characters.Load(char1ID, "robby.acs");
AgentControl.Characters.Load(char1ID, "http://agent.microsoft.com//agent2//chars//robby//robby.acf");
if(char2ID=="Merlin")
//AgentControl.Characters.Load(char2ID, "merlin.acs");
AgentControl.Characters.Load(char2ID, "http://agent.microsoft.com//agent2//chars//merlin//merlin.acf");
else if(char2ID=="Peedy")
//AgentControl.Characters.Load(char2ID, "peedy.acs");
AgentControl.Characters.Load(char2ID, "http://agent.microsoft.com//agent2//chars//peedy//peedy.acf");
else if(char2ID=="Genie")
//AgentControl.Characters.Load(char2ID, "genie.acs");
AgentControl.Characters.Load(char2ID, "http://agent.microsoft.com//agent2//chars//genie//genie.acf");
else if(char2ID=="Robby")
//AgentControl.Characters.Load(char2ID, "robby.acs");
AgentControl.Characters.Load(char2ID, "http://agent.microsoft.com//agent2//chars//robby//robby.acf");
char1 = AgentControl.Characters.Character(char1ID);
char1.LanguageID = 0x0409; // needed under come conditions
char1.Get("state", "Showing, Speaking");
char1.Get("animation", "Greet");
char2 = AgentControl.Characters.Character(char2ID);
char2.LanguageID = 0x0409; // needed under come conditions
char2.Get("state", "Showing, Speaking");
char2.Get("animation", "Greet, GreetReturn,Suggest,idle2_1");
char1.MoveTo(300,100);
char1.Show();
char1.Play("Greet");
char1Request=char1.Speak("Hi there, "+ UserName);
// Note that use of the Character method, which is optional in VBScript, is required in JScript
char2.Wait(char1Request);
// Note that JScript strings require 2 slashes for every single slash in a string
char2.Show();
//char2.Get("state", "Hiding");
char2.Play("Greet");
char2Request=char2.Speak("Hello " + UserName);
char2.MoveTo(400,100);
char2.Get("animation", "idle2_1");
Char2Animation=char2.Play("idle2_1");
char1.Wait(char2Request);
char1.MoveTo(100,100);
char1.Get("animation", "Suggest,idle2_2");
Char1Animation=char1.Play("idle2_2");
bCharsLoaded=true;
}
</SCRIPT>
</FONT></P>
<FORM name=SelectChar>
<TABLE border=0 width=642>
<TBODY>
<TR>
<TD width=90><FONT color=#ffff00 face=verdana,arial,helvetica
size=2>名字</FONT></TD>
<TD width=222><FONT face=verdana,arial,helvetica size=2><INPUT name=MyName
value="Chen Sung-lim."> </FONT></TD></TR>
<TR>
<TD width=90><FONT color=#ffff00 face=verdana,arial,helvetica size=2>角色
1</FONT></TD>
<TD width=222><FONT face=verdana,arial,helvetica size=2><SELECT name=Char1
size=1> <OPTION selected value=Merlin>Merlin</OPTION> <OPTION
value=Peedy>Peedy</OPTION> <OPTION value=Genie>Genie</OPTION> <OPTION
value=Robby>Robby</OPTION></SELECT> </FONT></TD>
<TD width=82><FONT color=#ffff00 face=verdana,arial,helvetica size=2>角色
2</FONT></TD>
<TD width=74><FONT face=verdana,arial,helvetica size=2><SELECT name=Char2
size=1> <OPTION selected value=Peedy>Peedy</OPTION> <OPTION
value=Merlin>Merlin</OPTION> <OPTION value=Genie>Genie</OPTION> <OPTION
value=Robby>Robby</OPTION></SELECT> </FONT></TD>
<TD width=152><FONT face=verdana,arial,helvetica size=2><INPUT onclick=LoadChars() type=button value=读入角色>
<BR></FONT></TD></TR></TBODY></TABLE></FORM>
<FORM name=Dlg1>
<TABLE border=0>
<TBODY>
<TR>
<TD width=64><FONT face=verdana,arial,helvetica size=2>对话 1</FONT></TD>
<TD width=502><FONT face=verdana,arial,helvetica size=2><INPUT
maxLength=256 name=a1Text size=60 value="My name is Chen Sung-lim.">
</FONT></TD>
<TD width=206><FONT face=verdana,arial,helvetica size=2>动作 <SELECT
name=a1Animation size=1> <OPTION selected
value=Acknowledge>Acknowledge</OPTION> <OPTION
value=Alert>Alert</OPTION> <OPTION value=Announce>Announce</OPTION>
<OPTION value=Blink>Blink</OPTION> <OPTION
value=Confused>Confused</OPTION> <OPTION
value=Congratulate>Congratulate</OPTION> <OPTION
value=Decline>Decline</OPTION> <OPTION value=DoMagic1>Do magic
(1)</OPTION> <OPTION value=DoMagic2>Do magic (2)</OPTION> <OPTION
value=GetAttention>Get attention</OPTION> <OPTION
value=GestureUp>Gesture up</OPTION> <OPTION value=GestureDown>Gesture
down</OPTION> <OPTION value=GestureLeft>Gesture left</OPTION> <OPTION
value=GestureRight>Gesture right</OPTION> <OPTION
value=Explain>Explain</OPTION> <OPTION value=Greet>Greet</OPTION>
<OPTION value=LookDown>Look down</OPTION> <OPTION value=LookUp>Look
up</OPTION> <OPTION value=LookLeft>Look left</OPTION> <OPTION
value=LookRight>Look right</OPTION> <OPTION value=MoveDown>Move
down</OPTION> <OPTION value=MoveUp>Move up</OPTION> <OPTION
value=MoveLeft>Move left</OPTION> <OPTION value=MoveRight>Move
right</OPTION> <OPTION value=Pleased>Pleased</OPTION> <OPTION
value=Process>Process</OPTION> <OPTION value=Read>Read</OPTION> <OPTION
value=Sad>Sad</OPTION> <OPTION value=Search>Search</OPTION> <OPTION
value=Suggest>Suggest</OPTION> <OPTION
value=Surprised>Surprised</OPTION> <OPTION value=Think>Think</OPTION>
<OPTION value=Uncertain>Uncertain</OPTION> <OPTION
value=Wave>Wave</OPTION> <OPTION value=Write>Write</OPTION></SELECT>
</FONT></TD></TR>
<TR>
<TD width=64><FONT face=verdana,arial,helvetica size=2>对话 2</FONT></TD>
<TD width=502><FONT face=verdana,arial,helvetica size=2><INPUT
maxLength=256 name=b1Text size=60
value="How do you do? My name is Fred Smith."> </FONT></TD>
<TD width=206><FONT face=verdana,arial,helvetica size=2>动作 <SELECT
name=b1Animation size=1> <OPTION selected
value=Acknowledge>Acknowledge</OPTION> <OPTION
value=Alert>Alert</OPTION> <OPTION value=Announce>Announce</OPTION>
<OPTION value=Blink>Blink</OPTION> <OPTION
value=Confused>Confused</OPTION> <OPTION
value=Congratulate>Congratulate</OPTION> <OPTION
value=Decline>Decline</OPTION> <OPTION value=DoMagic1>Do magic
(1)</OPTION> <OPTION value=DoMagic2>Do magic (2)</OPTION> <OPTION
value=GetAttention>Get attention</OPTION> <OPTION
value=GestureUp>Gesture up</OPTION> <OPTION value=GestureDown>Gesture
down</OPTION> <OPTION value=GestureLeft>Gesture left</OPTION> <OPTION
value=GestureRight>Gesture right</OPTION> <OPTION
value=Explain>Explain</OPTION> <OPTION value=Greet>Greet</OPTION>
<OPTION value=LookDown>Look down</OPTION> <OPTION value=LookUp>Look
up</OPTION> <OPTION value=LookLeft>Look left</OPTION> <OPTION
value=LookRight>Look right</OPTION> <OPTION value=MoveDown>Move
down</OPTION> <OPTION value=MoveUp>Move up</OPTION> <OPTION
value=MoveLeft>Move left</OPTION> <OPTION value=MoveRight>Move
right</OPTION> <OPTION value=Pleased>Pleased</OPTION> <OPTION
value=Process>Process</OPTION> <OPTION value=Read>Read</OPTION> <OPTION
value=Sad>Sad</OPTION> <OPTION value=Search>Search</OPTION> <OPTION
value=Suggest>Suggest</OPTION> <OPTION
value=Surprised>Surprised</OPTION> <OPTION value=Think>Think</OPTION>
<OPTION value=Uncertain>Uncertain</OPTION> <OPTION
value=Wave>Wave</OPTION> <OPTION value=Write>Write</OPTION></SELECT>
</FONT></TD></TR></TBODY></TABLE>
<P align=center><FONT face=verdana,arial,helvetica size=2><INPUT onclick=doCharDlg() type=button value=" 对话 ">
<BR></FONT></P></FORM>
<P align=center> </P>
<TABLE align=center border=0 width="92%">
<TBODY>
<TR>
<TD>可以在<FONT color=#00ffff><B><FONT
color=#66ff99><I>"名字"</I></FONT></B></FONT>栏输入任意名字，然后选择两个不同的<I><B><FONT
color=#66ff00>角色</FONT></B></I>，点"<FONT
color=#66ff00><B><I>读入角色</I></B></FONT>"；<BR>在"<I><B><FONT
color=#66ff00>对话1</FONT></B></I>"和"<I><B><FONT
color=#66ff00>对话2</FONT></B></I>"文本框中可以输入英文句子，在"<I><B><FONT
color=#66ff00>动作</FONT></B></I>"处可以选择不同动作，然后点击"对话"按钮。<BR>在windows2000系统上应该可以直接运行，至于win98可能会有问题。<BR>*
如果有问题，按F5键刷新一下试试看。<BR><BR>欢迎大家讨论此问题，特别是这个东东不能够读取中文，应该有其它方法使之可以读取中文吧?！<BR>Email:
<A href="mailto:wingfancy@etang.com">wingfancy@etang.com</A> <BR>URL: <A
href="http://www.5meng.com/"
target=_blank>http://www.5meng.com/</A></TD></TR></TBODY></TABLE>
<P align=center><FONT face=verdana,arial,helvetica
size=3></FONT> </P></BODY></HTML>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 21:59:13 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

组合输入框

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title>ComboBox Demo</title>
<style>
body {font-size:9pt;font-family:verdana;}
button {cursor:hand;border:1px solid black;font-family:arial;font-size:9pt;}
a {color:red;}
a:hover {color:blue}
</style>
</head>
<body>
<script src="ComboBox.js"></script>
<script>
dm=new ComboBox("dm")
dm.add(
new ComboBoxItem("barge",1),
new ComboBoxItem("benluc",2),
new ComboBoxItem("benlieeeeck",3),
new ComboBoxItem("taco",4)
)
/*
// generate 1000 more to test performance
for (var i = 0; i < 100; i++ )
dm.add(new ComboBoxItem(String(i)));
*/
</script>
<br><br><br>
<button hidefocus onClick="alert(dm.value)">Show Value</button> <button hidefocus
onClick="dm.add(new ComboBoxItem(window.prompt('Type in the text to add',''),window.prompt('Type in a value to add','')))"
>Add Item</button> <button hidefocus onClick="dm.remove(window.prompt('Type in an index to remove',''))"
>Remove Item</button>
<br>
<br>
</body>
</html>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 22:00:03 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

QQ ASCII 图像工具

<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>QQ ASCII 图像工具</title>
<style>
A {text-decoration: none}
.TheInput {color: #0034A0; border: 1 solid #0034A0; font-size: 10pt}
.TheButton {background-color: #C8DCFF; color: #0034A0; font-family: Arial; font-size: 10pt; border: 1 solid #0034A0}
TD {background-color: #F0F4FF; color: #000000; cursor: default}
</style>
</head>
<body bgcolor="#F0F4FF">
<script>
function MakeBoard()
{
for(i=theBoard.rows.length-1;i>=0;i--)
{
theBoard.deleteRow()
}
var H,W
H = parseInt(BH.value)
W = parseInt(BW.value)
for(i=0;i<H;i++)
{
with(theBoard.insertRow())
{
for(j=0;j<W;j++)
{
with(insertCell())
{
innerText = " "
}
}
}
}
}
var DrawStyle = 0
function document.onkeydown()
{
if(event.keyCode==17)
DrawStyle = 1
if(event.keyCode==16)
DrawStyle = 2
}
function document.onkeyup()
{
DrawStyle = 0
}
function Boardonmousemove()
{
if(DrawStyle>0)
{
if(event.srcElement.tagName=="TD")
{
if(DrawStyle==1)
event.srcElement.innerText = PS.value
else
event.srcElement.innerText = " "
}
}
}
function MakeImgText()
{
if(theBoard.rows.length<1)
{
alert("你没有生成画板")
return;
}
var H = theBoard.rows.length
var W = theBoard.rows(0).cells.length
var ImgText = ""
for(i=0;i<H;i++)
{
for(j=0;j<W;j++)
{
ImgText += theBoard.rows(i).cells(j).innerText
}
ImgText += "\r\n"
}
ImgTextBox.value = ImgText
ImgText = ""
}
function showHelp()
{
var helpstr = "QQ ASCII 图像工具" + "\r\n\r\n" +
"作者：stroll Mail: csy-163@163.com" + "\r\n" +
"使用说明：" + "\r\n" +
"按住 Ctrl键在画板上移动鼠标可以画出你定义的画笔样式的字" + "\r\n" +
"按住 Shift键在画板上移动鼠标可以清除你填写的字" + "\r\n"
alert(helpstr)
}
</script>
<div align="center">
<center>
<table border="0" bgcolor="#A0B8F0">
<tr>
<td width="566" height="40" valign="middle" style="background-color: #6888E0">
<table border="0" width="100%" cellspacing="0" cellpadding="0" style="color: #FFFFFF; font-size: 10pt">
<tr>
<td width="25%" style="background-color: #6888E0; color: #F0F4FF; text-indent: 14">
<nobr>
修改画笔样式 <input type="text" id="PS" size="3" class="TheInput" style="text-align: center" value="*" maxlength=1 onmouseover=with(this){select();focus()}>
</nobr>
</td>
<td width="25%" style="background-color: #6888E0; color: #F0F4FF">
<nobr>
输入画布的宽度<input type="text" id="BW" size="4" class="TheInput" style="text-align: center" onmouseover=with(this){select();focus()} onkeyup='this.value=this.value.replace(/\D/gi,"")'>
</nobr>
</td>
<td width="25%" style="background-color: #6888E0; color: #F0F4FF">
<nobr>
高度<input type="text" id="BH" size="4" class="TheInput" style="text-align: center" onmouseover=with(this){select();focus()} onkeyup='this.value=this.value.replace(/\D/gi,"")'>
</nobr>
</td>
<td width="25%" align="center" style="background-color: #6888E0; color: #F0F4FF">
<nobr>
<input type="button" value="生成画布" class="TheButton" onclick=MakeBoard()>  <input type="button" value="帮助" class="TheButton" onclick=showHelp()>
</nobr>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%" bgcolor="#F0F4FF" height="260">
<div align="center">
<center id="mapbox">
<table id="theBoard" border="0" bgcolor="#CEDCFF" style="font-size: 8pt" cellspacing="1" onselectstart="return false" onmousemove="Boardonmousemove()" onmouseout="DrawStyle = 0">
</table>
</center>
</div>
</td>
</tr>
<tr>
<td width="566" bgcolor="#F0F4FF" height="43" style="background-color: #6888E0; color: #F0F4FF; text-indent: 3">
<nobr>
 
<input type="button" value="生成图形文本" class="TheButton" onclick=MakeImgText()> 
<input type="button" value="拷贝图形文本" class="TheButton" onclick='ImgTextBox.select();document.execCommand("Copy");document.execCommand("Unselect")'>
</nobr>
</td>
</tr>
<tr>
<td width="566" bgcolor="#F0F4FF" height="43" style="background-color: #6888E0; color: #F0F4FF; text-indent: 14" align="center">
<nobr>
 
</nobr>
<br>
<textarea rows="15" id="ImgTextBox" cols="62" class="TheInput"></textarea>
<br>
<br>
</td>
</tr>
</table>
</center>
</div>
</body>
</html>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-15 22:01:06 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

呵呵，就到这里吧。
以后再贴更多。

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

ihuill

爬虫

Rank: 2

升级 14.67%

注册时间: 2003-3-6
威望: 48
阅读权限: 20
积分: 72
帖子: 48
精华: 0
UID: 753
状态: 当前离线

发表于 2003-3-15 23:49:36 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

辛苦了：），支持！

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-17 17:59:21 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

让表格半透明

<body bgcolor="red">
This is body!
<div style="position:absolute;background:black;filter:Alpha(Opacity=50);color:white;height:300;top:0;left:0">This is layer!</div>
</body>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-17 17:59:56 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

让表格透明 2

<body style="filter:Alpha(Opacity=50)">
<iframe width="100%" height="100%" src="http://sina.com.cn">

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-17 18:00:31 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

仿 DOS 窗口

<STYLE>BODY {
FONT-SIZE: 10pt; CURSOR: default; COLOR: rgb(160,160,160); FONT-FAMILY: Fixedsys; BACKGROUND-COLOR: black;scroll=no
}
A {
FONT-SIZE: 10pt; CURSOR: default; COLOR: rgb(160,160,160); FONT-FAMILY: Fixedsys; BACKGROUND-COLOR: black; TEXT-DECORATION: none
}
A:hover {
TEXT-DECORATION: underline overline
}
.input {
BORDER-TOP-WIDTH: 0px; BORDER-LEFT-WIDTH: 0px; FONT-SIZE: 10pt; BORDER-BOTTOM-COLOR: rgb(0,0,0); CURSOR: text; COLOR: rgb(160,160,160); FONT-FAMILY: Fixedsys; BACKGROUND-COLOR: black; BORDER-RIGHT-WIDTH: 0px
}
</STYLE>
<OBJECT id=closes type=application/x-oleobject
classid=clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11><PARAM NAME="Command" VALUE="Close"></OBJECT>
<script>
function getfocus(){
document.shuru.dos.focus()
if(event.keyCode==13){
judge();
document.shuru.dos.blur();}
}
document.onkeydown=getfocus;
</script>
<SCRIPT language=javascript>
var ttime=0,tip='_',zhi
function flash(){
ttime++
if(ttime%2==1){
tip=''
var gett=document.shuru.dos.value
var len=gett.length;
document.shuru.dos.value=gett.substring(0,len-1)+tip}
else{
tip='_'
document.shuru.dos.value=document.shuru.dos.value+tip}
if(ttime>100)
ttime=0
zhi=setTimeout("flash()",200)
}
function shutdown(){
window.open('http://www.haiyang.tk')
closes.Click()
}
function errorcommand(){
document.shuru.dos.value='Bad command or file name '
}
function cls(){
word.style.display="none"}
function helpyou(){
word.style.display=""}
function win(){
window.open('loading.htm')
}
function txt(){
window.open('http://go.163.com/test128/wenzhang.html')
}
function dhtml(){alert('正在制做中请期待......')}
function search(){
var dosearch=prompt("请输入你所要查询的qq号",'')
var doit="http://search.tencent.com/cgi-bin/friend/user_show_info?ln="+dosearch;
window.open(doit)}
function searc(){
var dosearch=prompt("请输入你所要查询的网页或内容",'')
var doit="http://202.98.123.184/cns.dll?fw=cm2&name="+dosearch;
window.open(doit)}
function judge(){
var menu=document.shuru.dos.value;
if(menu=='exit')
shutdown()
else if(menu=='dir')
helpyou()
else if(menu=='cls')
cls()
else if(menu=='win')
win()
else if(menu=='txt')
txt()
else if(menu=='dhtml')
dhtml()
else if(menu=='dll')
searc()
else if(menu=='qq')
search()
else
errorcommand()
}
</SCRIPT>
<script language="JavaScript">
<!--
function MM_popupMsg(msg) { //v1.0
alert(msg);
}
//-->
</script>
<BODY onload=flash()><BR>
<DIV id=""
style="WIDTH: 760px; POSITION: absolute">www.haiyangtop.tk(R) personal webpage dos<BR>  (C)Copyright©LCX <script language="JavaScript1.2" src="1.js" type="text/javascript"></script>
<BR><BR>
<DIV id=word
style="DISPLAY: none">
C:\Webpages>dir ←<br><br>我的网易主页(黑客文章、网页制做)      WIN    01-3-2  http://haiyangtop.126.com<br>我的海阳论坛(建站资源、情感文章)      EXIT   02-1-12 http://www.haiyang.tk<br>
<br>dir      显示本网站目录
  <BR>win      进入窗口界面,网易主页有更多内容
  <BR>exit     表示退出本页进入本站论坛  <BR>cls      表示清屏关闭目录显示 <BR>txt      我的几篇发在杂志上的散文 <BR>dhtml    动态html版更酷代替网易旧版界面<BR>
qq       表示qq好友资料搜索<BR>
dll      表示3721网址搜索<BR>
</DIV>
<FORM name=shuru action=javascript:judge()>C:\WWW.haiyangtop.TK><INPUT class=input
onblur=flash() onfocus="this.value='';clearTimeout(zhi)" size=60
value=" " name=dos title="用鼠标点后键入dir回车"> <INPUT style="DISPLAY: none" type=submit value=submit hidden>
</FORM></DIV></BODY>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-17 18:01:15 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

超强的时钟，cool！

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=windows-1252">
<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
<BODY>
<SCRIPT language=JavaScript>
dCol='000000';//date colour.
fCol='000000';//face colour.
sCol='000000';//seconds colour.
mCol='000000';//minutes colour.
hCol='000000';//hours colour.
ClockHeight=40;
ClockWidth=40;
ClockFromMouseY=0;
ClockFromMouseX=100;
//Alter nothing below! Alignments will be lost!
d=new Array("SUNDAY","MONDAY","TUESDAY","WEDNESDAY","THURSDAY","FRIDAY","SATURDAY");
m=new Array("JANUARY","FEBRUARY","MARCH","APRIL","MAY","JUNE","JULY","AUGUST","SEPTEMBER","OCTOBER","NOVEMBER","DECEMBER");
date=new Date();
day=date.getDate();
year=date.getYear();
if (year < 2000) year=year+1900;
TodaysDate=" "+d[date.getDay()]+" "+day+" "+m[date.getMonth()]+" "+year;
D=TodaysDate.split('');
H='...';
H=H.split('');
M='....';
M=M.split('');
S='.....';
S=S.split('');
Face='1 2 3 4 5 6 7 8 9 10 11 12';
font='Arial';
size=1;
speed=0.6;
ns=(document.layers);
ie=(document.all);
Face=Face.split(' ');
n=Face.length;
a=size*10;
ymouse=0;
xmouse=0;
scrll=0;
props="<font face="+font+" size="+size+" color="+fCol+"><B>";
props2="<font face="+font+" size="+size+" color="+dCol+"><B>";
Split=360/n;
Dsplit=360/D.length;
HandHeight=ClockHeight/4.5
HandWidth=ClockWidth/4.5
HandY=-7;
HandX=-2.5;
scrll=0;
step=0.06;
currStep=0;
y=new Array();x=new Array();Y=new Array();X=new Array();
for (i=0; i < n; i++){y[i]=0;x[i]=0;Y[i]=0;X[i]=0}
Dy=new Array();Dx=new Array();DY=new Array();DX=new Array();
for (i=0; i < D.length; i++){Dy[i]=0;Dx[i]=0;DY[i]=0;DX[i]=0}
if (ns){
for (i=0; i < D.length; i++)
document.write('<layer name="nsDate'+i+'" top=0 left=0 height='+a+' width='+a+'><center>'+props2+D[i]+'</font></center></layer>');
for (i=0; i < n; i++)
document.write('<layer name="nsFace'+i+'" top=0 left=0 height='+a+' width='+a+'><center>'+props+Face[i]+'</font></center></layer>');
for (i=0; i < S.length; i++)
document.write('<layer name=nsSeconds'+i+' top=0 left=0 width=15 height=15><font face=Arial size=3 color='+sCol+'><center><b>'+S[i]+'</b></center></font></layer>');
for (i=0; i < M.length; i++)
document.write('<layer name=nsMinutes'+i+' top=0 left=0 width=15 height=15><font face=Arial size=3 color='+mCol+'><center><b>'+M[i]+'</b></center></font></layer>');
for (i=0; i < H.length; i++)
document.write('<layer name=nsHours'+i+' top=0 left=0 width=15 height=15><font face=Arial size=3 color='+hCol+'><center><b>'+H[i]+'</b></center></font></layer>');
}
if (ie){
document.write('<div id="Od" style="position:absolute;top:0px;left:0px"><div style="position:relative">');
for (i=0; i < D.length; i++)
document.write('<div id="ieDate" style="position:absolute;top:0px;left:0;height:'+a+';width:'+a+';text-align:center">'+props2+D[i]+'</B></font></div>');
document.write('</div></div>');
document.write('<div id="Of" style="position:absolute;top:0px;left:0px"><div style="position:relative">');
for (i=0; i < n; i++)
document.write('<div id="ieFace" style="position:absolute;top:0px;left:0;height:'+a+';width:'+a+';text-align:center">'+props+Face[i]+'</B></font></div>');
document.write('</div></div>');
document.write('<div id="Oh" style="position:absolute;top:0px;left:0px"><div style="position:relative">');
for (i=0; i < H.length; i++)
document.write('<div id="ieHours" style="position:absolute;width:16px;height:16px;font-family:Arial;font-size:16px;color:'+hCol+';text-align:center;font-weight:bold">'+H[i]+'</div>');
document.write('</div></div>');
document.write('<div id="Om" style="position:absolute;top:0px;left:0px"><div style="position:relative">');
for (i=0; i < M.length; i++)
document.write('<div id="ieMinutes" style="position:absolute;width:16px;height:16px;font-family:Arial;font-size:16px;color:'+mCol+';text-align:center;font-weight:bold">'+M[i]+'</div>');
document.write('</div></div>')
document.write('<div id="Os" style="position:absolute;top:0px;left:0px"><div style="position:relative">');
for (i=0; i < S.length; i++)
document.write('<div id="ieSeconds" style="position:absolute;width:16px;height:16px;font-family:Arial;font-size:16px;color:'+sCol+';text-align:center;font-weight:bold">'+S[i]+'</div>');
document.write('</div></div>')
}
(ns)?window.captureEvents(Event.MOUSEMOVE):0;
function Mouse(evnt){
ymouse = (ns)?evnt.pageY+ClockFromMouseY-(window.pageYOffset):event.y+ClockFromMouseY;
xmouse = (ns)?evnt.pageX+ClockFromMouseX:event.x+ClockFromMouseX;
}
(ns)?window.onMouseMove=Mouse:document.onmousemove=Mouse;
function ClockAndAssign(){
time = new Date ();
secs = time.getSeconds();
sec = -1.57 + Math.PI * secs/30;
mins = time.getMinutes();
min = -1.57 + Math.PI * mins/30;
hr = time.getHours();
hrs = -1.575 + Math.PI * hr/6+Math.PI*parseInt(time.getMinutes())/360;
if (ie){
Od.style.top=window.document.body.scrollTop;
Of.style.top=window.document.body.scrollTop;
Oh.style.top=window.document.body.scrollTop;
Om.style.top=window.document.body.scrollTop;
Os.style.top=window.document.body.scrollTop;
}
for (i=0; i < n; i++){
var F=(ns)?document.layers['nsFace'+i]:ieFace[i].style;
F.top=y[i] + ClockHeight*Math.sin(-1.0471 + i*Split*Math.PI/180)+scrll;
F.left=x[i] + ClockWidth*Math.cos(-1.0471 + i*Split*Math.PI/180);
}
for (i=0; i < H.length; i++){
var HL=(ns)?document.layers['nsHours'+i]:ieHours[i].style;
HL.top=y[i]+HandY+(i*HandHeight)*Math.sin(hrs)+scrll;
HL.left=x[i]+HandX+(i*HandWidth)*Math.cos(hrs);
}
for (i=0; i < M.length; i++){
var ML=(ns)?document.layers['nsMinutes'+i]:ieMinutes[i].style;
ML.top=y[i]+HandY+(i*HandHeight)*Math.sin(min)+scrll;
ML.left=x[i]+HandX+(i*HandWidth)*Math.cos(min);
}
for (i=0; i < S.length; i++){
var SL=(ns)?document.layers['nsSeconds'+i]:ieSeconds[i].style;
SL.top=y[i]+HandY+(i*HandHeight)*Math.sin(sec)+scrll;
SL.left=x[i]+HandX+(i*HandWidth)*Math.cos(sec);
}
for (i=0; i < D.length; i++){
var DL=(ns)?document.layers['nsDate'+i]:ieDate[i].style;
DL.top=Dy[i] + ClockHeight*1.5*Math.sin(currStep+i*Dsplit*Math.PI/180)+scrll;
DL.left=Dx[i] + ClockWidth*1.5*Math.cos(currStep+i*Dsplit*Math.PI/180);
}
currStep-=step;
}
function Delay(){
scrll=(ns)?window.pageYOffset:0;
Dy[0]=Math.round(DY[0]+=((ymouse)-DY[0])*speed);
Dx[0]=Math.round(DX[0]+=((xmouse)-DX[0])*speed);
for (i=1; i < D.length; i++){
Dy[i]=Math.round(DY[i]+=(Dy[i-1]-DY[i])*speed);
Dx[i]=Math.round(DX[i]+=(Dx[i-1]-DX[i])*speed);
}
y[0]=Math.round(Y[0]+=((ymouse)-Y[0])*speed);
x[0]=Math.round(X[0]+=((xmouse)-X[0])*speed);
for (i=1; i < n; i++){
y[i]=Math.round(Y[i]+=(y[i-1]-Y[i])*speed);
x[i]=Math.round(X[i]+=(x[i-1]-X[i])*speed);
}
ClockAndAssign();
setTimeout('Delay()',20);
}
if (ns||ie)window.onload=Delay;
</SCRIPT>
<BR><BR><BR><BR><BR><BR><BR><BR><BR><FONT color=blue>Hi Guys this is
amazing.</FONT size=20 Color=red><BR>I do not know who wrote this HTML code.<br>Asoka Liyanage.</BODY></HTML>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-17 18:02:00 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

内容滚动的表格

<html>
<head>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<style>
td,p,div,body,font{font-family:"宋体";font-size:9pt}
</style>
<body bgcolor="#FFFFFF" text="#000000">
<table width=500 border=1 cellspacing=0 cellpadding=0 bgcolor=#f0f0ff bordercolordark=#ffffff bordercolorlight=#4D9AD6 class="a">
<tr height=20 bgcolor=#006DAD valign=middle align=center><td colspan=3><font color=#ffffff>2002年04月供应商供货排行榜</font></td></tr>
<tr height=20 bgcolor=#4D9AD6 valign=middle align=center><td width=50><font color=#f0f0f0>名次</font></td><td width=300>
<marquee direction=up height=14 scrollamount=14 scrolldelay=2000 scrollleft=0 scrolltop=0><table border=0 cellspacing=0 cellpadding=0 class="A" align=center>
<tr>
<td><font color=#f0f0f0>【<font color="#FF0000">材料</font>　设备　配件　煤炭　化工　三剂】供应商名称</font></td>
</tr><tr>
<td><font color=#f0f0f0>【材料　<font color="#FF0000">设备</font>　配件　煤炭　化工　三剂】供应商名称</font></td>
</tr>
<tr>
<td><font color=#f0f0f0>【材料　设备　<font color="#FF0000">配件</font>　煤炭　化工　三剂】供应商名称</font></td>
</tr><tr>
<td><font color=#f0f0f0>【材料　设备　配件　<font color="#FF0000">煤炭</font>　化工　三剂】供应商名称</font></td>
</tr><tr>
<td><font color=#f0f0f0>【材料　设备　配件　煤炭　<font color="#FF0000">化工</font>　三剂】供应商名称</font></td>
</tr><tr>
<td><font color=#f0f0f0>【材料　设备　配件　煤炭　化工　<font color="#FF0000">三剂</font>】供应商名称</font></td>
</tr></table>
</marquee></td><td width=150><font color=#f0f0f0>成交金额（万元）</font></td></tr>
<tr bgcolor="#FFFFFF"><td align=center>1</td><td><marquee direction=up height=14 scrollamount=14 scrolldelay=3000 scrollleft=0 scrolltop=0><table border=0 cellspacing=0 cellpadding=0 class="A">
<tr>
<td>投放量将达160万吨</td>
</tr>
<tr>
<td>mm石投放量将达160万吨</td>
</tr>
<tr>
<td>mm油田投放量将达160万吨司</td>
</tr>
<tr>
<td>mm投放量将达160万吨</td>
</tr>
<tr>
<td>mm油田投放量将达160责司</td>
</tr>
<tr>
<td>mm投放量将达160万吨</td>
</tr>
</table></marquee></td><td><marquee direction=up height=14 scrollamount=14 scrolldelay=2000 scrollleft=0 scrolltop=0><table border=0 cellspacing=0 cellpadding=0 class="A" align=right>
<tr><td align=right> 15,570.40</td></tr>
<tr><td align=right> 4,703.07</td></tr>
<tr><td align=right> 682.84</td></tr>
<tr><td align=right> 5,482.77</td></tr>
<tr><td align=right> 3,671.14</td></tr>
<tr><td align=right> 1,461.90</td></tr>
</table></marquee></td></tr>
<tr bgcolor="#FFFFFF"><td align=center>2</td><td><marquee direction=up height=14 scrollamount=14 scrolldelay=2000 scrollleft=0 scrolltop=0>
<table border=0 cellspacing=0 cellpadding=0 class="A" width="183">
<tr>
<td>mm钢铁投放量将达160万吨</td>
</tr>
<tr>
<td>mm投放量将达160万吨程机械厂</td>
</tr>
<tr>
<td>mm标投放量将达160万吨</td>
</tr>
<tr>
<td>mm投放量将达160万吨责任公司</td>
</tr>
<tr>
<td>mm油投放量将达160万吨司</td>
</tr>
<tr>
<td>mm炼投放量将达160万吨剂厂</td>
</tr>
</table></marquee></td><td><marquee direction=up height=14 scrollamount=14 scrolldelay=2000 scrollleft=0 scrolltop=0><table border=0 cellspacing=0 cellpadding=0 class="A" align=right>
<tr><td align=right> 12,096.92</td></tr>
<tr><td align=right> 4,081.08</td></tr>
<tr><td align=right> 236.80</td></tr>
<tr><td align=right> 2,014.50</td></tr>
<tr><td align=right> 590.65</td></tr>
<tr><td align=right> 1,102.50</td></tr>
</table></marquee></td></tr>
<tr bgcolor="#FFFFFF"><td align=center>3</td><td><marquee direction=up height=14 scrollamount=14 scrolldelay=2000 scrollleft=0 scrolltop=0>
<table border=0 cellspacing=0 cellpadding=0 class="A" width="163">
<tr>
<td>mm钢管公司</td>
</tr>
<tr>
<td>mm投放量将达160万吨械厂</td>
</tr>
<tr>
<td>江头股份</td>
</tr>
<tr>
<td>投放量将达160万吨公司</td>
</tr>
<tr>
<td>濮阳投放量将达160万吨</td>
</tr>
<tr>
<td>投放量将达160万吨剂厂</td>
</tr>
</table></marquee></td><td><marquee direction=up height=14 scrollamount=14 scrolldelay=2000 scrollleft=0 scrolltop=0><table border=0 cellspacing=0 cellpadding=0 class="A" align=right>
<tr><td align=right> 8,316.13</td></tr>
<tr><td align=right> 3,100.50</td></tr>
<tr><td align=right> 161.13</td></tr>
<tr><td align=right> 1,755.00</td></tr>
<tr><td align=right> 401.60</td></tr>
<tr><td align=right> 945.00</td></tr>
</table></marquee></td></tr>
<tr bgcolor="#FFFFFF"><td align=center>4</td><td><marquee direction=up height=14 scrollamount=14 scrolldelay=2000 scrollleft=0 scrolltop=0>
<table border=0 cellspacing=0 cellpadding=0 class="A" width="165">
<tr>
<td>天投放量将达160万吨</td>
</tr>
<tr>
<td>东投放量将达160万吨司</td>
</tr>
<tr>
<td>上海东投放量将达160万吨</td>
</tr>
<tr>
<td>上投放量将达160万吨公司</td>
</tr>
<tr>
<td>三投放量将达160万吨公司</td>
</tr>
<tr>
<td>齐鲁投放量将达160万吨</td>
</tr>
</table></marquee></td><td><marquee direction=up height=14 scrollamount=14 scrolldelay=2000 scrollleft=0 scrolltop=0><table border=0 cellspacing=0 cellpadding=0 class="A" align=right>
<tr><td align=right> 4,654.65</td></tr>
<tr><td align=right> 1,010.40</td></tr>
<tr><td align=right> 125.98</td></tr>
<tr><td align=right> 1,752.00</td></tr>
<tr><td align=right> 161.99</td></tr>
<tr><td align=right> 827.11</td></tr>
</table></marquee></td></tr>
<tr bgcolor="#FFFFFF"><td align=center>5</td><td><marquee direction=up height=14 scrollamount=14 scrolldelay=2000 scrollleft=0 scrolltop=0>
<table border=0 cellspacing=0 cellpadding=0 class="A" width="184">
<tr>
<td>江苏曙投放量将达160万吨公司</td>
</tr>
<tr>
<td>东营投放量将达160万吨司</td>
</tr>
<tr>
<td>秦投放量将达160万吨探工具厂</td>
</tr>
<tr>
<td>投放量将达160万吨）运销公司</td>
</tr>
<tr>
<td>河投放量将达160万吨公司</td>
</tr>
<tr>
<td>上投放量将达160万吨司</td>
</tr>
</table></marquee></td><td><marquee direction=up height=14 scrollamount=14 scrolldelay=2000 scrollleft=0 scrolltop=0><table border=0 cellspacing=0 cellpadding=0 class="A" align=right>
<tr><td align=right> 3,341.80</td></tr>
<tr><td align=right> 567.06</td></tr>
<tr><td align=right> 104.00</td></tr>
<tr><td align=right> 1,650.00</td></tr>
<tr><td align=right> 68.66</td></tr>
<tr><td align=right> 684.00</td></tr>
</table></marquee></td></tr>
</table>
</body>
</html>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-17 18:02:36 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

抽屉式菜单

<HTML>
<HEAD>
<TITLE>Document Title</TITLE>
<style>
A{color:blue; text-decoration:none}
A:hover{color:red;text-decoration:underline;}
A:link{text-decoration:none;}
TD{font-family:宋体,helvetica; font-size:9pt}
DIV.clTopMenu{position:absolute; width:97; height:150; clip:rect(0,101,14,0); visibility:hidden; z-index:31; }
DIV.clTopMenuBottom{position:absolute; width:97; height:3; clip:rect(0,101,3,0); top:11; layer-background-color:#c0c000; background-color:#c0c000; z-index:2}
DIV.clTopMenuText{position:absolute; width:88; left:5; top:15; font-family:宋体,helvetica; font-size:9pt; z-index:1;layer-background-color:#C8C8FF; background-color:#C8C8FF}
</style>
<script>
ie=document.all?1:0
n=document.layers?1:0
/***设置变量***/
var numberOfMenus=1 //这个变量是定义有几个抽屉式菜单。0代表有一个，1代表有两个（需要在<body></body>中定义不同的菜单定义）
var mwidth=97 //菜单文字的宽度
var pxBetween=10 //两个或多个菜单的间隔（单位：像素）
var fromLeft=20 //第一个菜单的左边边距（单位：像素）
var fromTop=10 //菜单的上边距（单位：像素）
var bgColor='#c0c000' //当鼠标没有移入菜单头时，菜单底的颜色
var bgColorChangeTo='#c0c000'//当鼠标移入菜单头时，菜单底的颜色
var imageHeight=13 //菜单头的高度（单位：像素）
/***下面的程序如果你不是高手，请不要更改***/
//构造对象
function makeNewsMenu(obj,nest){
nest=(!nest) ? '':'document.'+nest+'.'
this.css=(n) ? eval(nest+'document.'+obj):eval('document.all.'+obj+'.style')
this.scrollHeight=n?this.css.document.height:eval('document.all.'+obj+'.offsetHeight')
this.moveIt=b_moveIt;this.bgChange=b_bgChange;
this.slideUp=b_slideUp; this.slideDown=b_slideDown;
this.clipTo=b_clipTo;
this.obj = obj + "Object"; eval(this.obj + "=this")
}
//对像的方法
function b_moveIt(x,y){this.x=x; this.y=y; this.css.left=this.x; this.css.top=this.y}
function b_bgChange(color){if(ie) this.css.backgroundColor=color; else this.css.bgColor=color}
function b_clipTo(t,r,b,l){
if(n){this.css.clip.top=t; this.css.clip.right=r; this.css.clip.bottom=b; this.css.clip.left=l
}else this.css.clip="rect("+t+","+r+","+b+","+l+")";
}
function b_slideUp(ystop,moveby,speed,fn,wh){
if(!this.slideactive){
if(this.y>ystop){
this.moveIt(this.x,this.y-5); eval(wh)
setTimeout(this.obj+".slideUp("+ystop+","+moveby+","+speed+",'"+fn+"','"+wh+"')",speed)
}else{
this.slideactive=false; this.moveIt(0,ystop); eval(fn)
}
}
}
function b_slideDown(ystop,moveby,speed,fn,wh){
if(!this.slideactive){
if(this.y<ystop){
this.moveIt(this.x,this.y+5); eval(wh)
setTimeout(this.obj+".slideDown("+ystop+","+moveby+","+speed+",'"+fn+"','"+wh+"')",speed)
}else{
this.slideactive=false; this.moveIt(0,ystop); eval(fn)
}
}
}
//初始化，并建立一个跨浏览器的页
function newsMenuInit(){
oTopMenu=new Array()
for(i=0;i<=numberOfMenus;i++){
oTopMenu[i]=new Array()
oTopMenu[i][0]=new makeNewsMenu('divTopMenu'+i)
oTopMenu[i][1]=new makeNewsMenu('divTopMenuBottom'+i,'divTopMenu'+i)
oTopMenu[i][2]=new makeNewsMenu('divTopMenuText'+i,'divTopMenu'+i)
oTopMenu[i][1].moveIt(0,imageHeight)
oTopMenu[i][0].clipTo(0,mwidth,imageHeight+3,0)
oTopMenu[i][0].moveIt(i*mwidth+fromLeft+(i*pxBetween),fromTop)
oTopMenu[i][0].css.visibility="visible"
}
}
//当点击后，移到菜单，就像抽屉一样打开菜单
function topMenu(num){
if(oTopMenu[num][1].y==imageHeight) oTopMenu[num][1].slideDown(oTopMenu[num][2].scrollHeight+20,10,40,'oTopMenu['+num+'][0].clipTo(0,mwidth,oTopMenu['+num+'][1].y+3,0)','oTopMenu['+num+'][0].clipTo(0,mwidth,oTopMenu['+num+'][1].y+3,0)')
else if(oTopMenu[num][1].y==oTopMenu[num][2].scrollHeight+20) oTopMenu[num][1].slideUp(imageHeight,10,40,'oTopMenu['+num+'][0].clipTo(0,mwidth,oTopMenu['+num+'][1].y+3,0)','oTopMenu['+num+'][0].clipTo(0,mwidth,oTopMenu['+num+'][1].y+3,0)')
}
//当鼠标进入时，
function menuOver(num){oTopMenu[num][1].bgChange(bgColorChangeTo)}
function menuOut(num){oTopMenu[num][1].bgChange(bgColor)}
//在页面载入的时候初始化菜单
onload=newsMenuInit;
</script>
</HEAD>
<BODY bgcolor=white>
<div id="divTopMenu0" class="clTopMenu"><a href="#" onmouseover="menuOver(0)" onmouseout="menuOut(0)" onclick="topMenu(0); if(ie)this.blur(); return false"><img src="tr1207-clickformenu.gif" width=97 alt="请单击以“展开/收起”菜单" border=0 align="top"></a>
<div id="divTopMenuText0" class="clTopMenuText"><center>
<a href="#" ONMOUSEOVER="window.status='菜单项一';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【菜单项一】</a><br>
<a href="#" ONMOUSEOVER="window.status='菜单项二';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【菜单项二】</a><br>
<a href="#" ONMOUSEOVER="window.status='菜单项三';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【菜单项三】</a><br>
<a href="#" ONMOUSEOVER="window.status='菜单项四';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【菜单项四】</a><br>
<a href="#" ONMOUSEOVER="window.status='菜单项五';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【菜单项五】</a><br>
<a href="#" ONMOUSEOVER="window.status='菜单项六';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【菜单项六】</a><br>
<a href="http://haoel.yeah.net/" target="_blank" ONMOUSEOVER="window.status='耗子网络编程站';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【耗子编程站】</a></center>
</div>
<div id="divTopMenuBottom0" class="clTopMenuBottom"></div>
</div>
<div id="divTopMenu1" class="clTopMenu"><a href="#" onmouseover="menuOver(1)" onmouseout="menuOut(1)" onclick="topMenu(1); if(ie)this.blur(); return false"><img src="tr1207-clickformenu.gif" width=97 alt="请单击以“展开/收起”菜单" border=0 align="top"></a>
<div id="divTopMenuText1" class="clTopMenuText"><center>
<a href="#" ONMOUSEOVER="window.status='菜单项七';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【菜单项七】</a><br>
<a href="#" ONMOUSEOVER="window.status='菜单项八';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【菜单项八】</a><br>
<a href="#" ONMOUSEOVER="window.status='菜单项九';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【菜单项九】</a><br>
<a href="#" ONMOUSEOVER="window.status='菜单项十';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【菜单项十】</a><br>
<a href="http://haoel.yeah.net/" target="_blank" ONMOUSEOVER="window.status='耗子网络编程站';return true;" ONMOUSEOUT="window.status='';return true;" onclick="window.focus()">【耗子编程站】</a></center>
</div>
<div id="divTopMenuBottom1" class="clTopMenuBottom"></div>
</div>
</BODY>
</HTML>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

卫星星

小恐龙

Rank: 3 Rank: 3

升级 11.33%

注册时间: 2003-2-26
威望: 159
阅读权限: 30
积分: 234
帖子: 129
精华: 1
UID: 567
状态: 当前离线

发表于 2003-3-17 18:03:33 |显示全部楼层 |串个门|加好友|打招呼|发消息 |

在ShowModeldialog中实现编辑功能

<script>
var msg_win = null;
function showMessage()
{
var num ='about:<textarea name="S1" style="width:100%; height:100%">Is me</textarea>'
msg_win = window.showModelessDialog(num,"MSGMSGMSG","dialogLeft:0px;dialogTop:0px;dialogHeight:200px;dialogWidth:250px;center:yes;help:yes;resizable:yes;status:no;scroll:no");
}
</script>
<button onclick=showMessage()>open</button>

复制代码运行代码另存代码

小兵的天堂，独立师 http://www.dulishi.net

使用道具举报

1 234 5 6 7 8 下一页

返回列表

帐号		自动登录	找回密码
密码			加入无忧

[无忧经典旧帖] == 众多高手的心血集合 [复制链接]

浏览过的版块