CSV(逗号分隔值文件有时也被称为平面文件)本质上为了每个意见文本文件在表格值和独特的行是有逗号分隔符的。而这通常是通过将数据从一个数据库传送到另一个由它本身可被用作输入到一个asp文件的装置。下面的例子将几乎所有的CSV文件包含在内,并写入到一个HTML表格。
<title>TTASP.NET(CSV to HTML)</title>
<body bgcolor="#FFFFFF">
<%
csv_to_read="states.csv"
set fso = createobject("scripting.filesystemobject")
set act = fso.opentextfile(server.mappath(csv_to_read))
imported_text = act.readline
读取csv的首行,理论上说这些是列标题
imported_text = replace(imported_text,chr(13),",")
改变破坏划定出的逗号行
imported_text = replace(imported_text,chr(34),"")
删除所有的引用(如果你的csv有除了独立的文本引用,你可能需要删除这个修改器导入的文本)
split_text=split(imported_text,",")
通过逗号分隔顶端行
num_imported=ubound(split_text)+1
计算分隔数目和为了最后的要素而添加一个
total_imported_text = act.readall
读取余下的csv
total_imported_text = replace(total_imported_text,chr(13),",")
改变破坏逗号分隔符的行
total_imported_text = replace(total_imported_text,chr(34),"")
删除所有的引用(如果你的csv有除了独立的文本的引用,你可能需要删除这个修改器导入的文本)
total_split_text=split(total_imported_text,",")
通过逗号分隔文件
total_num_imported=ubound(total_split_text)
计算分割数
'This will be the numer of cells in the table
%>
<table width="100%">
<tr>
<%
for table = 0 to num_imported -1
这为了每个csv的列表创建表格元件
' (-1 is used because arrays begin with 0)
%>
<td width="<% response.write 100/(num_imported) 'make the cell widths even %>%">
<b><%= split_text(count) %></b>
</td>
<%
count=count+1
next
%>
</tr>
<tr>
<%
重新设置计数器
count=0
这会决定在csv的排列
for tablea = 0 to (total_num_imported/ (num_imported)-1)
%>
<%
for table = 0 to num_imported -1
这会创建csv的每个表格元件
' (-1 is used because arrays begin with 0)
%><td width="<%= 100/(num_imported) %>%">
<%= total_split_text(count)
%>
</td>
<%
count=count+1
next ' end of the observation
%></tr>
<% next 'end of the csv %>
<title>TTASP.NET(CSV to HTML)</title>
<body bgcolor="#FFFFFF">
<%
csv_to_read="states.csv"
set fso = createobject("scripting.filesystemobject")
set act = fso.opentextfile(server.mappath(csv_to_read))
imported_text = act.readline
读取csv的首行,理论上说这些是列标题
imported_text = replace(imported_text,chr(13),",")
改变破坏划定出的逗号行
imported_text = replace(imported_text,chr(34),"")
删除所有的引用(如果你的csv有除了独立的文本引用,你可能需要删除这个修改器导入的文本)
split_text=split(imported_text,",")
通过逗号分隔顶端行
num_imported=ubound(split_text)+1
计算分隔数目和为了最后的要素而添加一个
total_imported_text = act.readall
读取余下的csv
total_imported_text = replace(total_imported_text,chr(13),",")
改变破坏逗号分隔符的行
total_imported_text = replace(total_imported_text,chr(34),"")
删除所有的引用(如果你的csv有除了独立的文本的引用,你可能需要删除这个修改器导入的文本)
total_split_text=split(total_imported_text,",")
通过逗号分隔文件
total_num_imported=ubound(total_split_text)
计算分割数
'This will be the numer of cells in the table
%>
<table width="100%">
<tr>
<%
for table = 0 to num_imported -1
这为了每个csv的列表创建表格元件
' (-1 is used because arrays begin with 0)
%>
<td width="<% response.write 100/(num_imported) 'make the cell widths even %>%">
<b><%= split_text(count) %></b>
</td>
<%
count=count+1
next
%>
</tr>
<tr>
<%
重新设置计数器
count=0
这会决定在csv的排列
for tablea = 0 to (total_num_imported/ (num_imported)-1)
%>
<%
for table = 0 to num_imported -1
这会创建csv的每个表格元件
' (-1 is used because arrays begin with 0)
%><td width="<%= 100/(num_imported) %>%">
<%= total_split_text(count)
%>
</td>
<%
count=count+1
next ' end of the observation
%></tr>
<% next 'end of the csv %>
</table>
人生最精彩的不是实现梦想的瞬间,而是坚持梦想的过程。 胜利不是战胜敌人,而是提高自己。我们只要每天进步百分之一,那就是成功。您如果觉得此分享对你有用,那将是我们天天ASP家园对你成功路上的一点帮助!