|
![]() |
名片设计 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页面"相关的教程: · 在ASP页面中插入EXCEL文件 · 用XML2OLEDB将XML文件插入到数据库 · 将一个ASP页面执行过的生成HTML代码保存为HTML文件 · 使用索引服务器 - 创建ASP页面 · ASP向数据库读写IMAGE文件 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |