Arsip: Atasi gagal koneksi dengan ADOConnection

Memang seringkali kita takut dengan hal ini, ketika program aplikasi yang kita buat dioperasikan oleh orang awam yang tidak mengetahui solusi ketika server databasenya sedang tidak aktif.

Namun, sekarang temen-temen tidak usah khawatir dengan hal tersebut, karena disini saya akan memberikan tips untuk menangkap error yang diakibatkan oleh ADOConnection yang gagal ketika melakukan koneksi ke database server.

Silahkan temen2 ikuti langkah-langkah berikut ini :

1. Tambahkan library ComObj didalam uses dari program anda.

unit Unit1; interface uses ComObj, Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) private ... Syntax Highlighted with https://pascal-id.org/syntax

2. setelah itu, silahkan anda mencoba konek ke database server, dengan catatan connectionstring dari ADOConnection sudah anda tentukan.
contoh koneksi ke database server

with ADOConnection1 do Try Connected := True; except on EOleException do begin MessageDlg('Koneksi gagal, silahkan anda ulangi sekali lagi',MtInformation,[mbOK],0); end; end; Syntax Highlighted with https://pascal-id.org/syntax

Catatan :
Ketika anda tidak menambahkan library ComObj pada uses, maka anda tidak dapat memanggil exception EOleExceptionOleh karena itu, jangan sampai lupa untuk menambahkan library ComObj pada uses.

semoga teknik ini bisa membantu temen-temen yang ingin belajar database dengan menggunakan Delphi