Assalamualaikum semuanya dari dunia nyata ataupun dunia ghaib...Tetep tonton mister tukul jalan2..
...ha
,,,,Disini saya hanya menulis sekala kadarnya dan timbangannya....
...Oke....Sekarang saya menjelaskan secara singkat, KONEKSI adalah menghubungkan atau hubungan dll, kemudian DINAMIK...Bisa dipindah-pindah..enggak STATIK (DIEM) Cowo ngedeketin anaknya pak haji..
Bissmillah...
Langkah 1...Siapkan Adotable yang berada di TAB ADO pada Component...
Langkah 2...Enggak usah di otak atik dulu..
Langkah 3...Kita klik Form yang ada Adotablenya..Pilih Kotak Object Inspector yang ada di Kotak sebelah Kiri paling bawah.
Langkah 4..Pilih Events dan Klik kolom OnCreate..
Oncreate = saat form dibentuk.
Langkah 5..Lihat dibawah ini..
Procedure TForm1.OnCreate(Sender:TObject);
begin
Adotable1.Close;
Adotable1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0; Data Source='+ExtractFilePath(Application.Exename)+'\DATABASE.mdb';
Adotable1.TableName:='USER';
Adotable1.Open;
------Keterangan------
...Jika ada source yang salah, mari kita memperbaiki sama... Arigatou . . .Tengkyu . .Makasih
...ha
,,,,Disini saya hanya menulis sekala kadarnya dan timbangannya....
...Oke....Sekarang saya menjelaskan secara singkat, KONEKSI adalah menghubungkan atau hubungan dll, kemudian DINAMIK...Bisa dipindah-pindah..enggak STATIK (DIEM) Cowo ngedeketin anaknya pak haji..
Bissmillah...
Langkah 1...Siapkan Adotable yang berada di TAB ADO pada Component...
Langkah 2...Enggak usah di otak atik dulu..
Langkah 3...Kita klik Form yang ada Adotablenya..Pilih Kotak Object Inspector yang ada di Kotak sebelah Kiri paling bawah.
Langkah 4..Pilih Events dan Klik kolom OnCreate..
Oncreate = saat form dibentuk.
Langkah 5..Lihat dibawah ini..
Procedure TForm1.OnCreate(Sender:TObject);
begin
Adotable1.Close;
Adotable1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0; Data Source='+ExtractFilePath(Application.Exename)+'\DATABASE.mdb';
Adotable1.TableName:='USER';
Adotable1.Open;
------Keterangan------
...Jika ada source yang salah, mari kita memperbaiki sama... Arigatou . . .Tengkyu . .Makasih
0 comments:
Posting Komentar