Mega Code Archive
Connect To Sql Server 2000
<![CDATA[
Title: Connect To Sql Server 2000 ?
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
]]>