通过ado连接服务器上的数据库为什么不能成功.txt

VB技巧问答10000例 VB技巧问答10000例

无法打开连接原因:SQL Server不能直接链接到某个文件名。 
    正确格式如下://每个小內容均以分号結束,且口令一般不能为空 
    strCN="Driver={SQL Server};Server=服务器名;DataBase=数据库;UID=用户;PWD=口令;" 
    eg:SQL服务器名为 WEBSVR,数据库名为WebMis(在SQL Enterprise Manager中查看到),用户sa,口令123,则以上为: 
    strCN="Driver={SQL Server};Server=WEBSVR;DataBase=WebMis;UID=sa;PWD=123;" 
<END>    
Dim connLocal As New ADODB.Connection 
    Dim rsLocal As New ADODB.Recordset 
    dim g_gonn as string 
     '数据源连接字符串 
     g_Conn = "DSN=yizanNews;UID=sa;PWD=12332132" 
     connlocal.open g_conn 
     tempStr = "select * from table1" 
     '将记录集给rslocal对象。 
     rsLocal.open connLocal,tempStr 
     '然后用recordset的方法对数据集操作。 
     '如：rslocal.movefirst
<END>