这种连接到底哪不对？

sunredday

ACCESS里的DAO的ODBC连接的例子都是不全的连接例子，实际使用时还要具体化。
但我至今没有成功
以下连接哪错了呢？
  MsgBox "Opening Connection1..."
    Set conPubs = wrkODBC.OpenConnection("Connection1", dbDriverNoPrompt, , _
    "ODBC;driver=SQL SERVER;server=PIC-FTJKAEDP4ZEUID;UID=saWD=;DATABASE=pubs;DSN=Publishers;")

sunredday

这样也不对
Set wrkODBC = CreateWorkspace("NewODBCWorkspace", _
        "administrator", "", dbUseODBC)
  
    MsgBox "Opening Connection1..."
    Set conPubs = wrkODBC.OpenConnection("mqis", _
        dbDriverNoPrompt, True, _
        "ODBC;DATABASE=pubs;UID=saWD=;DSN=Publishers")

sunredday

这个可以，是DBUSEJET的
  MsgBox "Opening pubs..."
    Set dbsPubs = wrkJet.OpenDatabase("mqis", _
        dbDriverNoPrompt, True, _
        "ODBC;DATABASE=pubs;UID=saWD=;DSN=Publishers")

sunredday

Set wrkODBC = CreateWorkspace("NewODBCWorkspace", _
        "administrator", "", dbUseODBC)
  
    在ACCESSS中可以使用ODBCWORKKSPACE 吗？

sunredday

这才是正确的连接！！！！！！！！！！！！！！！！！！

MsgBox "Opening Connection1..."
    Set conPubs = wrkODBC.OpenConnection("newconnectionname", _
         dbDriverNoPrompt, True, _
        "ODBC;DSN=MQIS;Description=SQL Server;APP=Microsoft? Access;WSID=PIC-FTJKAEDP4ZE;DATABASE=pubs;Trusted_Connection=Yes")

sunredday

在ACCESS 中与ODBC 数据库连接可以通过JET连接，也可以直接与ODBC连接（不通过JET）
可以使用OPENCONNECTION，可以使用OPENDATABASE

zhuyiwen

以下是引用sunredday在2003-5-13 15:13:49的发言：
这才是正确的连接！！！！！！！！！！！！！！！！！！

MsgBox "Opening Connection1..."
     Set conPubs = wrkODBC.OpenConnection("newconnectionname", _
          dbDriverNoPrompt, True, _
         "ODBC;DSN=MQIS;Description=SQL Server;APP=Microsoft? Access;WSID=PIC-FTJKAEDP4ZE;DATABASE=pubs;Trusted_Connection=Yes")

原来你只采用了WINDOWS安全, 所以只能使用信任连接! [em24]

sunredday

这个也通了
  Set conPubs = wrkMain.OpenConnection(" mqis", _
        dbDriverNoPrompt, False, _
        "ODBC;DATABASE=pubs;UID=saWD=;DSN=mqis")
怪了。