适合于IE6 SP1的无边框网页--仍然需要改进,但对于基本应用应该可用了

简介:

< HTML >
< meta  http-equiv ="Content-Type"  content ="text/html; charset=gb2312" >
< title >Chromeless Window </ title >

< SCRIPT  LANGUAGE ="JScript" >
/*
 This following code are designed and writen by Windy_sk <windy_sk@126.com>
 You can use it freely, but u must held all the copyright items!
 2003-12-23 modified
 Special Thanks For andot
*/



var CW_width    = 400;
var CW_height    = 300;
var CW_top    = 100;
var CW_left    = 100;
var CW_url    = "./default.htm";
var New_CW    = window.createPopup();
var CW_Body    = New_CW.document.body;
var content    = "";
var CSStext    = "margin:1px;color:black; border:2px outset;border-style:expression(onmouseout=onmouseup=function(){this.style.borderStyle='outset'}, onmousedown=function(){if(event.button!=2)this.style.borderStyle='inset'});background-color:buttonface;width:16px;height:14px;font-size:12px;line-height:11px;cursor:Default;";

function insert_content(){
    
var temp = "";
    CW_Body.style.overflow        
= "hidden";
    CW_Body.style.backgroundColor    
= "white";
    CW_Body.style.border        
= "solid black 1px";
    temp 
+= "<table width=100% height=100% cellpadding=0 cellspacing=0 border=0>";
    temp 
+= "<tr style=';font-size:12px;background:#0099CC;height:20;cursor:default' ondblclick=\"Max.innerText=Max.innerText=='1'?'2':'1';parent.if_max=!parent.if_max;parent.show_CW();\" onmouseup='parent.drag_up(event)' onmousemove='parent.drag_move(event)' onmousedown='parent.drag_down(event)' onselectstart='return false' oncontextmenu='return false'>";
    temp 
+= "<td style='color:#ffffff;padding-left:5px'> 无边框窗口 For IE6 SP1 </td>";
    temp 
+= "<td style='color:#ffffff;padding-right:5px;' align=right>";
    temp 
+= "<span id=Help  onclick=\"alert('无边框窗口 For IE6 SP1  -  Ver 1.0\\n\\n Source Code By Windy_sk\\n\\nSpecial Thanks For andot\\n\\n Second Edit by SGSOFT')\" style=\""+CSStext+"font-family:System;padding-right:2px;\">?</span>";
    temp 
+= "<span id=Min   onclick='parent.New_CW.hide();parent.blur()' style=\""+CSStext+"font-family:Webdings;\" title='Minimum'>0</span>";
    temp 
+= "<span id=Max   onclick=\"this.innerText=this.innerText=='1'?'2':'1';parent.if_max=!parent.if_max;parent.show_CW();\" style=\""+CSStext+"font-family:Webdings;\" title='Maximum'>1</span>";
    temp 
+= "<span id=Close onclick='parent.opener=null;parent.close()' style=\""+CSStext+"font-family:System;padding-right:2px;\" title='Close'>x</span>";
    temp 
+= "</td></tr><tr><td colspan=2>";
    temp 
+= "<div>";
    temp 
+= "<object id='include' style='overflow:scroll; HEIGHT: 100%; width:"+CW_width+"';border:0px' type='text/html' data='"+CW_url+"'></object>";
    temp 
+= "</div>";
    temp 
+= "</td></tr></table>";
    CW_Body.innerHTML 
= temp;
}

/*
原版函数,会出现脚本变量溢出错误
insert_content();


var if_max = true;
function show_CW(){
    window.moveTo(10000, 10000);
    if(if_max){
        New_CW.show(CW_top, CW_left, CW_width, CW_height);
        if(typeof(New_CW.document.all.include)!="undefined"){
            New_CW.document.all.include.style.width = CW_width;
            New_CW.document.all.Max.innerText = "1";
        }
        
    }else{
        New_CW.show(0, 0, screen.width, screen.height);
        New_CW.document.all.include.style.width = screen.width;
    }
}

*/

//----------------------------------------
/*
修改后的函数,解决了脚本溢出问题,但是在WinXP下,多次重复点击,仍然有可能出现错误
*/

var if_max = true;
setTimeout(
"insert_content()",500);

