最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
文本数据库操作
时间：2022-06-30 10:30:26 编辑：袖梨 来源：一聚教程网
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 ""
"
%>
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 "
| 编号 | 用户名 | 密码 | 金钱 |
| " & oRs(0) & " | " & oRs(1) & " | " & oRs(2) & " | " & oRs(3) & " |
%>
相关文章
- 最后纪元兑换码是什么 最后纪元最新2025兑换码一览 09-30
- 双点博物馆兑换码分享 双点博物馆最新兑换码2025 09-30
- 消逝的光芒兑换码是什么 消逝的光芒最新2025兑换码大全 09-30
- 边境开拓者兑换码分享 边境开拓者最新2025兑换码一览 09-30
- 燕云十六声活人医馆二楼怎么开锁-活人医馆二楼进入方法 09-30
- 信长之野望新生兑换码是什么 信长之野望最新2025兑换码大全 09-30