点击这里给我发消息 点击这里给我发消息

ASP读取.CSV文件并用表格输出

添加时间:2013-12-6
    相关阅读: ASP 数据库 网站

代码背景,自己做的一个网站访问记录的东西,由于访问量巨少,虚拟空间小,就没用数据库,用的.CSV存储,为了方便每次不用下载下来看文件,就用了这么一个ASP来帮忙读取文件。

.CSV文件的介绍如下:http://baike.baidu.com/view/468993.htm

算法就是先用ASP的代码,打开一个文本文件(CSV)然后用split函数分割一行为数组,再一个一个的输出出来,每一行结束后输出一个表格换行标志

<html><title>读取记录</title>
<body>
<p>CSV记录读取如下:</p>
<p>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.OpenTextFile(Server.MapPath("record.csv"), 1)  '打开文本文件

Response.Write("<table border=""1"">")  '建立表格
do while f.AtEndOfStream = false
str=f.ReadLine
splitstr=split(str,",")  '分割一行的字符串
Response.Write("<tr>")   '建立表格行

for i =0 to ubound(splitstr)
response.Write("<td>")   '建立表格列
Response.Write splitstr(i)
response.Write("</td>")
next

Response.Write("</tr>")
loop
Response.Write("</table>")

f.Close
Set f=Nothing
Set fs=Nothing
%> 
</p>
</body>
</html>

咨询热线:020-85648757 85648755 85648616 0755-27912581 客服:020-85648756 0755-27912581 业务传真:020-32579052
广州市网景网络科技有限公司 Copyright◎2003-2008 Veelink.com. All Rights Reserved.
广州商务地址:广东省广州市黄埔大道中203号(海景园区)海景花园C栋501室
= 深圳商务地址:深圳市宝源路华丰宝源大厦606
研发中心:广东广州市天河软件园海景园区 粤ICP备05103322号 工商注册