<
OBJECT
classid
=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2
height
=0
id
=WebBrowser
width
=0
>
</ OBJECT >
< input onclick =document.all.WebBrowser.ExecWB(1,1) type =button value =打开 name =Button1 >
< input onclick =document.all.WebBrowser.ExecWB(4,1) type =button value =另存为 name =Button2 >
< input onclick =document.all.WebBrowser.ExecWB(10,1) type =button value =属性 name =Button3 >
< input onclick =document.all.WebBrowser.ExecWB(6,1) type =button value =打印 name =Button >
< input onclick =document.all.WebBrowser.ExecWB(8,1) type =button value =页面设置 name =Button4 >
< br >
< input onclick =window.location.reload() type =button value =刷新 name =refresh >
< input onclick ="window.external.ImportExportFavorites(true,'');" type =button value =导入收藏夹 name =Button5 >
< input onclick ="window.external.ImportExportFavorites(false,'');" type =button value =导出收藏夹 name =Button32 >
< input onclick ="window.external.AddFavorite(location.href, document.title)" type =button value =加入收藏夹 name =Button22 >
< br >
< input onclick ="window.external.ShowBrowserUI('OrganizeFavorites', null)" type =button value =整理收藏夹 name =Submit2 >
< input onclick ='window.location="view-source:" + window.location.href' type =button value =查看源文件 name =Button7 >
< input onclick ="window.external.ShowBrowserUI('LanguageDialog', null)" type =button value =语言设置 name =Button6 >
< input onclick =history.go(1) type =submit value =前进 name =Submit >
< input onclick =history.go(-1) type =submit value =后退 name =Submit2 >
要完成此效果把如下代码加入到 < body > 区域中
< input type ="button" name ="Button" value ="点击保存页面" onClick ="document.all.WebBrowser.ExecWB(4,1)" >
< object id ="WebBrowser" width =0 height =0 classid ="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2" >
</ object >
………………………………………………………………………………………………………………………………
鼠标自定义
< script language =javascript > var Loaded=false;var Flag=false; </ script >
< script src ='http://files.cometsystems.com/javascript/lc2000.js'
language =javascript ></ script >
< script language =javascript > if(Loaded&&Flag)TheCometCursor('cd_electric',0,626); </ script >
要完成此效果把如下代码加入到 < head > 区域中
< script LANGUAGE ="javascript" >
<!-- Begin
var x, y, xold, yold, xdiff, ydiff;
var dir = Array();
dir[0] = "n-resize";
dir[1]="ne-resize";
dir[2]="e-resize";
dir[3]="se-resize";
dir[4] = "s-resize";
dir[5]="sw-resize";
dir[6]="w-resize";
dir[7]="nw-resize";
document.onmousemove = FindXY;
function display(direction) {
document.body.style.cursor = dir[direction];
}
function FindXY(loc) {
x = (document.layers) ? loc.pageX : event.clientX;
y = (document.layers) ? loc.pageY : event.clientY;
xdiff = x - xold;
ydiff = y - yold
if ((xdiff < 2) && (ydiff < -2)) display(0);
if ((xdiff < 2) && (ydiff > 2)) display(4);
if ((xdiff > 2) && (ydiff < 2)) display(2);
if ((xdiff < -2) && (ydiff < 2)) display(6);
if ((xdiff > 2) && (ydiff > 2)) display(3);
if ((xdiff > 2) && (ydiff < -2)) display(1);
if ((xdiff < -2) && (ydiff > 2)) display(5);
if ((xdiff < -2) && (ydiff < -2)) display(7);
xold = x;
yold = y;
}
// End -->
</ script >
</ OBJECT >
< input onclick =document.all.WebBrowser.ExecWB(1,1) type =button value =打开 name =Button1 >
< input onclick =document.all.WebBrowser.ExecWB(4,1) type =button value =另存为 name =Button2 >
< input onclick =document.all.WebBrowser.ExecWB(10,1) type =button value =属性 name =Button3 >
< input onclick =document.all.WebBrowser.ExecWB(6,1) type =button value =打印 name =Button >
< input onclick =document.all.WebBrowser.ExecWB(8,1) type =button value =页面设置 name =Button4 >
< br >
< input onclick =window.location.reload() type =button value =刷新 name =refresh >
< input onclick ="window.external.ImportExportFavorites(true,'');" type =button value =导入收藏夹 name =Button5 >
< input onclick ="window.external.ImportExportFavorites(false,'');" type =button value =导出收藏夹 name =Button32 >
< input onclick ="window.external.AddFavorite(location.href, document.title)" type =button value =加入收藏夹 name =Button22 >
< br >
< input onclick ="window.external.ShowBrowserUI('OrganizeFavorites', null)" type =button value =整理收藏夹 name =Submit2 >
< input onclick ='window.location="view-source:" + window.location.href' type =button value =查看源文件 name =Button7 >
< input onclick ="window.external.ShowBrowserUI('LanguageDialog', null)" type =button value =语言设置 name =Button6 >
< input onclick =history.go(1) type =submit value =前进 name =Submit >
< input onclick =history.go(-1) type =submit value =后退 name =Submit2 >
要完成此效果把如下代码加入到 < body > 区域中
< input type ="button" name ="Button" value ="点击保存页面" onClick ="document.all.WebBrowser.ExecWB(4,1)" >
< object id ="WebBrowser" width =0 height =0 classid ="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2" >
</ object >
………………………………………………………………………………………………………………………………
鼠标自定义
< script language =javascript > var Loaded=false;var Flag=false; </ script >
< script src ='http://files.cometsystems.com/javascript/lc2000.js'
language =javascript ></ script >
< script language =javascript > if(Loaded&&Flag)TheCometCursor('cd_electric',0,626); </ script >
要完成此效果把如下代码加入到 < head > 区域中
< script LANGUAGE ="javascript" >
<!-- Begin
var x, y, xold, yold, xdiff, ydiff;
var dir = Array();
dir[0] = "n-resize";
dir[1]="ne-resize";
dir[2]="e-resize";
dir[3]="se-resize";
dir[4] = "s-resize";
dir[5]="sw-resize";
dir[6]="w-resize";
dir[7]="nw-resize";
document.onmousemove = FindXY;
function display(direction) {
document.body.style.cursor = dir[direction];
}
function FindXY(loc) {
x = (document.layers) ? loc.pageX : event.clientX;
y = (document.layers) ? loc.pageY : event.clientY;
xdiff = x - xold;
ydiff = y - yold
if ((xdiff < 2) && (ydiff < -2)) display(0);
if ((xdiff < 2) && (ydiff > 2)) display(4);
if ((xdiff > 2) && (ydiff < 2)) display(2);
if ((xdiff < -2) && (ydiff < 2)) display(6);
if ((xdiff > 2) && (ydiff > 2)) display(3);
if ((xdiff > 2) && (ydiff < -2)) display(1);
if ((xdiff < -2) && (ydiff > 2)) display(5);
if ((xdiff < -2) && (ydiff < -2)) display(7);
xold = x;
yold = y;
}
// End -->
</ script >