ASP¹ØÓÚ´òÓ¡
1¡¢¿ØÖÆ"×Ý´ò"¡¢ ºá´ò”ºÍ“Ò³ÃæµÄ±ß¾à¡£
£¨1£©<script defer>
function SetPrintSettings() {
// -- advanced features
factory.printing.SetMarginMeasure(2) // measure margins in inches
factory.SetPageRange(false, 1, 3) // need pages from 1 to 3
factory.printing.printer = "HP DeskJet 870C"
factory.printing.copies = 2
factory.printing.collate = true
factory.printing.paperSize = "A4"
factory.printing.paperSource = "Manual feed"
// -- basic features
factory.printing.header = "This is MeadCo"
factory.printing.footer = "Advanced Printing by ScriptX"
factory.printing.portrait = false
factory.printing.leftMargin = 1.0
factory.printing.topMargin = 1.0
factory.printing.rightMargin = 1.0
factory.printing.bottomMargin = 1.0
}
</script>
£¨2£©
<script language="javascript">
function printsetup(){
// ´òÓ¡Ò³ÃæÉèÖÃ
wb.execwb(8,1);
}
function printpreview(){
// ´òÓ¡Ò³ÃæÔ¤ÀÀ
wb.execwb(7,1);
}
function printit()
{
if (confirm('È·¶¨´òÓ¡Âð£¿')) {
wb.execwb(6,6)
}
}
</script>
</head>
<body>
<OBJECT classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"
height=0 id=wb name=wb width=0></OBJECT>
<input type=button name=button_print value="´òÓ¡"
onclick="javascript:printit()">
<input type=button name=button_setup value="´òÓ¡Ò³ÃæÉèÖÃ"
onclick="javascript:printsetup();">
<input type=button name=button_show value="´òÓ¡Ô¤ÀÀ"
onclick="javascript:printpreview();">
<input type=button name=button_fh value="¹Ø±Õ"
onclick="javascript:window.close();">
------------------------------------------------
¹ØÓÚÕâ¸ö×é¼þ»¹ÓÐÆäËûµÄÓ÷¨£¬ÁоÙÈçÏ£º
WebBrowser.ExecWB(1,1) ´ò¿ª
Web.ExecWB(2,1) ¹Ø±ÕÏÖÔÚËùÓеÄIE´°¿Ú£¬²¢´ò¿ªÒ»¸öд°¿Ú
Web.ExecWB(4,1) ±£´æÍøÒ³
Web.ExecWB(6,1) ´òÓ¡
Web.ExecWB(7,1) ´òÓ¡Ô¤ÀÀ
Web.ExecWB(8,1) ´òÓ¡Ò³ÃæÉèÖÃ
Web.ExecWB(10,1) ²é¿´Ò³ÃæÊôÐÔ
Web.ExecWB(15,1) ºÃÏñÊdz·Ïú£¬ÓдýÈ·ÈÏ
Web.ExecWB(17,1) ȫѡ
Web.
Ïà¹ØÎĵµ£º
Ó¦ÓóÌÐòÓòÊÇͨ¹ýCLRÇ¿ÖÆ½ç¶¨µÄÈ·±£Ó¦ÓóÌÐò¼ä²»Ï໥ӰÏìµÄµØÖ·¿Õ¼ä£¬Ëü¾ßÓÐÒÔÏÂÌØÕ÷
1£®Ò»¸ö¶ÀÁ¢µÄWebÓ¦ÓóÌÐòµÄËùÓÐWebÒ³¹²ÏíÏàͬµÄÄÚ´æ×ÊÔ´£¬ÀýÈçÈ«¾ÖµÄÓ¦ÓóÌÐòÊý¾Ý£¬Ã¿¸öÓû§µÄSessionÊý¾ÝÒÔ¼°»º´æÊý¾Ý¡£ÕâЩÐÅÏ¢²»Äܱ»ÆäËûµÄASP.Net»òASPÓ¦ÓóÌÐòÖ±½Ó·ÃÎÊ¡£
2£®Ò»¸ö¶ÀÁ¢µÄWebÓ¦ÓóÌÐòËùÓÐWebÒ³¹² ......
±¾ÎÄÁ´½Ó£ºhttp://www.oversteper.com/wprogram/asp/827.html
Ìõ¼þÓï¾äÖ® if ... then ... else Óï¾ä
ÓÃÀ´ÅжÏÌõ¼þÊÇ true »ò false £¬²¢¸ù¾ÝÅжϽá¹ûÀ´Ö´ÐÐÖ¸¶¨µÄÓï¾ä£¬Í¨³£Ìõ¼þÊÇÓñȽÏÔËËã·û¶ÔÖµ»ò±äÁ¿½øÐбȽÏÀ´±í´ï¡£
if ... then ... else ¿ÉÒÔ¸ù¾ÝÐèÒª½øÐÐǶÌ×ʹÓ㬿ÉÒÔд³É elseif ¡£
ʾÀý£º
ÒÔÏÂÎ ......
±¾ÎÄÁ´½Ó£ºhttp://www.oversteper.com/wprogram/asp/828.html
Ìõ¼þÓï¾äÖ® select case Óï¾ä
1¡¢¶àÌõ¼þ·ÖÖ§µÄʱºòÓÅÏÈʹÓÃselect case½á¹¹£»
2¡¢Êý×ֵĴóÁ¿ÁоÙʱ×îºÃʹÓÃselect case
3¡¢±ØÐëʹÓà end select À´½áÊø·ÖÖ§½á¹¹
ʾÀý£º
ÒÔÏÂΪ ......
±¾ÎÄÁ´½Ó£ºhttp://www.oversteper.com/wprogram/asp/830.html
do ... loop Óï¾äÁ½ÖÖ¸ñʽµÄʾÀý
do whil ... loop £º
ÒÔÏÂΪÒýÓÃÄÚÈÝ£º
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dt ......
<%
'==================================================
'º¯ÊýÃû£ºGetHttpPage
'×÷ Ó㺻ñÈ¡ÍøÒ³Ô´Âë
'²Î Êý£ºHttpUrl ------ÍøÒ³µØÖ·
'==================================================
Function GetHttpPage(HttpUrl)
If IsNull(HttpUrl)=True or Len(HttpUrl)<18 or HttpUrl="$False$" Then
GetHttp ......