Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

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
  


Ïà¹ØÎĵµ£º

ͨÓÃÐ޸ĺÍÔö¼Óº¯Êý¡¾ASP¡¿

    Ò»°ãÀ´Ëµ±àÊý¾Ý¿âÀàµÄ³ÌÐòÖ÷ÒªÒª½â¾öµÄÎÊÌâÎÞ·ÇÊÇÌí¼Ó£¬É¾³ý£¬Ð޸ĺͲéѯ¡£ÕâÀà±à³Ì¶¼·Ç³£µÄ¼òµ¥¡£½ÓÏÂÀ´ÎÒÀûÓÃÒ»µã¿ÕÓàʱ¼ä·¢Ò»¸öº¯ÊýÀïÃæ°üº¬ºÍÌí¼ÓºÍɾ³ý¹¦ÄÜ¡£ÊµÑéµÄ¼Ü¹¹¿ÉÒÔʹÓÃIIS.5WEB·þÎñÆ÷ACCESSÊý¾Ý¿â¡£Õâ¸öÎÒÆäʵ²»ÓÃ˵µÄºÜÏêϸÁË£¬ÒòΪ´ó¼Ò¶¼Ó¦¸ÃÖªµÀµÄ¡£ÎÒ¾ÍÖ±½Ó°Ñº¯ÊýÌù³öÀ´¡£´ó¼ÒÖ»ÒªÉÔÎ ......

²É¼¯³ÌÐò¡¾ASP¡¿

²É¼¯³ÌÐò
Ô­Àí
²É¼¯³ÌÐòʵ¼ÊÉÏÊÇͨ¹ýÁËXMLÖеÄXMLHTTP×é¼þµ÷ÓÃÆäËüÍøÕ¾ÉϵÄÍøÒ³¡£±ÈÈçÐÂÎŲɼ¯³ÌÐò£¬ºÜ¶à¶¼Êǵ÷ÓÃÁËsinaµÄÐÂÎÅÍøÒ³£¬²¢ÇÒ¶ÔÆäÖеÄhtml½øÐÐÁËÒ»Ð©Ìæ»»£¬Í¬Ê±¶Ô¹ã¸æÒ²½øÐÐÁ˹ýÂË¡£Óòɼ¯³ÌÐòµÄÓŵãÓУºÎÞÐëά»¤ÍøÕ¾£¬ÒòΪ²É¼¯³ÌÐòÖеÄÊý¾ÝÀ´×ÔÆäËûÍøÕ¾£¬Ëü½«Ëæ×ŸÃÍøÕ¾µÄ¸üжø¸üУ»¿ÉÒÔ½ÚÊ¡·þÎñÆ÷×ÊÔ´£¬Ò» ......

aspÁ¬½ÓMssqlµÄ·½·¨¼°³£¼ûµÄ´íÎó

aspÏνÓMssqlµÄ°ì·¨¼°³£¼ûµÄ²î´í
//µÚÒ»ÖÖд·¨£º
MM_conn_STRING = "Driver={SQL Server};server=(local);uid=sa;pwd=;database=infs;"
Set conn = Server.Createobject("ADODB.Connection")
conn.open MM_conn_STRING
SET RS=SERVER.CreateObject("ADOBD.recordset")
SQL="SELECT * from TABLE ORDER BY ID DESC"
R ......

ÔÚ Linux ÏÂÔËÐÐ ASP.NET 2.0

µ¥Î»ÓÐһ̨ÏÐÖÃµÄ¾É IBM Netfinity 7000 µÄ·þÎñÆ÷£¬Ë« Pentium Pro 200 MHz CPU£¬512 MB Äڴ棬һ¸ö 9.1 GB ºÍÎå¸ö 4.5 GB µÄ SCSI Ó²ÅÌ¡£ÎÒÏ뽫Æä·ÏÎïÀûÓÃһϣ¬ÓÚÊÇ£º
1. µ½ http://tw.releases.ubuntu.com/edgy/ ÏÂÔØ  PC (Intel x86) server install CD £¬½«ÏÂÔØµÃµ½µÄ ubuntu-6.10-server-i386.iso Îļþ¿Ì¼һÕÅ ......

ASP¿ª·¢WEB´òÓ¡´úÂë´óÈ«

¡¡¡¡ÕâÆªÎÄÕÂÖ÷Òª½éÉÜÁËÈçºÎʹÓÃASP¿ØÖÆWebµÄ¸÷ÖÖ´òӡЧ¹û£¬ËüÄܹ»¿ØÖÆ×Ý´ò¡¢ºá´òºÍÒ³Ãæ±ß¾àµÈ¡£
¡¡¡¡
¡¡¡¡1¡¢¿ØÖÆ"×Ý´ò"¡¢ "ºá´ò"ºÍ"Ò³ÃæµÄ±ß¾à"¡£
¡¡¡¡
¡¡¡¡£¨1£©
¡¡¡¡
¡¡¡¡< script defer>
¡¡¡¡function SetPrintSettings() {
¡¡¡¡// -- advanced features
¡¡¡¡factory.printing.SetMarginMeasure(2) ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