用户登录  |  用户注册
首 页商业源码原创产品编程论坛
当前位置:PB创新网文章中心编程技巧Delphi

把以下代码加在网页里

减小字体 增大字体 作者:佚名  来源:本站整理  发布时间:2009-03-16 20:19:02
<script language="Javascript">
function printit(){  
if (NS) {
    window.print() ;  
} else {
    var WebBrowser = ''<OBJECT ID="WebBrowser1" WIDTH=0 HEIGHT=0 CLASSID="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"></OBJECT>'';
document.body.insertAdjacentHTML(''beforeEnd'', WebBrowser);
    WebBrowser1.ExecWB(6, 2);//Use a 1 vs. a 2 for a prompting dialog box
WebBrowser1.outerHTML = "";  
}
}
</script>

<script language="Javascript">  
var NS = (navigator.appName == "Netscape");
var VERSION = parseInt(navigator.appVersion);
if (VERSION > 3) {
    document.write(''<form><input class="unnamed" type=button value="请按此打印本页" name="Print" onClick="printit()"></form>'');        
}
</script>

Tags:

作者:佚名

文章评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论
PB创新网ourmis.com】Copyright © 2000-2009 . All Rights Reserved .
页面执行时间:23,437.50000 毫秒
Email:ourmis@126.com QQ:2322888 蜀ICP备05006790号