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
Ïà¹ØÎĵµ£º
1¡¢·Ö±ð°²×°Èý¸ö»·¾³£¬²¢ÉèÖò»Í¬¶Ë¿Ú
PHP:80
JSP:8080
ASP:8081
2¡¢ÉèÖÃ/Apache2/conf/httpd.conf
È¥µôÒÔÏÂÈýÐÐǰµÄ×¢ÊÍ£º
LoadModule proxy_module modules/mod_proxy.so
LoadModule proxy_connect_module modules/mod_proxy_connect.so
LoadModule proxy_http_module modules/mod_proxy_http.so
¼ÓÈëÒÔϼ¸ÐУº ......
ΪÁËʹÓû§Äܹ»µÇ¼ʹÓà ASP.NET ³ÉÔ±×ʸñ£¨Forms Éí·ÝÑéÖ¤£©½øÐÐÓû§Éí·ÝÑéÖ¤µÄ ASP.NET Ó¦ÓóÌÐò£¬¿ÉÒÔʹÓà LoginStatus ¿Ø¼þ¡£LoginStatus ¿Ø¼þ¼ì²âÓû§µÄÉí·ÝÑé֤״̬¡£Èç¹ûÓû§Î´¾¹ýÉí·ÝÑéÖ¤£¬¸Ã¿Ø¼þ½«ÏÔʾһ¸ö°´Å¥£¬Òýµ¼Óû§½øÈëÓ¦ÓóÌÐòµÄµÇ¼ҳ¡£Èç¹ûÓû§ÒѾ¹ýÉí·ÝÑéÖ¤£¬LoginStatus ¿Ø¼þ½«ÏÔʾһ¸ö°´Å¥£¬Óû§¿ ......
¿ÉÒÔʹÓà ASP.NET Login ¿Ø¼þ´´½¨µÇ¼ҳ¡£´Ë¿Ø¼þÌáÈ¡Óû§ÃûºÍÃÜÂ룬²¢Ê¹Óà ASP.NET ³ÉÔ±×ʸñºÍ Forms Éí·ÝÑéÖ¤À´ÑéÖ¤Óû§µÄƾ¾Ý²¢´´½¨Éí·ÝÑé֤Ʊ֤¡£
1¡¢´´½¨Ò»¸öʹÓà ASP.NET ³ÉÔ±×ʸñµÄ ASP.NET Web Ó¦ÓóÌÐò¡£ÓйØÏêϸÐÅÏ¢ºÍʾÀý£¬Çë²Î¼ûÅäÖà ASP.NET Ó¦ÓóÌÐòÒÔʹÓóÉÔ±×ʸñ ......
ÊÇOfficeµÄOWC°æ±¾ÎÊÌâ¡£2000£¬2002XP£¬2003¸÷²»Ïàͬ£¬¼ÓÈëOfficeµÄ°æ±¾¼ì²é¼´¿É£¬ÍêÕû´úÂëÈçÏ£º
<script language="javascript">
function exportExcel(atblData,dirPath)
{
//alert(dirPath);
if (typeof(atblData)=="undefined"||typeof(atblData)=="unknow")
{
& ......