ASP如何读取csv文件

<%
SET Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};Dbq="&Server.mappath("./")&";Extensions=csv;Persist Security Info=False"

SET rs = server.CreateObject("ADODB.RecordSet")
rs.Open "Select * From 2004direction.csv", Conn

Do While Not(rs.Eof)
If (INSTR(rs(1), "上海") > 0 ) Then
Response.Write(rs(1) & "<br>")
End If
rs.MoveNext
Loop

rs.Close
%>
个人用ASP读取过Excel没读取过csv文件，以上代码为网上的一篇读取Csv文件的代码。
从代码分析mappath指向的应该是存有csv文件的目录地址，用sql语句查询文件名的方法打开当前目录下的csv文件。