Set conn = Server.CreateObject("ADODB.Connection")
Set rst = Server.CreateObject("ADODB.Recordset")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=1.mdb;Persist Security Info=False"
str1 = "select * from yourtable"
rst.Open str1, conn, 3, 1
Set rst = Server.CreateObject("ADODB.Recordset")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=1.mdb;Persist Security Info=False"
str1 = "select * from yourtable"
rst.Open str1, conn, 3, 1
dim strConnectionString,strSQL,rs,counter,Cnn,
strConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=yourpath\aspdata.mdb"
Set Cnn = Server.CreateObject("ADODB.Connection")
Cnn.Open strConnectionString
set rs=server.createobject("ADODB.recordset")
strSQL= "select seq from guestbook"
set rs=Cnn.Execute(strSQL)
If Not rs.EOF Then
While Not rs.EOF
counter = rs("seq")
rs.MoveNext
Wend
counter = counter + 1
Else
counter = 1
End If
如用ACCESS97的话,最好换一下连接字符串,不要用上面那个
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("test.mdb")
set conn = server.createobject("adodb.connection")
conn.open strconn 我喜欢和大家一起讨论
EMAIL:[email protected]
set rst=server.CreateObject("adodb.recordset")
sqlment="select * from table"
rst.Open sqlment,conn,1,3rst.addnew
rst.fields("1")=a
rst.fields("2")=brst.update
strconn="Driver={MicrosoftAccessDriver(*.mdb)};" &_
"DBQ=F:\Inetpub\wwwroot\somedir\db1.mdb;DefaultDir=f:\Inetpub\wwwroot\somedir;uid=LoginID;" &_
"pwd=Password;DriverId=25;FIL=MSAccess;" set conn = server.createobject("adodb.connection")
conn.open strconn 我喜欢和大家一起讨论
EMAIL:[email protected]
做一个系统DSN
set rs = server.createobject("adodb.recordset")
rs.open "tblname", "DSNName", 3, 3 我喜欢和大家一起讨论
EMAIL:[email protected]
那个是关键字段
这句话为什么在有的机子上可以运行,有的错误:
报错如下:
An exception of type 'Microsoft JET Database Engine 未指定的错误' was not handled是不是跟文件格式有关(FAT32和NTFS)