Tips (1541)

Tip Rating (13):

procedure TForm1.Button1Click(Sender: TObject);
begin
  ADOConnection1.ConnectionString := 'Server=Hostname;DataBase=DatabaseName';
  ADOConnection1.Open('UserName', 'Password');
  ADOConnection1.Connected := True;
end;


{* For Any Information Mail Me *

Mail : Mostafa@Touska.Co.ir0