【ASP】OLEDB方式连接各类数据库（sql，access，excel，txt）

喜欢ヅ旅行 2022-08-18 08:24 220阅读 0赞

<%
    '===============OLEDB方式连接access数据库
    Set conn=server.CreateObject("adodb.connection")
    conn.provider="Microsoft.ace.oledb.12.0"
    conn.open server.mappath("english.mdb")
    
    Set rs=server.createobject("adodb.recordset")
    rs.open "select * from sentence",conn,1,1
    Response.Write(rs.recordcount)
    
    Response.end
    '==============安装sql2008时需要创建默认实例，否则无法正常使用oledb连接
    '===============命令行登陆本地服务器 osql -Slocalhost -Usa -P111
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.provider="sqloledb"
    conn.open "server=192.168.1.100; uid=sa; pwd=123;Database=english"
    
    Response.End
    '============DSN连接sql，设置odbc数据源--系统dsn
    Set conn=server.createobject("adodb.connection")
    conn.open "dsn=english"
    
    Response.end
    
    '===============OLEDB方式连接excel数据库==========(中文名注意编码codepage）
    Set conn=server.CreateObject("adodb.connection")
    conn.provider="Microsoft.ace.oledb.12.0;Extended Properties=excel 12.0"
    conn.open server.mappath("/db/gaoxiao.xls")
    Set rs=server.createobject("adodb.recordset")
    rs.open "select * from [普通高校代码$]",conn,1,1
    Response.Write(rs.recordcount)
    for i=0 To rs.fields.count-1
    Response.Write(rs(i)&"<br>")
    next
    
    
    
    Response.end
    
    '===============OLEDB方式连接text文本文件（.txt/.csv/.log)==========(中文名注意编码codepage）
    '======读取txt文件，HDR=yes首行标题，IMEX=2读写;
    '==================FMT格式化分列字符：Delimited逗号、TabDelimited制表符、FixedLength固定宽度、Delimited(x)自定义分隔符”x“==========
    '==========data source：数据库是文本文件所在目录，文本文件作为数据表
    Set conn=server.CreateObject("adodb.connection")
    conn.provider="Microsoft.ace.oledb.12.0;Extended Properties='TEXT;HDR=yes;FMT=Delimited'"
    conn.open server.mappath("/db")
    Set rs=server.createobject("adodb.recordset")
    rs.open "select * from stu.csv ",conn,1,1
    'rs.open "update stu.csv set ",conn,1,1
    Response.Write(rs.recordcount)
    for i=0 To rs.fields.count-1
    Response.Write(rs(i).name&":"&rs(i)&"<br>")
    next
    
    %>