高手帮我,我把所有积分都给你!求你了!

来源:百度知道 编辑:UC知道 时间:2024/05/24 12:02:23
我现在有几个ACCESS数据库连接不知道怎么写成SQL的.麻烦高抬贵手!帮我一下!救人一命,胜过7级浮屠啊!
第一个:
-------------------------
<%
dim connPlus,connstrPlus,dbPlus
'更改数据库名字
dbPlus="Data/Dv_Plus_Tools.mdb"
Set connPlus = Server.CreateObject("ADODB.Connection")
connstrPlus="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(dbPlus)
'如果你的服务器采用较老版本Access驱动,请用下面连接方法
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
connPlus.Open connstrPlus

function CloseConnPlus
on error resume next
connPlus.close
Set connPlus = Nothing
End Function
%>
----------------------------
第二个:
dim dbdown,conndown,downstr
dbdown="data/Dv_Plus_Tools2.mdb" '下载数据库名
Set conndown = Server.CreateObject("ADODB.Connection")
downstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(dbdown)

<%
on error resume next
dim conn

dim dbpath
dbpath=server.mappath("uadmin/db/dbdb1.mdb")
set conn=server.createobject("adodb.connection")
'conn.open "Driver={Microsoft Access Driver (*.mdb)};dbq="&dbpath
conn.open "Provider=Microsoft.Jet.Oledb.4.0;Data Source="&dbpath
%>

书上有..可是俺忘记了.

你为什么要写sql啊。。不知道你什么意思