~_~ 问个问题：用 ado + access 和 ado + sqlserver 在vb代码中哪里有区别...........下午揭贴，急呀！！！！！！！！！

Question

比如access中的rs.open"selece * from 1表 where name='tom'",db, adOpenStatic, adLockOptimistic在sqlserver怎么写的？Dim WithEvents adoRS As Recordset
Dim db As Connection
Set db = New Connection
    db.CursorLocation = adUseClient
    db.Open"Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\db1.mdb;Jet OLEDB:Database Password=1234;"
这要怎么改呀？？？？？

Answer 1

先在工程-引用中添加Microsoft ActiveX Data Objects 2.X Library
代码如下：Dim Conn                As ADODB.Connection   '定义数据库连接
Dim rs                  As ADODB.Recordset    '定义Recordset对象
Dim SQL                 As String             '需执行的各SQL语名SQL = "Provider=SQLOLEDB.1;Persist Security Info=False; Data Source=服务器名称;Initial Catalog=Master;User ID=用户名;Password=口令"Set Conn = New ADODB.Connection
    Conn.ConnectionString = SQL
    Conn.Open

Answer 2

With db
        .ConnectionString = "Driver={SQL Server};Server=sql服务名;Uid=sa;Pwd=;Database=数据库名"
        .Open
    End With

Answer 3

db.Open"Provider=SQLOLEDB.1;Persist Security Info=False;Initial Catalog=数据库;Data Source=服务器名"

Answer 4

Access 中“rs.open"selece * from 1表 where name='tom'",db, adOpenStatic, adLockOptimistic”在SQL Server中是同样的写法

Answer 5

Set rs = New ADODB.Recordset
    rs.ActiveConnection = Conn
    rs.Open "Select [name] from dbo.sysdatabases", , adOpenKeyset, adLockOptimistic, adCmdText

Answer 6

在form中放置adodc控件
属性connectionstring,数据库连接代码可以自动生成 With Adodc1
  .ConnectionString = "driver={SQL Server};server=yang;uid=sa;pwd=;ConnectionTimeout=0;database=zjy"
  .RecordSource = "Select * From ryjbxx where szdw='100001'"
 End With比如access中的rs.open"selece * from 1表 where name='tom'",db, adOpenStatic, adLockOptimistic这个通用的

Answer 7

二者的区别是很小的.
对于有些数据类型.在SQL语句中它们有一些细小的差别.
例如:
日期  ACCESS: SELECT * FROM [TABLENAME] WHERE INDATE=#2003/4/5#
      SQLSERVER: SELECT * FROM [TABLENAME] WHERE INDATE='2003/4/5'
模糊查询:
      ACCESS:SELECT * FROM [TABLENAME] WHERE NAME LIKE '*A*'
      SQLSERVER: SELECT * FROM  [TABLENAME] WHERE NAME LIKE '%A%'另外,ACCESS与SQLSERVER之间有一些数据类型也不同.你可查看相关资料,此不细述. 

Answer 8

sql2000:
conn.Open "Provider=Sqloledb;uid=sa;wsid=;pwd=**;database=**;server=1.1.1.1"
access:
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & "\**.mdb;Persist Security Info=FalseJet OLEDB;Database Password=1234;"
就这样的区别 给分~~