|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
无法实现跨操作系统的应用。当然这也是微软的理由之一,只有这样才能发挥ASP最佳的能力。可是我却认为正是Windows限制了ASP,ASP的概念本就是为一个能让系统运行于一个大的多样化环境而设计的;excel|拔出|程序|页面<%
setxlApp=Server.CreateObject("Excel.Application")
使服务端不呈现Excel窗口
xlApp.Visible=false
创建一个worksheet
setmyWorkbook=xlApp.Workbooks.Add
setmyWorksheet=myWorkbook.Worksheets(1)
创建表头
myWorksheet.Range("A1").Value=德律风薄
myWorksheet.Range("A1").Font.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(strAppPath,InstrRev(strAppPath,""))
strFullPath=strAppPath&strFileName
保留文件
myWorkbook.SaveAs(strFullPath)
封闭Excel
myWorkbook.Close
xlApp.Quit
setmyWorksheet=Nothing
setmyWorkbook=Nothing
setmyxlApp=Nothing
写出到扫瞄器中
Response.RedirectstrFileName
%>国内有些大的CRM厂商的ASP就写得不错.无论是概念还是它里面用JAVASCRIPT的能力.并不是说现在的程序员用了ASP.NET来写程序就可以说自己高档了 |
|