AccessTr.neT

Bul · 27/07/2011, 09:22

Merhaba arkadaşlar. Acces formda bir adet list bir adet butonum var. Butona tıklanınca c: sürücümde bulunan Excel dosyamdan bilgileri çekmesini istiyorum. Fakat yazdığım kod çalışmadı. yardımcı olursanız sevinirim. Yazdığım kod şu şeklide ;


Option Compare Database
Dim baglan As ADODB.Connection
Dim komut As ADODB.Command
Dim kayıt As New ADODB.Recordset
Set baglan=new ADODB.Connection
Set komut=new ADODB.Command
Dim veri As String
Private Sub Komut0_Click()
baglan.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\FIK_04.xls;Extended Properties=Excel 8.0;HDR=Yes"
baglan.Open
veri = "Select * from FIK_04"
kayıt.Open veri, baglan, 1, 1
Liste1.AddItem (veri)
baglan.Close
End Sub

kırmızı ile yazdığım yerde hata veriyor.

Bul · 28/07/2011, 07:58

ben çok anlamam da bir şey dikkatimi çekti. dosya masa üstünde diyorsunu ama kırmızı yerde sanki direk C nin içinden bakıyormuş gibi geldi bana (C:\FIK_04.xls)

Bul · 28/07/2011, 08:21

aslında öylede mesajı yazarken uzun olmasın diye c: yazmıştım orayı değiştirmeyi unutmuşum.

Bul · 28/07/2011, 09:02

Örnek dosya eklerseniz çok daha iyi olur.

AccessTr.neT

Accessten excel bağlantıda kod hatası

Accessten excel bağlantıda kod hatası

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Giriş yap

Hesap oluştur

Konu Linkleri