IDC资讯中心
1。数据库文件“test.txt”，内容如下：
1,"1,2,3,4","111",
2,"4,3,5","111111",
3,"1,2","22222222",
4,"1","2",
30,"f rom","admin",
31,"f rom","admin",
32,"f rom","admin",
33,"f rom","admin",
34,"fr om","admin",
37,"askf","aslkjf",123
35,"fro m","admin",
36,"f r om","admin",
2。测试文件“test.asp”，与“test.txt”文件在同一目录
<%
dim ors
dim oconn
set oconn = server.createobject("adodb.connection")
oconn.open "driver={microsoft text driver (*.txt; *.csv)};dbq=" & server.mappath("/") & ";extensions=asc,csv,tab,txt;"
sql = "select * from test.txt"
set ors = server.createobject("adodb.recordset")
ors.open sql, oconn, 1, 1
response.write "<table border=1 width=400>"
response.write "<tr><td>编号</td><td>用户名</td><td>密码</td><td>金钱</td></tr>"
do while not ors.eof
response.write "<tr><td>" & ors(0) & " </td><td>" & ors(1) & " </td><td>" & ors(2) & " </td><td>" & ors(3) & " </td></tr>"
ors.movenext
loop
response.write "</table>"
%>
