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 = False
objSp
相关文档：
<%
'==================================================
'函数名：GetHttpPage
'作 用：获取网页源码
'参 数：HttpUrl ------网页地址
'==================================================
Function GetHttpPage(HttpUrl)
If IsNull(HttpUrl)=True or Len(HttpUrl)<18 or HttpUrl="$False$" Then
GetHttp ......
相信我的,只有我才真正地找过答案,其它都是乱抄的,实能解决到你的问题,前个月我还在苦找答案,也已试验过N次,最后成功了,网上也有改那个什么帐户的,那个实在太难了.
按我的方法,前提是一,系统是XP,其它系统不敢包.二,你没有做过其它设置.
主要是帐户权限问题.
打开“管理工具”->“组件服务”- ......
这类问题通常在整合或二次开发ASP网站时遇到。按常理来说，浏览器的Cookie存放在客户端，实际上与服务端使用什么语言无关，但我们在实际操作过程中，总会遇到一些意想不到的问题。
1. 当ASP写的Cookie的Key中带有下划线，例如我们在ASP中这样设置Cookie:
......
asp Http_Referer,Server_Name和Http_Host
以前感觉Request.ServerVariables里的值很多，现在看看还是那么多，不过今天谈其中的一个值----HTTP_Referer以及Request.ServerVariables里Server_Name与Http_Host之间有什么区别呢？
刚才运行了一段代码，来查看Request.ServerVariables里面有多少值，看了一下，共50个！
代� ......
以下为引用的内容：
<!--这是一个主页文件-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>幻灯片新闻</title>
</head>
<body>
<!--#Include file="diaoyong.asp"-->
</body>
</html>
& ......
