Как открыть dbf-базу для записи, используя ADO? - VB
Формулировка задачи:
Пишу
Говорит что база доступна только для чтения!!!
Как быть помогите!!! плиз!
Решение задачи: «Как открыть dbf-базу для записи, используя ADO?»
textual
Листинг программы
Private oRS As ADODB.Recordset
Private oCN As ADODB.Connection
Private Sub Command1_Click()
oRS.Open 'uchzav', oCN, adOpenStatic, adLockOptimistic
MsgBox oRS.Supports(adDelete)
set Me.MSHFlexGrid1.DataSource = oRS
End Sub
Private Sub Command2_Click()
With oRS
.AddNew
oRS('naim') = 'WWWWWW'
.Update
End With
End Sub
Private Sub Command3_Click()
oRS.Move 3, 1
oRS.Delete
End Sub
Private Sub Form_Load()
Set oCN = New ADODB.Connection
Set oRS = New ADODB.Recordset
oCN.ConnectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;mode=read|write;Data Source= c:foxing ;Extended Properties=DBase III'
oCN.Open
End Sub