当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp实现在web中显示电子表格数据(四)创建文件选择列表

ASP
ASP+XML实例演练编程代码
asp下利用XMLHTTP 从其他页面获取数据的代码
asp下实现IP限制函数代码
asp下IP地址分段计算函数
asp身份证验证代码函数
用Asp隐藏文件路径,实现防盗链 的代码
ASP生成柱型体,折线图,饼图源代码提供了
用asp实现网址和邮件地址的转换函数
asp下最简洁的多重查询的解决方案
asp下用datediff实现计算两个时间差的函数
asp下实现记录集内随机取记录的代码
asp下轻松实现将上传图片到数据库的代码
[原创]站长感慨asp编程究竟何去何从
fso asp生成静态html的代码
ASP版实现cookies注入加速工具
ASP实现网页打开任何类型文件都提示保存的方法附代码
asp下使用数组存放数据的代码
一句话 asp木马加密版 彻底突破杀毒软件
asp清空application的方法
使用asp下的adodb.stream 下载文件而不是打开

ASP 中的 asp实现在web中显示电子表格数据(四)创建文件选择列表


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 112 ::
收藏到网摘: n/a

  最后介绍创建文件选择列表的代码,在这里使用内建的FileSystem对象获得文件和文件夹的信息。

   为简单起见,例程假设电子数据表文件和ASP文件位于同一个目录下。通过vServerFolder= Server.MapPath(".") 获取当前目录名称,并将之转换到folder对象,从而找出目录中的文件。 FileSystem对象的.GetFolder方法使用如下:

Set oFs = Server.CreateObject("Scripting.FileSystemObject")
Set oFolder = oFs.GetFolder(vServerFolder)
   通过Folder对象的.Files集合的列举,可以获取文件夹下的文件,并且限制显示的文件类型为Excel。执行下面的HTML/ASP代码创建文件选择列表:

< select name="XlBook" >
< %
vOptions = ""
For Each oFile In oFolder.Files
    If oFile.Type = "Microsoft Excel Worksheet" Then
vOptions = vOptions & "< option >" & _
            Server.HtmlEncode(oFile.Name) & "< /option >    
    End If
Next    
Response.Write vOptions
% >
< /select >

   同样的,实际的ReadX1.asp代码要复杂些,因为有一些JavaScript脚本要取回上一次的选择。

   总结

   上面介绍了如何通过ADO读取Excel工作簿的方法,以及内建对象FileSystem的使用技巧。除了广泛地应用于数据库领域,ADO能处理许多不同格式的数据,其方式就象处理数据库一样。这里只是接触到ADO的一点基本功能,还有更多更强大的方面有待开发。