Delphi for delphier

Langkah-langkah membuat koneksi database MS SQL Server

 

Kembali

   
Oleh
eko-indriyawan-png.png   Nama Eko Indriyawan
Domisili Surabaya – Darmo Satelit
Delphi Delphi 2007 for Win32
YM eko_elits
Email eko_elits@yahoo.com
Telp 031 – 605 384 36
   
Petunjuk :
Silahkan anda ikuti langkah – langkah berikut ini dengan pelan – pelan agar bisa berjalan dengan lancar sesuai dengan petunjuk yang sudah diberikan.
   
Langkah 1
   
Langkah 2
Tambahkan beberapa object kedalam Form.
   
  Button1: TButton;
Button2: TButton;
ADOConnection1: TADOConnection;
Label1: TLabel;
Edit1: TEdit;
Label2: TLabel;
Edit2: TEdit;
Label3: TLabel;
Edit3: TEdit;
   
Langkah 3
Atur desainnya seperti berikut ditampilkan pada gambar form dibawah ini
   
 
pemulasqlserver000028.png
   
Langkah 4
Sekarang silahkan anda klik 2x object ADOConnection1. Tunggu beberapa saat hingga muncul tampilan kotak dialog seperti terlihat pada gambar dibawah ini.
   
 
pemulasqlserver000029.png
   
Langkah 5
Lanjutkan dengan menekan tombol Build. Tunggu beberapa saat hingga didapatkan tampilan kotak dialog seperti terlihat pada gambar dibawah ini.
   
 
pemulasqlserver000030.png
   
Langkah 6
Pilih Microsoft OLE DB Provider for SQL Server.
   
 
pemulasqlserver000031.png
   
Langkah 7
Selanjutnya silahkan anda tekan tombol Next. Tunggu beberapa saat hingga didapatkan tampilan program seperti terlihat pada gambar dibawah ini.
   
 
pemulasqlserver000032.png
   
Langkah 8
Setelah itu, silahkan anda tentukan nama server, username dan password serta databasenya. Apabila anda tidak menambahkan user kedalam database, maka pada bagian Enter Information for log on to the server pilihlah option Use Windows NT Integrated Security dan begitu sebaliknya jika anda telah menambahkan user dan passowrd, maka silahkan anda pilih untuk option Use Specific user name and password. Sebagai contoh silahkan anda lihat tampilan gambar dibawah ini.
   
 
pemulasqlserver000033.png
   
Langkah 9
Untuk menguji koneksi apakah sudah benar atau tidak. Silahkan anda tekan tombol Test Connection. Dan apabila berhasil, maka akan ditampilkan informasi seperti terlihat pada tampilan gambar dibawah ini.
   
 
pemulasqlserver000034.png
   
Langkah 10
Lanjutkan dengan menekan tombol OK.
   
Langkah 11
Tekan tombol OK lagi.
   
Langkah 12
Silahkan anda tekan tombol OK sekali lagi hingga didapatkan tampilan form dari program yang anda buat.
   
Langkah 13
Sekarang silahkan anda lanjutkan dengan menentukan property LoginPrompt dari ADOConnection1 dengan nilai False.
   
Langkah 14
Setelah itu, silahkan anda tentukan kode program didalam event OnClick pada tombol Sambungkan. Isikan kode program didalamnya seperti terlihat pada potongan kode program dibawah ini.
   
 
procedure TForm1.Button1Click(Sender: TObject);
begin
ADOConnection1.Connected := False;
try
ADOConnection1.ConnectionString := ‘Provider=SQLOLEDB.1;‘+
Password=‘+Trim(Edit3.Text)+’;‘+
Persist Security Info=True;‘+
User ID=‘+Trim(Edit2.Text)+’;‘+
Initial Catalog=‘+Trim(Edit1.Text)+’;‘+
Data Source=(local);‘;
ADOConnection1.Connected := True;
on EOleException do
ShowMessage(‘Proses menyambungkan ke database gagal dilakukan’);
end;
end;
   
Langkah 15
Tekan tombol Ctrl + F9 untuk mengecek apakah ada error atau tidak.
   
Langkah 16
Lanjutkan dengan menekan tombol F9.
   
Langkah 17
Setelah itu, tunggu beberapa saat hingga program siap untuk dijalankan.
   
Langkah 18
Tentukan nama databasenya dengan nama Master.
   
Langkah 19
Tentukan nama user dan passwordnya sesuai dengan user yang telah anda register.
   
Langkah 20
Tekan tombol Sambungkan.
   
Langkah 21
Apabila program berhasil, maka program akan terkoneksi dengan database.
   
Langkah 22
Namun apabila gagal, maka akan ditampilkan pesan error seperti terlihat pada tampilan gambar dibawah ini.
   
 
pemulasqlserver000035.png
   
 

pemulasqlserver000036.png

   
Langkah 23
Program sudah selesai anda buat. Sekarang silahkan anda tekan tombol Keluar.
   
Download Klik disini untuk mendapatkan contoh kode programnya
  Klik disini untuk mendapatkan video tutorialnya
   
Buku panduan
Dasar First Step To Be A Programmer
Menengah Pemrograman Database dengan Delphi dan MS SQL Server
Menengah Membangun database MLM
   
 

Kembali

Iklan

Blog di WordPress.com.

%d blogger menyukai ini: