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

解决方案 »

  1.   

    Option Explicit
        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
      

  2.   

    我觉得语句应该没错,可能是ACCESS97 或文件安全属性问题,可是又找不到原因
      

  3.   

    strConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=yourpath\aspdata.mdb"
    如用ACCESS97的话,最好换一下连接字符串,不要用上面那个
      

  4.   


    strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("test.mdb") 
    set conn = server.createobject("adodb.connection") 
    conn.open strconn 我喜欢和大家一起讨论
    EMAIL:[email protected]
      

  5.   

    奇怪,为什么语句没出错,却老是向access表中写不进数据?我的语句如下:
    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
      

  6.   

    还有
    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]
      

  7.   

    还有最简单的
    做一个系统DSN
    set rs = server.createobject("adodb.recordset") 
    rs.open "tblname", "DSNName", 3, 3 我喜欢和大家一起讨论
    EMAIL:[email protected]
      

  8.   

    rst.Open sqlment,conn,1,3该为rst.Open sqlment,conn,3,3应该没问题了吧
      

  9.   

    改成了rst.Open sqlment,conn,3,3 怎么还是不行?还是没写进去
      

  10.   

    to hsn1982(我爱猫猫) 
    那个是关键字段
      

  11.   

    conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filepath & ";Persist Security Info=False"
    这句话为什么在有的机子上可以运行,有的错误:
    报错如下:
    An exception of type 'Microsoft JET Database Engine 未指定的错误' was not handled是不是跟文件格式有关(FAT32和NTFS)
      

  12.   

    关键字段赋了值,怎么知道Microsoft.Jet.OLEDB.4.0驱动有没有?
      

  13.   

    TO:: xm_44(小月) 我给你一份标准的代码EMAIL:[email protected]
      

  14.   

    不好意思,我怎么知道我有没有装Microsoft.Jet.OLEDB.4.0驱动