当前位置： 移动技术网 > IT编程>开发语言>其他编程 > 如何把一个Excel文件放到ASP页面中去？

如何把一个Excel文件放到ASP页面中去？

2017年12月01日  | 移动技术网IT编程  | 我要评论

<%
set xlapp = server.createobject("excel.application")
xlapp.visible = false

' 使服务端不出现excel窗口.
set myworkbook = xlapp.workbooks.add

' 建立一个worksheet.
set myworksheet = myworkbook.worksheets(1)
myworksheet.range("a1").value = '精彩春风通讯录'
myworksheet.range("a1").font.size = 12
myworksheet.range("a1").font.bold = true
myworksheet.range("a2").value = '姓名'
myworksheet.range("b2").value = '地址'
myworksheet.range("c2").value = '电话'
myworksheet.range("d2").value = '手机'

' 以上7行建立表头.
myworksheet.range("a2:d2").font.bold = true
strfilename = session.sessionid & ".xls"

' 确保文件名唯一.
strapppath = request.servervariables("path_translated")
strapppath = left(strapppath, instrrev(strapppath, "\"))
strfullpath = strapppath & strfilename
myworkbook.saveas(strfullpath)

' 保存文件.
myworkbook.close

' 关闭excel.
xlapp.quit
set myworksheet = nothing
set myworkbook = nothing
set myxlapp = nothing
response.redirect strfilename

' 写到asp页面,即浏览器中.
%>

[1]

您可能感兴趣的文章:

如对本文有疑问， 点击进行留言回复！！

相关文章:

验证码：
最近更新的文章
大家感兴趣的文章
移动技术网