asp读取Excel文件
1.ASP对Excel的基本操作
(1) 建立Excel对象
创建Excel对象可以通过下面的代码来实现:
<%
set objExcelApp = CreateObject("Excel.Application")
objExcelApp.DisplayAlerts = false ’不显示警告
objExcelApp.Application = false ’不显示界面
%>
(2) 新建Excel文件
新建Excel文件可以通过以下代码来实现:
<%
objExcelApp.WorkBooks.add
set objExcelBook = objExcelApp.ActiveWorkBook
set objExcelSheets = objExcelBook.Worksheets
set objExcelSheet = objExcelBook.Sheets(1)
%>
(3) 读取已有的Excel文件
读取已有的Excel文件可以通过下面的代码来实现
<%
strAddr = Server.MapPath(".")
objExcelApp.WorkBooks.Open(strAddr & "TempletTable.xls")
set objExcelBook = objExcelApp.ActiveWorkBook
set objExcelSheets = objExcelBook.Worksheets
set objExcelSheet = objExcelBook.WorkSheets(1)
%>
(4) 另存Excel文件
另存Excel文件可以通过以下代码来实现
<%
objExcelBook.SaveAs strAddr & "templateTables.xls"
%>
(5) 保存Excel文件
保存Excel文件可以通过以下代码来实现:
<%
objExcelBook.Save
%>
(6) 退出Excel操作
<%
objExcelApp.Quit ’一定要退出
set objExcelApp = nothing
%>
2 读取Excel文件的实例
<%
set xlApp = server.CreateObject("Excel.Application")
strsource = server.MapPath("xl.xls")
set xlbook = xlApp.WorkBooks.Open(strsource)
set xlsheet = xlbook.Worksheets(1)
i = 1
response.write "<table>"
while xlsheet.cells(i,1) <> ""
response.write "<tr>"
response.write "<td>" & xlsheet.Cells(i,1) & "</td>"
response.write "<td>" & xlsheet.Cells(i,2) & "</td>"
response.write "<td>" & xlsheet.Cells(i,3) & "</td>"
response.write "<tr>"
i = i + 1
wend
response.write "</table>"
set xlsheet = nothing
set xlbook = nothing
xlApp.quit
‘千万记住要加这一句,否则每运行一次你的机器里就增加一个Excel进程,而且无法释放
’set xlApp = not
相关文档:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
if Request("MailtoAddress") <> "" then
msg = SendMail
(Request("SMTPServer"),Request("SMTPServerUserName"),Request("SMTPServerPassword"),
Request("MailDom ......
一、 环境设置
服务器端的环境设置从参考数据上看,微软系列的设置应该都行,即:
1.Win9x+PWS+Office
2.Win2000 Professional+PWS+Office
3.Win2000 Server+IIS+Office
目前笔者测试成功的环境是后二者。Office的版本没有特别需求,考虑到客户机设置的不确定性和下兼容特性,建议服务器端Of ......
<%
'┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓
'┃ ┃
'┃ 摘 要: 统计图--曲线图 &n ......
ASP实现同一虚拟主机空间安放多个网站的方法
现在的域名很便宜,不少朋友手里多少都有几个,如果您想用手中的几个域名做多个网站的话,并不用同时购买多个虚拟主机,您只要先将您所有的域名绑定到您的虚拟主机上,然后将虚拟主机根目录中的index.asp(首页文件)里加入下列代码就可以了:
<%
sn=lcase(Request.Se ......
环境:数据库 oracle 64bit 系统 win2008 64bit IIS7 在asp 网页中使用ado连接数据库 ODBC用的是Microsft ODBC for oracle
情况:在网页的查询语句中不含中文的可以,只要语句中含有中文就会返回错误结果。
如:select '一二三' from dual;这样的语句 返回回来就是???
还要说明的是oracle的字符集是AMERICAN_AMERICA.U ......