function show_CW(){
    window.moveTo(
1000010000);
    
if(if_max || New_CW.document.body.offsetWidth==screen.width && New_CW.document.body.offsetHeight==screen.height){
        New_CW.show(CW_top, CW_left, CW_width, CW_height);
        New_CW.document.all.include.style.width 
= CW_width;
        New_CW.document.all.Max.innerText 
= 2;
    }
else{
        New_CW.show(
00, screen.width, screen.height);
        New_CW.document.all.include.style.width 
= screen.width;
    }

}



//-----------------------------------------



window.onfocus  
= show_CW;
window.onresize 
= show_CW;

// Move Window
var drag_x,drag_y,draging=false

function drag_move(e){
    
if (draging){
        New_CW.show(e.screenX
-drag_x, e.screenY-drag_y, CW_width, CW_height);
        
return false;
    }

}


function drag_down(e){
    
if(e.button==2)return;
    
if(New_CW.document.body.offsetWidth==screen.width && New_CW.document.body.offsetHeight==screen.height)return;
    drag_x
=e.clientX;
    drag_y
=e.clientY;
    draging
=true;
    e.srcElement.setCapture();
}


function drag_up(e){
    draging
=false;
    e.srcElement.releaseCapture();
    
if(New_CW.document.body.offsetWidth==screen.width && New_CW.document.body.offsetHeight==screen.height) return;
    CW_top  
= e.screenX-drag_x;
    CW_left 
= e.screenY-drag_y;
}


</ SCRIPT >
</ HTML >

default.htm可以是这样:
< html >
     < head >
         < title >LifeWithDVD </ title >
         < meta  http-equiv ="Content-Type"  content ="text/html; charset=GB2312" >
     < script  id =clientEventHandlersJS  language =javascript>
<!--

function btn_onclick() {
//window.close();
alert(Text3.value+Text1.value);
return false;
}

//--
>
</ script >
</ head >
     < body >
         < Div >
            User Name < INPUT  id ="Text3"  type ="text"  name ="Text1" >< br >
            Password  < INPUT  id ="Text1"  type ="text"  name ="Text1" >< br >
             < p > &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </ p >
             < input  id ="btn"  type ="button"  name ="btnsubmit"  value ="submit"  onclick ="return btn_onclick()" >
         </ Div >
     </ body >
</ html >


本文转自斯克迪亚博客园博客,原文链接:http://www.cnblogs.com/sgsoft/archive/2004/10/13/51679.html,如需转载请自行联系原作者
相关文章
|
.NET
艾伟:Silverlight 2.0在IE6 SP2上的虚线边框问题
  在《Silverlight嵌入到HTML之windowless属性及运用AjaxControlToolKit时出现虚线边框的问题》里谈一些Silverlight在浏览器上运行时会出现虚线边框的问题,当时主要考虑了IE7和FireFox,却没想到在ie6 sp2上还是会出现虚线边框,必须鼠标点击一次让其获得焦点虚线边框才消失。
865 0
|
C++ 数据格式 XML
duilib 的IE浏览器控件去边框和去滚动条的代码
转载请说明原出处,谢谢~~         近些天在duilib群里经常有朋友问起,怎么让duilib的IE控件可以去边框,去滚动条的问题,或者是如何去控件IE控件的行为。
1200 0
|
Web App开发 前端开发 HTML5
又抓到虫子了:IE中奇怪的应用CSS的BUG
  由于IE系浏览器对标准的支持不够好,导致Web开发中经常需要去处理浏览器兼容性问题,特别有些莫名其妙的问题很让人头疼,今天要说这个问题就是这样的,先从插入CSS的三种方法说起:   外部样式(External Style Sheet)   当样式需要应用于很多页面时,外部样式表将是理想的选择。
746 0
|
Web App开发 前端开发 JavaScript
|
2月前
|
Web App开发 JavaScript 前端开发
添加浮动按钮点击滚动到网页底部的纯JavaScript演示代码 IE9、11,Maxthon 1.6.7,Firefox30、31,360极速浏览器7.5.3.308下测试正常
添加浮动按钮点击滚动到网页底部的纯JavaScript演示代码 IE9、11,Maxthon 1.6.7,Firefox30、31,360极速浏览器7.5.3.308下测试正常
|
1月前
|
JavaScript 前端开发
|
5月前
|
Web App开发 XML 开发框架
技术心得记录:在IE浏览器中的奇怪页面表现
技术心得记录:在IE浏览器中的奇怪页面表现
55 0
|
3月前
|
JavaScript
VUE——如何兼容IE9|IE10|IE11浏览器
VUE——如何兼容IE9|IE10|IE11浏览器
134 0
VUE——如何兼容IE9|IE10|IE11浏览器