aspÖдÓÊý¾Ý¿âµ¼³öEXCELʱ£¬EXCELºêÓ¦Óõı߿òÉèÖÃ
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = false '²»ÏÔʾ¾¯¸æ
'xlApp.Application = false '²»ÏÔʾ½çÃæ
xlapp.Workbooks.add
set objExcelBook = xlapp.ActiveWorkBook
set objExcelSheets = objExcelBook.Worksheets
set xlSheet = objExcelBook.Sheets(1)
EXCELÖÐÉèÖñ߿ò£¬Â¼ÖƵĺê
Sub Macro1()
'
' Macro1 Macro
' ºêÓÉ YlmF ¼ÖÆ£¬Ê±¼ä: 2009-9-15 test
'
' ¿ì½Ý¼ü: Ctrl+q
'
Range("A3:G32").Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
With Selection.Borders(xlEdgeLeft)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeTop)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeRight)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
 
Ïà¹ØÎĵµ£º
Ò»°ãÀ´Ëµ±àÊý¾Ý¿âÀàµÄ³ÌÐòÖ÷ÒªÒª½â¾öµÄÎÊÌâÎÞ·ÇÊÇÌí¼Ó£¬É¾³ý£¬Ð޸ĺͲéѯ¡£ÕâÀà±à³Ì¶¼·Ç³£µÄ¼òµ¥¡£½ÓÏÂÀ´ÎÒÀûÓÃÒ»µã¿ÕÓàʱ¼ä·¢Ò»¸öº¯ÊýÀïÃæ°üº¬ºÍÌí¼ÓºÍɾ³ý¹¦ÄÜ¡£ÊµÑéµÄ¼Ü¹¹¿ÉÒÔʹÓÃIIS.5WEB·þÎñÆ÷ACCESSÊý¾Ý¿â¡£Õâ¸öÎÒÆäʵ²»ÓÃ˵µÄºÜÏêϸÁË£¬ÒòΪ´ó¼Ò¶¼Ó¦¸ÃÖªµÀµÄ¡£ÎÒ¾ÍÖ±½Ó°Ñº¯ÊýÌù³öÀ´¡£´ó¼ÒÖ»ÒªÉÔÎ ......
web serviceÔÚÏÖÔڵĸ÷ϵͳÖеõ½Á˹㷺µÄÓ¦Óá£ËüΪÎÒÃǸ÷ϵͳ֮¼äµÄ¹¦ÄÜ·ÃÎÊ£¬Êý¾Ý½»»»,Æðµ½Á˲»¿ÉÄ¥ÃðµÄ×÷Ó᣶øÇÒ»¹Äܼò»¯ÎÒÃǵıä³É£¬Ôڴ˾ͶÔasp×÷Ϊwebservice¿Í»§¶ËÉÔ×÷̽ÌÖ¡£
±¾ÎÄͨ¹ý½«Ò»Ð©¾ßÌåµÄÒµÎñ¹¦ÄÜд³ÉXML Web Services²¢ÇÒ½«ÕâЩXML Web ServicesÓëASP³ÌÐòÍêÃÀ½áºÏ£¬ÏÖÓеÄASP³ÌÐò¾Í¿ÉÒÔÏóASP.NE ......
¿´µ½ÓÐÅóÓÑ˵ǰÃæÒ»Õ½²µÃû±ØÒª,ÏëÏëҲȷʵ.±¾À´ÊÇûÓдòËã½²ÕâЩ»ù´¡µÄ,Ö»ÊÇÐÐÎÄÆðÀ´Ã»ÓÐÔ¼Êø,¾Íµ´¿ªµ½»ù´¡ÖªÊ¶ÉÏÃæÁË.
´ÓÕâ½Ú¿ªÊ¼,½«»á¸ø´ó¼Ò½éÉÜASPÖеÄÈý´óͨÓÃÀà,Ëü¹á´©ÓÚÎÒËùÉè¼ÆµÄÈý²ã¼Ü¹¹ÖÐ,ÊǶÔASPÓï·¨µÄÀ©Õ¹,¿ÉÒÔÌá¸ßºÜ¶àϸ½Ú´¦ÀíÉϵÄЧÂÊ,¿ÉÒÔËãÊÇÒ»µãµã¿ò¼ÜµÄζµÀ.
& ......
¡¡¡¡ÕâƪÎÄÕÂÖ÷Òª½éÉÜÁËÈçºÎʹÓÃASP¿ØÖÆWebµÄ¸÷ÖÖ´òӡЧ¹û£¬ËüÄܹ»¿ØÖÆ×Ý´ò¡¢ºá´òºÍÒ³Ãæ±ß¾àµÈ¡£
¡¡¡¡
¡¡¡¡1¡¢¿ØÖÆ"×Ý´ò"¡¢ "ºá´ò"ºÍ"Ò³ÃæµÄ±ß¾à"¡£
¡¡¡¡
¡¡¡¡£¨1£©
¡¡¡¡
¡¡¡¡< script defer>
¡¡¡¡function SetPrintSettings() {
¡¡¡¡// -- advanced features
¡¡¡¡factory.printing.SetMarginMeasure(2) ......
ÔÎÄÒýÓÃ:
http://www.17558.net/cmd.asp?act=tb&id=16&key=43840
ÔÎĵØÖ·:http://www.17558.net/post/16.html
żÊÇÒ»¸öµ×²ãµÄASP¼¼ÊõÈËÔ±(ÊôÓÚ°ë·³ö¼ÒµÄÄÇÖÖ,ÒÔÇ°ÊÇÒ»ÃûÍøÂç¼¼ÊõÈËÔ±),×î½ü²ÎÓëÖÆ×÷Ò»¸öCRMϵͳ,¼Ü¹»²ÉÓÃASP+SQL,¿¼Âǵ½ÒÔºóÊý¾Ý²éѯЧÂÊÎÊÌâ,ËùÒÔÔÚÍøÉÏÕÒÁËÒ»¸ö AspÊý¾Ý²Ù×÷×é¼þ(°ÙÍò¼¶·ÖÒ³) , ......