台灣最大程式設計社群網站
線上人數
1694
 
會員總數:244132
討論主題:188493
歡迎您免費加入會員
討論區列表 >> VB.NET >> 請問如何在 VB.net 寫入資料至DBaseIII 資料庫?
[]  
[我要回覆]
1
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
請問如何在 VB.net 寫入資料至DBaseIII 資料庫?
價值 : 500 QP  點閱數:384 回應數:15

樓主

KSRS
門外漢
0 22
360 38
發送站內信

各位先進大家好

小弟有一個客人使用極舊版的DBaseIII存取資料,但我必須在VB.net環境對其進行讀取與寫入作業,經搜尋藍色小舖資料庫得知如下相關資訊 https://www.google.com.tw/search?hl=zh-TW&q=VB.net%20DBase%20III%20+site%3Ahttp%3A%2F%2Fwww.blueshop.com.tw%2Fboard%2FFUM20050124191756KKC

以上訊息我取得了VB.net讀取DBaseIII資料庫的方法,但卻找不到『寫入』的方法,不知那位大德能給予協助,感激不盡 KSRS 敬上

示範資料庫下載: https://www.asuswebstorage.com/navigate/s/553A700E982B4D3A9ADFA6D80BB88B87Y




搜尋相關Tags的文章: [ DBaseIII 寫入 ] ,
本篇文章發表於2018-12-11 00:07
別忘捐VP感謝幫助你的人 新手會員瞧一瞧
1樓
回應

kib72377
檢舉此回應
怎麼讀的?
本篇文章回覆於2018-12-11 11:28
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
2樓
作者回應

KSRS
檢舉此回應
讀法如下
http://www.blueshop.com.tw/board/FUM20050124191756KKC/BRD20070517093419I6U.html
本篇文章回覆於2018-12-11 11:40
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
3樓
回應

kib72377
檢舉此回應
DataGridView 控制項?(這種東西是顯示出來給"使用者"看的....)

ado, .net 等等的 recordset物件 一堆,不用嗎?
本篇文章回覆於2018-12-12 08:36
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
4樓
作者回應

KSRS
檢舉此回應
尚請 kib72377 大德教教 ado 在 .net 環境怎麼寫到 DbdaseIII去, 小弟半路出家,學藝很差,仰望大德幫忙 (我上面有示範資料庫可以下載)
多謝您
本篇文章回覆於2018-12-12 08:58
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
5樓
不錯的參考

kib72377
檢舉此回應
為了滿足您的要求,
我特地用 ms access97 DAO方法做的,

Private Sub 指令0_Click()
Dim db As Database
Dim rs As Recordset
Set db = DBEngine.Workspaces(0).OpenDatabase("D:\桌面", False, False, "dBase III;")
Set rs = db.OpenRecordset("物件定義")
MsgBox rs(0) & " ; " & rs(1) & " ; " & rs(2) & " ; " & rs(3) '這裡就是讀取與顯示無異議
rs.Edit
rs(4) = "我的bb" '傳說中的寫入方法,信不信由你
rs.Update
rs.Close
Set rs = Nothing
Set db = Nothing
End Sub

努力吧,騷年.
本篇文章回覆於2018-12-12 16:42
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
6樓
作者回應

KSRS
檢舉此回應
感謝 Kib 大德,我即刻測試,並回報結果給您 感謝您 KSRS 敬上
本篇文章回覆於2018-12-12 17:44
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
7樓
回應

kib72377
檢舉此回應
我沒回答用vb.net 的方法其實是因為我手上沒這樣的系統,
請自行將 access VBA程式+DAO 範例的做法轉成你電腦環境能用的方法.
就 開資料庫(或連線資料庫)的方法, 開資料錄(資料表)的方法, 與資料錄讀寫的方法 這3項.
接下來,我沒辦法給你更多了.
本篇文章回覆於2018-12-12 19:30
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
8樓
作者回應

KSRS
檢舉此回應
TO:Kib72377
抱歉,我雖然沒测出來,應該是我的程度不夠,但我仍然對您表達謝意 KSRS 敬上
本篇文章回覆於2018-12-12 22:07
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
9樓
最有價值解答

roar
檢舉此回應
國外的可以參考一下
http://www.vbforums.com/showthread.php?846601-RESOLVED-Attempting-to-Write-Data-from-DGV-to-Dbase-IV-DBF-File
本篇文章回覆於2018-12-13 09:22
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
10樓
作者回應

KSRS
檢舉此回應
Dear Roar of 9th floor
Thank you very much for the link you send me as above, which it offers me with plenty of information I need, I feel I can almost solve the problem on writing into DBaseIII following their sample codes, appreciate with thankfulness, I will try it and let you knowthe outcome sometime later , thank you very much with best regards from KSRS
本篇文章回覆於2018-12-13 18:47
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
11樓
作者回應

KSRS
檢舉此回應
Dear Roar of 9th floor
問題解決了,寫進去了,非常感謝您的幫助
祝您 萬事如意
KSRS 敬上
本篇文章回覆於2018-12-16 09:32
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
12樓
回應

kib72377
檢舉此回應
Dim CNN As ADODB.Connection
Dim RS1 As ADODB.Recordset
Dim strConnect As String
strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\桌面;Extended Properties=dBase III;"
Set CNN = New ADODB.Connection
With CNN
.ConnectionString = strConnect
.Open
End With
Set RS1 = New ADODB.Recordset
With RS1
.ActiveConnection = CNN
.CursorLocation = adUseClient
.CursorType = adOpenForwardOnly
.LockType = adLockPessimistic '悲觀鎖定:編輯開始時鎖定 'adLockReadOnly
.Open "SELECT * FROM 物件定義"
End With
If RS1.EOF Then
MsgBox "NO"
Else
MsgBox RS1(4) '讀
RS1(4) = "ADO BB" '寫
RS1.Update '儲存寫
End If
RS1.Close
CNN.Close
本篇文章回覆於2018-12-21 16:22
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
13樓
作者回應

KSRS
檢舉此回應
Dear Kib72377 大德
非常感謝您12樓的Code訊息,您的另一種方式存取DbaseIII資料庫非常有價值,我仍將進行測試並且以另一種模式使用於程式中,非常感謝您的關心與如上有價值的資訊 敬此 並祝 萬事如意 KSRS 敬上
本篇文章回覆於2018-12-21 18:27
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
14樓
回應

kib72377
檢舉此回應
https://social.msdn.microsoft.com/Forums/zh-TW/0a1ca4d1-e4f1-4a0e-ba79-1e7fd7ed84d5/-ado-dbf-?forum=232
這一篇嗎?
本篇文章回覆於2018-12-26 17:06
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
15樓
作者回應

KSRS
檢舉此回應
感謝14F kib72377 再次提供有價值訊息 Beat regards to you KSRS 敬上
本篇文章回覆於2018-12-26 21:16
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
   
1

回覆
如要回應,請先登入.