关于打印的问题！很急

Question

在第二个框架页（即按钮所在页)加
<style type=text/css>
@media print {body{display:none}}
</style><script language="VBScript">
dim hkey_root,hkey_path,hkey_key
hkey_root="HKEY_CURRENT_USER"
hkey_path="\Software\Microsoft\Internet Explorer\PageSetup"
'//设置网页打印的页眉页脚为空
function pagesetup_null()
    on error resume next
    Set RegWsh = CreateObject("WScript.Shell")
    hkey_key="\header"    
    RegWsh.RegWrite hkey_root+hkey_path+hkey_key,""
    hkey_key="\footer"
    RegWsh.RegWrite hkey_root+hkey_path+hkey_key,""
end function
'//设置网页打印的页眉页脚为默认值
function pagesetup_default()
    on error resume next
    Set RegWsh = CreateObject("WScript.Shell")
    hkey_key="\header"    
    RegWsh.RegWrite hkey_root+hkey_path+hkey_key,"&w&b页码，&p/&P"
    hkey_key="\footer"
    RegWsh.RegWrite hkey_root+hkey_path+hkey_key,"&u&b&d"
end function
</script>

Answer 1

补充:打印函数
<input type=button value="打印" onclick="window.print()">

Answer 2

<button onclick="parent.topframe.print()">print</button>

Answer 3

<SCRIPT LANGUAGE=javascript>
<!--
function printdoc(){
parent.frames[1].window.print();}//-->
</SCRIPT>