Author:水如煙
現在可以提供代碼下載了.
地址:http://download.csdn.net/source/485639
LzmTW.uData.Dll
資源大小: 2.89MB
文件比較大,主要是附上了FoxPro2.6的解釋程序.
代碼用VS2008組織,適用於Framwork2.0+
VS2005的可以引用lzmtw.udata.dll。
功能:
1、實現常用數據庫SqlServer、Access、Excel、DBase的一般操作;
2、實現臨時指定主鍵的數據更新
3、實現表的創建,DataTable數據的上傳
4、由於1-3,實現以上數據庫間表的複製
5、當然,並非所有字段類型數據都能夠彼此複製
說明:
1、對DBase,本類支持創建MEMO字段類型,但不支持此類型的讀寫。
2、代碼比較凌亂,有再次重組的必要。
3、不過,代碼本身僅側重於功能的實現測試,所以各位看得頭疼,不要暗裏罵人。
4、非常對不起,代碼少有註釋。不是我不想寫註釋,實在的我的基本功太臭,寫出的“註釋”會容易誤導。
示例:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim table As New DataTable("Test")
table.Columns.Add("NO", GetType(Integer))
table.Columns.Add("Content")
table.PrimaryKey = New DataColumn() {table.Columns("NO")}
table.LoadDataRow(New Object() {1, "測試2222"}, True)
table.LoadDataRow(New Object() {2, "任意DataTable數據"}, True)
table.LoadDataRow(New Object() {3, "上傳到通常用的數據庫"}, True)
table.AcceptChanges()
'把table數據上傳到SqlServer的Nothwind數據庫
Dim db As New SqlOleDbDatabase(".", "Northwind")
db.CopyTableToDatabase(table)
Me.DataGridView1.DataSource = db.GetDataTable("test")
End Sub
至於常用的方法,我另開貼稍爲示意一下。
僅供參考。參考者也請保持原LzmTW.uData命名空間。謝謝。