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

ASPµ¼³öExcelÊý¾ÝµÄËÄÖÖ·½·¨

Ò»¡¢Ê¹ÓÃOWC
¡¡¡¡Ê²Ã´ÊÇOWC£¿
¡¡¡¡OWCÊÇOffice Web CompentµÄËõд£¬¼´MicrosoftµÄOffice Web×é¼þ£¬ËüΪÔÚWebÖлæÖÆÍ¼ÐÎÌṩÁËÁé»îµÄͬʱҲÊÇ×î»ù±¾µÄ»úÖÆ¡£ÔÚÒ»¸öintranet»·¾³ÖУ¬Èç¹û¿ÉÒÔ¼ÙÉè¿Í»§»úÉÏ´æÔÚÌØ¶¨µÄä¯ÀÀÆ÷ºÍһЩ¹¦ÄÜÇ¿´óµÄÈí¼þ£¨ÈçIE5ºÍOffice 2000£©£¬ÄÇô¾ÍÓÐÄÜÁ¦ÀûÓÃOffice Web×é¼þÌṩһ¸ö½»»¥Ê½Í¼Ðοª·¢»·¾³¡£ÕâÖÖģʽÏ£¬¿Í»§¶Ë¹¤×÷Õ¾½«ÔÚÕû¸öÈÎÎñÖзֵ£ºÜ´óµÄ±ÈÖØ¡£
£¼%Option Explicit
Class ExcelGen
Private objSpreadsheet
Private iColOffset
Private iRowOffset
Sub Class_Initialize()
Set objSpreadsheet = Server.CreateObject("OWC.Spreadsheet")
iRowOffset = 2
iColOffset = 2
End Sub
Sub Class_Terminate()
Set objSpreadsheet = Nothing 'Clean up
End Sub
Public Property Let ColumnOffset(iColOff)
If iColOff £¾ 0 then
iColOffset = iColOff
Else
iColOffset = 2
End If
End Property
Public Property Let RowOffset(iRowOff)
If iRowOff £¾ 0 then
iRowOffset = iRowOff
Else
iRowOffset = 2
End If
End Property Sub GenerateWorksheet(objRS)
'Populates the Excel worksheet based on a Recordset's contents
'Start by displaying the titles
If objRS.EOF then Exit Sub
Dim objField, iCol, iRow
iCol = iColOffset
iRow = iRowOffset
For Each objField in objRS.Fields
objSpreadsheet.Cells(iRow, iCol).Value = objField.Name
objSpreadsheet.Columns(iCol).AutoFitColumns
'ÉèÖÃExcel±íÀïµÄ×ÖÌå
objSpreadsheet.Cells(iRow, iCol).Font.Bold = True
objSpreadsheet.Cells(iRow, iCol).Font.Italic = False
objSpreadsheet.Cells(iRow, iCol).Font.Size = 10
objSpreadsheet.Cells(iRow, iCol).Halignment = 2 '¾ÓÖÐ
iCol = iCol + 1
Next 'objField
'Display all of the data
Do While Not objRS.EOF
iRow = iRow + 1
iCol = iColOffset
For Each objField in objRS.Fields
If IsNull(objField.Value) then
objSpreadsheet.Cells(iRow, iCol).Value = ""
Else
objSpreadsheet.Cells(iRow, iCol).Value = objField.Value
objSpreadsheet.Columns(iCol).AutoFitColumns
objSpreadsheet.Cells(iRow, iCol).Font.Bold = False
objSpreadsheet.Cells(iRow, iCol).Font.Italic = F


Ïà¹ØÎĵµ£º

ÍøÕ¾Éè¼ÆÖÐJSPÓëASPµÄ±È½Ï

×ܵÄÀ´½²£¬JavaSever PagesTM£¨JSP£©ºÍ ΢ÈíµÄActive Sever Pages£¨ASP£©ÔÚ¼¼Êõ·½ÃæÓÐÐí¶àÏàËÆÖ®´¦¡£Á½Õß¶¼ÊÇΪ»ùÓÚWEBÓ¦ÓÃʵÏÖ¶¯Ì¬½»»¥ÍøÒ³ÖÆ×÷ÌṩµÄ¼¼Êõ»·¾³Ö§³Ö¡£Í¬µÈ³Ì¶ÈÉÏÀ´½²£¬Á½Õß¶¼Äܹ»Îª³ÌÐò¿ª·¢ÈËÔ±ÌṩʵÏÖÓ¦ÓóÌÐòµÄ±àÖÆÓë×Ô´ø×é¼þÉè¼ÆÍøÒ³´ÓÂß¼­ÉÏ·ÖÀëµÄ¼¼Êõ¡£¶øÇÒÁ½Õß¶¼Äܹ»Ìæ´úCGIÊ¹ÍøÕ¾½¨ÉèÓë·¢Õ¹±äµÄ½ÏΪ ......

