Selamun Aleykum
.db uzantılı bir veritabanından excel'e bir veri yapıştırdığımda bazı kutucuklara veri yapışmıyor ve [INVALID_DATA] yazıyor. Bu sıkıntıyı nasıl çözebilirim.
Teşekkürler...
eklediğiniz dosya VB.Net dersleri
kendi dosynızı ekler misiniz?
(01/04/2021, 23:08)berduş yazdı: [ -> ]eklediğiniz dosya VB.Net dersleri
kendi dosynızı ekler misiniz?
Teşekkür ederim.
Veritabanını göndereyim. Buradan ilk 20 kaydı
Excel e yapıştırmayı deneyebilirsiniz mesela.
siz db dosyanızı nasıl açıyorsunuz?
emin değilim ama anladığım kadarıyla: eğer metinde yeni paragrafa başlama işareti varsa
Excel onu yeni satır olarak ekleyemediğinden hata veriyor.
kayıttaki bu değerleri yeni paragraf ekleme işaretlerini kaldırınca sorunsuz ekliyor
Sqlite için alttaki kod çalışıyor örnek olarak.
Private Sub CommandButton1_Click()
Dim con As Object, rs As Object
Set con = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
con.Open "DRIVER=SQLite3 ODBC Driver;Database=" & ThisWorkbook.Path & "\prod.db;"
strSQL = "SELECT _id,fasil,konu from hadisler "
rs.Open strSQL, con, 1, 1
With Sheets("Sayfa1")
.Cells.ClearContents
.Range("A1").CopyFromRecordset rs
End With
rs.Close
con.Close
Set rs = Nothing: Set con = Nothing
End Sub
SELECT * from hadisler
yukardaki gibi yapınca
Excel donuyor.