asp-classic – 如何在VBScript中逐行读取CSV文件

我正在使用一个ASP页面,我必须读取一个CSV文件并将其插入DB表“员工”.我正在创建一个TestReader的对象.如何编写循环来执行正在读取的CSV文件的行数/记录数？

解决方法

不要试图自己解析文件,你只会让自己头疼.还有更多的是分割换行符和逗号.

您可以使用OLEDB在记录集中打开文件,并像数据库表一样读取它.这样的事情

Dim strConn,conn,rs

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
Server.MapPath("path to folder") & ";Extended Properties='text;HDR=Yes;FMT-Delimited';"

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open strConn

Set rs = Server.CreateObject("ADODB.recordset")
rs.open "SELECT * FROM myfile.csv",conn

while not rs.eof
    ...
    rs.movenext
wend

我的vbscript是生锈的,所以验证语法.

编辑：harpo的评论提出了关于字段定义的一个好点.定义schema.ini文件允许您定义预期字段的数量和数据类型.请参阅：您可以通过定义schema.ini文件来处理此问题.见：http://msdn.microsoft.com/en-us/library/ms709353.aspx