ASP.NET ÈçºÎ£ºÊ¹Óà ASP.NET Login ¿Ø¼þµÄ¸ß¼¶¹¦ÄÜ

 
      Login ¿Ø¼þÊÇÒ»ÖÖ¸´ºÏ¿Ø¼þ£¬ÌṩÁ˵Ǽ´°ÌåµÄËùÓг£ÓÃÓû§½çÃæ (UI) ÔªËØ¡£¸Ã¿Ø¼þ±»Ä£¿é»¯£¬¿É·Ö±ð×Ô¶¨Òåÿ¸ö²¿¼þ¡£ÕâЩ²¿¼þ°üÀ¨“Óû§Ãû”ºÍ“ÃÜÂë”Îı¾¿ò¡¢“Ìá½»”°´Å¥¡¢ÓÃÓÚ´´½¨ÐÂÓû§µÄ°´Å¥¡¢“¼ÇסÎÒ”¸´Ñ¡¿òºÍÓû§µÄ°ïÖúÐÅÏ¢¡£Äú¿ ......

¶¯Ì¬ÍøÕ¾Web¿ª·¢PHP¡¢ASP»¹ÊÇASP.NET

¡¡¡¡ÕâÊÇÒ»¸ö¾­³£±»Ìá³öµÄÎÊÌ⣬²¢ÇÒËüºÜÈÝÒ×°ÑÈËÃÇ´øÈëÕùÂÛLinux»¹ÊÇWindowsµÄÆç;¡£ÕâÑùµÄÕùÂÛÊÂʵÉÏ·´Ó³³öÁ˶ÔÓÚÏ໥¾ºÕùµÄWeb¿ª·¢¼¼ÊõÒª½øÐв¢ÐзÖÎöÊǶàôÀ§ÄѵÄÒ»¼þÊÂÇ飬¶øÕâÒ»ÄѶÈͬʱÒòΪ¿ª·¢ÈËÔ±¶ÔÈκοɱȽϲÙ×÷ϵͳµÄ²»Í¬Òâ¼û¶ø´ó´óÔö¼Ó¡£
¡¡¡¡ËùÒÔÓëÆä¼ÌÐø²ÎÓëµ½ÕâÑùµÄÕùÂÛÖУ¬ÎÒÃÇ»¹²»ÈçÀ´¿´¿´Ã¿Ò»Ïî¼¼Êõ¶Ô ......

aspµÄ19¸ö»ù±¾¼¼ÇÉ

1. ÏÖÔÚµÄÈÕÆÚʱ¼äÃüÁîÊÇ <%=now%> ¼´¿É
2.ASPÈ¡µÃ±í¸ñ(from)Êý¾ÝÊäÈëµÄ·½·¨£¬ÊÇʹÓÃÒ»¸öÄÚÖõĶÔÏó(object)—Requect, ËüÒÔget,post¶øÒì¡£
3.ÈôÒª×Ô¼ºÓÃVB»òÆäËüÓïÑÔ±àд£¬.dllÎļþ¹©ASPʹÓÃÐ轫DLLÎļþ×¢²á·½¿É£ºDOSÏÂÊäÈë regsbr32 *.dll
4.ÏÔʾÎå¸öÖØ¸´µÄ¾ä×Ó£¬×ÖÌåÔ½À´Ô½´ó <% for i=1 to 5 %> &l ......

ASP excelµ¼³ö/µ¼ÈëAccessÊý¾Ý¿â(´úÂë+ʵÀýÏÂÔØ)

Excelµ¼³öº¯Êý
<%
Sub   ExportToExcel    
Response.ContentType   =   "application/vnd.ms-Excel"  
Response.AddHeader   "Content-Disposition",   "attachment;Filename=Results.xls"  
Response.Write  ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