asp execl ¼¼Êõ×ܽá
¡¡Ò»¡¢ »·¾³ÉèÖÃ
¡¡¡¡·þÎñÆ÷¶ËµÄ»·¾³ÉèÖôӲο¼Êý¾ÝÉÏ¿´£¬Î¢ÈíϵÁеÄÉèÖÃÓ¦¸Ã¶¼ÐУ¬¼´£º
¡¡¡¡1£®Win9x+PWS+Office
¡¡¡¡2£®Win2000 Professional+PWS+Office
¡¡¡¡3£®Win2000 Server+IIS+Office
¡¡¡¡Ä¿Ç°±ÊÕß²âÊԳɹ¦µÄ»·¾³ÊǺó¶þÕß¡£OfficeµÄ°æ±¾Ã»ÓÐÌرðÐèÇ󣬿¼Âǵ½¿Í»§»úÉèÖõIJ»È·¶¨ÐÔºÍϼæÈÝÌØÐÔ£¬½¨Òé·þÎñÆ÷¶ËOffice°æ±¾²»ÒªÌ«¸ß£¬ÒÔ·ÀÖ¹¿Í»§»úÏÂÔغóÎÞ·¨ÕýÈ·ÏÔʾ¡£
¡¡¡¡·þÎñÆ÷¶Ë»·¾³ÉèÖøüÓÐÁ½¸öżȻµÄ·¢ÏÖÊÇ£º
¡¡¡¡1£® ±ÊÕßÑз¢»úÆ÷ÉÏÔÀ´×°ÓнðɽµÄWPS2002£¬½á¹ûExcel¶ÔÏó´´½¨Ê¼ÖÕ³öÏÖÎÊÌ⣬жÔØWPS2002ºó£¬´íÎóÏûʧ¡£
¡¡¡¡2£® ±ÊÕßÑз¢ASP´úÂëϲ»¶ÓÃFrontPage£¬½á¹û·¢ÏÖÈç¹ûFrontPage´ò¿ª£¨·þÎñÆ÷¶Ë£©£¬¶ÔÏó´´½¨³öÏÖ²»Îȶ¨ÏÖÏó£¬Ê±¶ø³É¹¦Ê±¶ø²»³É¹¦¡£À©Õ¹¿¼²ìºó·¢ÏÖ£¬OfficeϵÁеÄÈí¼þÈç¹ûÔÚ·þÎñÆ÷¶ËÔËÐУ¬ÔòExcel¶ÔÏóµÄ´´½¨·Ç³£Äѳɹ¦¡£
¡¡¡¡·þÎñÆ÷¶Ë»¹±ØÐëÒªÉèÖõÄÒ»µãÊÇCOM×é¼þµÄ²Ù×÷ȨÏÞ¡£ÔÚÃüÁîÐмüÈë“DCOMCNFG”£¬Ôò½øÈëCOM×é¼þÉèÖýӿڣ¬Ñ¡ÔñMicrosoft Excelºóµã»÷ÊôÐÔ°´Å¥£¬½«Èý¸öµ¥Ñ¡ÏîÒ»ÂÉÑ¡Ôñ×Ô¶¨Ò壬±à¼Öн«Everyone¼ÓÈëËùÓÐȨÏÞ¡£±£´æÍê±ÏºóÖØÐÂÆô¶¯·þÎñÆ÷¡£
¡¡¡¡¿Í»§¶ËµÄ»·¾³ÉèÖÃû·¢ÏÖʲôÌر𽲾¿µÄµØ·½£¬Ö»Òª×°ÓÐOfficeºÍIE¼´¿É£¬°æ±¾Í¨ÓõĺÃÏó¶¼ÄÜ¡£
¡¡¡¡¶þ¡¢ ASP¶ÔExcelµÄ»ù±¾²Ù×÷
¡¡¡¡1¡¢ ½¨Á¢Excel¶ÔÏó
¡¡¡¡set objExcelApp = CreateObject("Excel.Application")
¡¡¡¡objExcelApp.DisplayAlerts = false ²»ÏÔʾ¾¯¸æ
¡¡¡¡objExcelApp.Application.Visible = false ²»ÏÔʾ½Ó¿Ú
¡¡¡¡2¡¢ н¨ExcelÎļþ
¡¡¡¡objExcelApp.WorkBooks.add
¡¡¡¡set objExcelBook = objExcelApp.ActiveWorkBook
¡¡¡¡set objExcelSheets = objExcelBook.Worksheets
¡¡¡¡set objExcelSheet = objExcelBook.Sheets(1)
¡¡¡¡3¡¢ ¶ÁÈ¡ÒÑÓÐExcelÎļþ
¡¡¡¡strAddr = Server.MapPath(".")
¡¡¡¡objExcelApp.WorkBooks.Open(strAddr & "£ÜTemplet£ÜTable.xls")
¡¡¡¡set objExcelBook = objExcelApp.ActiveWorkBook
¡¡¡¡set objExcelSheets = objExcelBook.Worksheets
¡¡¡¡set objExcelSheet = objExcelBook.Sheets(1)
¡¡¡¡4¡¢ Áí´æExcelÎļþ
¡¡¡¡objExcelBook.SaveAs strAddr & "£ÜTemp£ÜTable.xls"
¡¡¡¡5¡¢ ±£´æExcel?
¡¡¡¡objExcelBook.Save £¨±ÊÕß²âÊÔʱ±£´æ³É¹¦£¬Ò³Ã汨´í¡££©
¡¡¡¡6¡¢ Í˳öExcel²Ù×÷
¡¡¡¡objExcelApp.Quit Ò»¶¨ÒªÍ˳ö
¡¡¡¡set objExcelApp = Nothing
¡¡¡¡Èý¡¢ ASP²Ù×÷ExcelÉú³
Ïà¹ØÎĵµ£º
<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set fldr = fso.GetFolder("c:\Program Files")
Response.Write "¸¸Îļþ¼ÐÃû×ÖÊÇ£º" & fldr & "<br>"
If fldr.IsRootFolder = True Then
Response.Write "¸ÃÎļþ¼ÐÊÇÒ»¸ùÎļþ¼Ð" & "<br>"
Else
Resp ......
ASP±à³ÌÖÐ20¸ö·Ç³£ÓÐÓõÄÀý×Ó
1.ÈçºÎÓÃAspÅжÏÄãµÄÍøÕ¾µÄÐéÄâÎïÀí·¾¶
´ð£ºÊ¹ÓÃMappath·½·¨
<%= Server.MapPath("\")%>
2.ÎÒÈçºÎÖªµÀʹÓÃÕßËùÓõÄä¯ÀÀÆ÷£¿
´ð£ºÊ¹ÓÃthe Request object·½·¨
strBrowser=Request.ServerVariables("HTTP_USER_AGENT")
If Instr(strBrowser,"MSIE") & ......
<style type="text/css">
.container, .container *{margin:0; padding:0;}
.container{width:325px; height:287px; overflow:hidden;position:relative; margin-left:5px; margin-top:6px;}
.slider{position:absolute;}
.slider li{ list-style:none;display:inline;}
.slider img{ width:325px; height:287p ......
http://www.w3school.com.cn/asp/met_mappath.asp
¶¨ÒåºÍÓ÷¨
MapPath ·½·¨¿É°ÑÖ¸¶¨µÄ·¾¶Ó°Éäµ½·þÎñÆ÷ÉÏÏàÓ¦µÄÎïÀí·¾¶ÉÏ¡£
×¢ÊÍ£º´Ë·½·¨²»ÄÜÓÃÓÚ Session.OnEnd ºÍ Application.OnEnd ÖС£
ʵÀý
ʵÀý 1
¾ÙÀý£¬Îļþ test.asp λÓÚ C:\Inetpub\wwwroot\Script¡£
Îļþ Test.asp (λÓÚ C:\Inetpub\wwwroot\Script) °üº ......