Excel Veri tabanı Bağlantısı Hakkında

Diğer veritabanları ve SQL komutlarıyla ilgli sorularınızı sorabilirsiniz. Delphi tarafındaki sorularınızı lütfen Programlama forumunda sorunuz.
Cevapla
a_self_lion
Üye
Mesajlar: 93
Kayıt: 01 Eki 2008 06:04

Excel Veri tabanı Bağlantısı Hakkında

Mesaj gönderen a_self_lion » 19 Eki 2011 05:48

Selam arkadaşlar,

Aşağıdaki kodla Excele bağlantı sağlanıp dbgird e alabiliyorum.

Benim sorunum Bağlanırken veriyi sadece okusak değişiklik yapamasak çünkü bu şekilde gelen dbgrid içindeki verilerde değişiklik yapınca exceldeki yerde de bunlar değişiyor. Bunu burda sadece read konumunda nasıl çekebilirim.

Kod: Tümünü seç

str:=Edit1.Text;

   Dm.AConMlzSec.Connected:=False;
   Dm.AConMlzSec.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;' +
                  'Data Source=' + str + ';' +
                  'Extended Properties=Excel 8.0;';
   try
      Dm.AConMlzSec.Open;
   except
      ShowMessage('Hata....Excele bağlanamadı...');
      raise;
   end;

a_self_lion
Üye
Mesajlar: 93
Kayıt: 01 Eki 2008 06:04

Re: Excel Veri tabanı Bağlantısı Hakkında

Mesaj gönderen a_self_lion » 19 Eki 2011 07:17

Bide Excelden veriyi sadece 8 kolon mu çekebiliyoruz mesala ben 12 kolon almak istiyorum ama sadece 8 tanesini getiriyor dbgride ben mi bir yerde yanlış yapıyorum.

ondan değilmiş

fakat

Kod: Tümünü seç

DGMlzGelisGoruntu.Columns.Add;
   DGMlzGelisGoruntu.Columns[8].FieldName := 'IADE';
   DGMlzGelisGoruntu.Columns[8].Title.Caption:='IADE';
   DGMlzGelisGoruntu.Columns[8].Width:=40;
   DGMlzGelisGoruntu.Columns[8].Color:=clInfoBk;
   DGMlzGelisGoruntu.Columns[8].ReadOnly:=True;

bu alanı nedense sayı diye almıyor boş getiriyor hep sebebi ne olabilir yada
burdaki fieldname := 'IADE'; bunu nasıl string eçevirebilirim.

Kullanıcı avatarı
sabanakman
Kıdemli Üye
Mesajlar: 3052
Kayıt: 17 Nis 2006 07:11
Konum: Ah bi Antalya olaydı keşke (Ankara)

Re: Excel Veri tabanı Bağlantısı Hakkında

Mesaj gönderen sabanakman » 21 Eki 2011 10:04

Başka bir sütuna excel fonksiyonu ile "string" biçimine dönüştürebilirsiniz. Mesela ilgili alan H ise ve yeni boş bir sutun olarak N sütunu olduğunu farzedersek, N2 hücresine =BİRLEŞTİR(H2) formülü girilmeli ve bu formül daha sonra tüm N sütununa uygulanmalı. Artık N sütununda aynı bilginin String tipinde karşılığını alabileceksiniz. :lol: :lol: :lol: :mrgreen:
Şaban Şahin AKMAN
_________________
Derin olan kuyu değil kısa olan iptir. - .

orhancc
Üye
Mesajlar: 585
Kayıt: 24 Ağu 2010 01:14
Konum: İstanbul / Kadıköy
İletişim:

Re: Excel Veri tabanı Bağlantısı Hakkında

Mesaj gönderen orhancc » 21 Eki 2011 09:35

Gridden gelen bilgileri kbmmemtable ile alıyorum ve işimi görüyorum onu da gride bağlayabilirsin.

Cevapla