Delphi Forum

msn den size göndersem yardım edermisiniz?

procedure TForm1.Button1Click(Sender: TObject); // Jet 4.0 ile Windows altındaki Mspbde40.DLL kullanılır... Var BagXLS, BagPDX : String; XLSDosya, PDXDosya : String; begin // XLSDosya := ExtractFilePath(Application.ExeName)+'GIRESUN.XLS'; // PDXDosya := ExtractFilePath(Application.ExeName)+'AKTARMA...

Project Project.exe raised exception class EOLeException with message 'Microsoft jel veritabanı alt yapısı 'Sayfa1$' nesnesini bulamadı.Nesnenin varolduğundan ve adını ve yolunu doğru yazdığınızdan emin olun' Process stopped.Use Step or Run to continue

diye bir hata alıyorum.

Bu şekilde çalıştı fakat başka bir hata alıyorum ; ADOQuery1:Cannot perform this operation on an open dataset procedure TForm1.Button2Click(Sender: TObject); begin With AdoQuery1 do begin SQL.Clear; SQL.Add('INSERT INTO ' + 'AKTARMA.DB'); SQL.Add(' (A, B, C, D, E, F, G)'); SQL.Add('SELECT A, B, C, D...

DB ve Excel İsimlerini yerleştiriyorum fakat hata alıyorum ; [Error] Unit1.pas(69): Undeclared identifier: 'AKTARMA' With AdoQuery1 do begin SQL.Clear; SQL.Add('INSERT INTO ' + AKTARMA.DB ); SQL.Add(' (A, B, C)'); SQL.Add('SELECT XA, XB, XC from [Sayfa1$] IN "'+GIRESUN.XLS+'" "Excel 8...

Yazmış olduğunuz kod için çok teşekkür ediyorum. Allah Razı olsun kodu denedikten sonra cevabı yazarım birde Query1 "d1" , "d2" ,"d3" ve ADOQuery de "XA","XB","XC" tanımlamalımıyım? Parameters.ParamByName('d1').Value := ADOQueryXLS.FieldByN...

evet paradox ve dbgrid1 de Excell deki verileri görüyorum aktarma.db dosyam var buna tum excel deki verileri kayıt yapmak istiyorum.

tamam oldu arkadaşım teşekkür ederim fakat bir şey daha sorabilirmiyim bu verileri kaydedebilirmiyim? DB kütüğüne?

dediklerinizi yaptım fakat Var ExcelDosya : String; begin ExcelDosya := 'D:\DOC\Kitap1.xls'; DataSource1.DataSet := AdoQuery1; DBGrid1.DataSource := DataSource1; AdoConnection1.LoginPrompt := False; AdoConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ ExcelDosya + ';Ex...

Paradox 7 1 *.Db olarak kullanıyorum başka bir kolay yolu varmı?

Form1 in OnShow kısmına mı yazmam gerekiyor bu alanı?

Arkadaşım buldum fakat şurda hata verior anlamadım yardım edermisin? Kod: var book:variant; excel,sheet:variant; satir, sutun:integer; str:string; begin excel := createOleObject('Excel.application'); OpenDialog1.Filter := 'Excel Dosyaları (*.xls)|*.xls'; if opendialog1.Execute then begin book:= Exce...

Arkadaşım buldum fakat şurda hata verior anlamadım yardım edermisin? var book:variant; excel,sheet:variant; satir, sutun:integer; str:string; begin excel := createOleObject('Excel.application'); OpenDialog1.Filter := 'Excel Dosyaları (*.xls)|*.xls'; if opendialog1.Execute then begin book:= Excel.Wor...

bulamadım arkadaşım yardım edersen sevinirim.

Arkadaşlar ben excell den DBGrid e veri aktaramadım ? Yardım ederseniz sevinirim.