 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<% Set Xlapp=Server.Createobject("Execel.Application") Xlapp.Visible=false \\\'使服务端不出现Execel窗口 Set myWorkbook=xlapp.Wordbooks.Add Set myWorksheet=myWorkbook.Worksheets(1) \\\'建立一个WorkSheet myWorkSheet.Range("A1").Value=\\\'\\\' myWorkSheet.Range("A1").Vont.size=18 myWorkSheet.Range("A1").Font.Bold=True myWorkSheet.Range("A2").Value=\\\'姓名\\\' myWorkSheet.Range("B2").Value=\\\'住址\\\' myWorkSheet.Range("C2").Value=\\\'电话\\\' myWorkSheet.Range("D2").Value=\\\'传真\\\' \\\'建立表头 myWorkSheet.Range("A2:D2").Font.Bold=True StrFileName=Session.SessionID&".xls" \\\'确保文件名唯一 strAppPath=Request.ServerVariables("PATH_TRANSLATED") strAppPath=Left(strAppPth,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讲座之十一：结束语??给您一些建议 下一教程: 连接数据库的ASP树图生成程序 您可以阅读与"EXECEL文件插入到ASP页面"相关的教程: · 用XML2OLEDB将XML文件插入到数据库 · 在ASP页面中插入EXCEL文件 · 将一个ASP页面执行过的生成HTML代码保存为HTML文件 · 加密你的ASP页面-SCRIPT ENCODER初探 · 在不刷新页面的情况下调用远程ASP脚本 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
