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

[a_self_lion]

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]

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.

[sabanakman]

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.

[orhancc]

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