OLE kullanmadan Excelden Okuma

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
vkamadan
Kıdemli Üye
Mesajlar: 1935
Kayıt: 17 Mar 2004 03:52
Konum: Adapazarı
İletişim:

OLE kullanmadan Excelden Okuma

Mesaj gönderen vkamadan »

Merhaba,
Excel yüklü olmayan bir sistemde Excel dosyasını okumak istiyorum, nasıl bir yol izlemeliyim böyle bir 3.parti bileşen varmıdır?
Forumda yazmak konusunda bilgi var ama okumak konusunda döküman bulamadım.
İyi çalışmalar.
Volkan KAMADAN
www.polisoft.com.tr
Kullanıcı avatarı
sabanakman
Kıdemli Üye
Mesajlar: 3081
Kayıt: 17 Nis 2006 08:11
Konum: Ah bi Antalya olaydı keşke (Ankara)

Mesaj gönderen sabanakman »

Merhaba; bunu JET Sürücüleri üzerinden ADO bileşenlerini kullanarak yapabilirsin. Mesela:

Kod: Tümünü seç

const
  ConSt='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Extended Properties=Excel 8.0;Persist Security Info=False';
%s olan yer xls dosyası olursa connection string değeri olarak alıp kullanabiliriz ve ADOQuery nesneleri üzerinden xls üzerindeki sayfalara ulaşabiliriz.
Örnek:c:\test.xls dosyasının Sayfa1 isimli sayfasını kullanmak gerekirse

Kod: Tümünü seç

procedure TForm1.BaglanClick(Sender:TObject);
begin
  ADOConnection1.Close;
  ADOConnection1.ConnectionString:=Format(ConSt,['c:\deneme.xls']);
  ADOQuery1.SQL.Text:='select * from  [Sayfa1$]';
  ADOQuery1.Open;
end;
kodları ile excel dosyasını açabilirsin. Burada tablo adı olarak sayfaları vermen ve köşeli parantez içinde "[?]" yazman gerekmektedir. Aksi halde sorgu açılmıyor. İyi çalışmalar.
Şaban Şahin AKMAN
_________________
Derin olan kuyu değil kısa olan iptir. - .
Kullanıcı avatarı
vkamadan
Kıdemli Üye
Mesajlar: 1935
Kayıt: 17 Mar 2004 03:52
Konum: Adapazarı
İletişim:

Mesaj gönderen vkamadan »

@sabanakman , evet öneriniz düz dosyalar için çok mükemmel bir yöntem,
fakat çalışacağımız dosyalar düzgün dosyalar değil yani okuyacağımız hücrenin koordinatları sabit artan sıralı şekilde değil, rast gelen erişim yapmam gerekiyor, yani mesela aynı çalışma sayfasında yan yana farklı yapılardaki tabloları düşüne bilirz bu gibi dosyalardan bilgi okumam gerekiyor.
Çok teşekkür ediyorum
Volkan KAMADAN
www.polisoft.com.tr
Kullanıcı avatarı
sabanakman
Kıdemli Üye
Mesajlar: 3081
Kayıt: 17 Nis 2006 08:11
Konum: Ah bi Antalya olaydı keşke (Ankara)

Mesaj gönderen sabanakman »

Bende bundan çekiniyordum. Aslında bu soruya gelecek cevap benimde işime yarayacak. Eğer cevabını başka bir yerden bulursan paylaşımın benim de işime yarayacaktır. Kolay gele.
Şaban Şahin AKMAN
_________________
Derin olan kuyu değil kısa olan iptir. - .
Kullanıcı avatarı
vkamadan
Kıdemli Üye
Mesajlar: 1935
Kayıt: 17 Mar 2004 03:52
Konum: Adapazarı
İletişim:

Mesaj gönderen vkamadan »

sabanakman yazdı:Bende bundan çekiniyordum. Aslında bu soruya gelecek cevap benimde işime yarayacak. Eğer cevabını başka bir yerden bulursan paylaşımın benim de işime yarayacaktır. Kolay gele.
Elbette paylaşırım, araştırmalarım devam ediyor.
Kolay gelsin, ilginiz için çok teşekkür ederim.
Volkan KAMADAN
www.polisoft.com.tr
Kullanıcı avatarı
vkamadan
Kıdemli Üye
Mesajlar: 1935
Kayıt: 17 Mar 2004 03:52
Konum: Adapazarı
İletişim:

Mesaj gönderen vkamadan »

Peki,
Open Office excel dosyalarını açabilen ücretsiz bir uygulama, sisteminde excel yerine open office yüklü bir bilgisayarda OLE ile excel okunabilirmi?
Volkan KAMADAN
www.polisoft.com.tr
Cevapla