Question

将一个网页里的数据提交到access数据库，那么网页中应该怎么加上数据库连接的代码，谢谢高手指点

最后能有整编代码的例子，谢谢了我在等着啊

Answer 1

加在asp网页顶部，代码如下

<%
dim conn
dim db
on error resume next
set conn= Server.CreateObject("adodb.connection")
db="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("数据库文件.mdb")
conn.open db
%>

Answer 2

解决了ACCESS数据库路径的问题！

'采用DBType=0或DBType=1来区分AC库还是MSSQL库

'具体采用AC库时应注意的事项，请看程序说明

-----------------------------------------------

Dim DBType,Conn,StrConn

DBType=0 '0为Access数据库，1为MSSQL数据库

If(DBType=0) Then

'****************ACCESS数据库******************

Dim DbFolderName,DbFolder_Path,SiteFolder

DbFolderName="ArticleData" '数据库所在文件夹名称

DbFolder_Path = Server.MapPath(DbFolderName) '数据库所在路径

SiteFolder="Article" '系统所在根目录名称

If Session("RootDir") = "" Then

Session("RootDir") = Mid(DbFolder_Path, 1, InStr(1,DbFolder_Path,SiteFolder,1) -1) & SiteFolder

End if

Set Conn = Server.CreateObject("Adodb.Connection")

StrConn = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Session("RootDir") & "\"& DbFolderName & "\Data.mdb" '连接到数据库

Conn.Open StrConn