DB (Paradox) Uzantılı Dosya Düzenlemek

[Recep İpek]

Merhaba,

Elimde bir programın DB uzantılı dosyası var.
Bu dosyaya 1000 adet veri eklemek istiyorum.Örneği SİCİL,ADI,SOYADI
Acil olduğu için programın kendisi ile girmek bana zaman kaybı yaratacak.

Sanırım bununla ilgili küçük programlar var.

Konu hakkında bilgi sahibi olan var ise paylaşımda bulunabilirlerse sevinirim.

 

[modalı]

Sayın Recep İpek,

Bilgileriniz nerede kayıtlı?

Access içinden paradox (.db) dosyalarına bağlanabilirsiniz.

İyi çalışmalar

 

[Recep İpek]

PERSONEL.DB adında programın Data klasöründe kayıtlı.

Access'den link tablo ile bağlanmaya çalıştığımda "Unexpected error from external database driver (11265)" hatası alıyorum.

Sanırım desteklemiyor.

 

[modalı]

Bağlantı kod ile şu şekilde de olabilir:

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\myDb;Extended Properties=Paradox 5.x;

İyi çalışmalar

 

[modalı]

Bir de şu linki inceleyin:

http://www.excel.web.tr/f66/sifreli-paradox-veritaban-ndan-veri-aktar-m-t60919.html

 

[Recep İpek]

Bu seferde "Yüklenebilir ISAM bulunamadı" hatası çıkıyor...

 

[Recep İpek]

DAO ile aşağıdaki şekilde bağlantı kurmayı başardım.
Fakat kayıt eklemek istediğimde bu seferde "salt okunur" hatası veriyor.Sanırım manuel girmekten başka çarem kalmadı...

İlgilenenlere teşekkürler..

Sub DBDao()
Dim DB As DAO.Database
Dim RS As DAO.Recordset
Range("a2:o1000").ClearContents
Set DB = OpenDatabase("C:\Deneme\01", False, True, "Paradox 7.x;")
Set RS = DB.OpenRecordset("SELECT * from [PERSONEL01#DB] ORDER BY KOD ASC")
MsgBox RS.RecordCount
For x = 0 To RS.Fields.Count - 1
    Cells(1, x + 1) = RS(x).Name
    Cells(1, x + 1).Font.Bold = True
Next
[A2].CopyFromRecordset RS
For i = 2 To 3
    RS.AddNew
        For j = 0 To RS.Fields.Count - 1
            RS(j) = Cells(i, j + 1)
        Next j
    RS.Update
Next i
RS.Close
DB.Close
Set RS = Nothing
Set DB = Nothing
MsgBox "Bitti", vbInformation, "Bilgi"
End Sub

 

[Recep İpek]

1218 kişiyi manuel girdikten sonra aşağıdaki programı buldum. :redface:

Belki birilerine lazım olabilir.Full değil ama en azından excelden kopyalama yapabiliyorsunuz..

http://www.vlsoftware.net/exportizer/

 

[cebelitarık]

Sayın Recep İpek

Forumda arama yaparken açtığınız konuyu buldum.
Bende aynı dertten muzdaribim.
Paradox veritabanında mevcut bulunan kayıtların altına ilave olarak excel den aynı formatta 500-600 kayıt eklemek istiyorum.

Eski kayıtların devamına olacak şekilde. Yeni kayıtların excelden kopyalanarak atılabildiğini yazmışsınız. Ben kopyalayamadım. Açıklamalı olarak tarif ederseniz müteşekkir kalırım.
Ayrıca Excelde Dış veri al ile verileri *.db den alabiliyoruz. Verilerde değişiklik yaparak gerisin geriye *.db ye göndermemiz mümkünmüdür.
Saygılarımla