VB6再回首：資料訪問

　　十幾年前最開始用VB時，是從資料繫結開始的，後來，自己慢慢開始“不屑”這種簡單的、傻瓜化的操作，逐步向sql語句過渡：幾乎所有的資料庫操作都用sql完成，還頗以此自得。再後來，轉向asp.net，頁面中大量的資料庫訪問，逼迫自己慢慢形成自己的頁面交換模組，來簡化代碼量。

　　今天剛好又寫了一段資料庫程式，發現，用adodc控制項，可以快速的實現資料和控制項之間的互動而幾乎沒有代碼量。

　　方法很簡單，加入ａｄｏｄｃ後，先簡單配置串連和查詢，指定關聯的控制項。再取消串連和查詢。

載入代碼：

ad.ConnectionString = oCn.ConnectionString
ad.RecordSource = "select * from mapdata where CodeNum='" & CodeNum & "'"
ad.Refresh

 

添加代碼：

ad.ConnectionString = oCn.ConnectionString
ad.RecordSource = "select * from mapdata where 1=2"
ad.Refresh
ad.Recordset.AddNew

更新代碼：

ad.Recordset.Update