Access培訓
網站公告
·Access快速平臺QQ群號:84825014    ·Access快速開發平臺下載地址及教程    ·歡迎添加微信交流賬號:AccessoftChu    ·如何快速搜索本站文章|示例|資料    
您的位置: 首頁 > 技術文章 > Access數據庫-模塊/函數/VBA

通過ADO直接對SQL服務器中的表進行操作

時 間:2016-12-15 09:47:42
作 者:易勛   ID:35404  城市:上海
摘 要:通過ADO直接對SQL服務器中的表進行操作
正 文:

    Dim strSQL        As String
    Dim rst           As Object 'ADODB.Recordset
    Dim strConnect    As String
    Dim cnn As New ADODB.Connection
  
    strConnect = "Provider=SQLOLEDB" _
               & ";Persist Security Info=true" _
               & ";Data Source=服務器地址" _
               & ";User ID=登錄名" _
               & ";Password=密碼" _
               & ";Initial Catalog=數據庫名稱"
    cnn.Open strConnect
    strSQL = "Select * FROM [表名] Where [xxx]=" & SQLText(Me.xxx)
    Set rst = OpenADORecordset(strSQL, , cnn)
   
        Me![xxx] = rst![xxx]
        ......


    End If
    rst.Close
    cnn.Close



Access軟件網官方交流QQ群 (群號:252407829)       access源碼網店

最新評論 查看更多評論(2)

2020/6/6 19:33:04丁先生
沒有 if, 哪里來的 End If? 另外 cnn.close 是怎么回事?開發平臺里的標準代碼好像沒有 cnn.close 的

2016/12/15 23:06:45nowtoo
老師好,開發平臺里更簡易的代碼是怎樣的,謝謝!

發表評論您的評論將提升作者分享的動力!快來評論一下吧!

用戶名:
密 碼:
內 容:
 

常見問答

技術分類

相關資源

關于我們 | 服務條款 | 在線投稿 | 友情鏈接 | 網站統計 | 網站幫助