Test povezave s MS SQL Server express 2005

Dbase, sql, paradox in vse drugo kar se tiče baz.
Odgovori
Senad
Prispevkov: 3
Pridružen: 27.03.2007 18:06:30

Test povezave s MS SQL Server express 2005

Odgovor Napisal/-a Senad » 19.12.2007 11:11:46

Poskušam prepričati aplikacijo da najprej preveri če je povezava z serverjem aktivna.

function TestServer: boolean;
var
c: TADOConnection;
begin
c := TADOConnection.Create(nil);
try
c.ConnectionString := 'Provider=SQLOLEDB.1;Password=xxx;Persist Security Info=True;User ID=xx;Initial Catalog=MojaBaza;Data Source=SENAD-PC';
c.LoginPrompt := False;
try
c.Connected := True;
Result := True;
except
Result := False;
end;
finally
c.Close;
c.Free;
end;

in ..

procedure TForm1.FormCreate(Sender: TObject);
begin
if not testserver then
begin
showmessage('Ni povezave s strežnikom !');
exit;
end;
adotable1.Active:=True;
end;

Problem je da mi Delfi sproži debugger exception notification "pred" mojim sporočilom
(in obenem zamrzne aplikacijo).

Se da to rešiti (ali grem na pivo) ? :-)

Senad
Prispevkov: 3
Pridružen: 27.03.2007 18:06:30

Test povezave s MS SQL Server express 2005

Odgovor Napisal/-a Senad » 19.12.2007 11:28:05

rešeno..
zadevo moraš izprobat ven IDE'ja..
(na pivo pa vseeno grem)
T

lizardk
Prispevkov: 11
Pridružen: 08.06.2007 06:34:36

Re: Test povezave s MS SQL Server express 2005

Odgovor Napisal/-a lizardk » 22.02.2012 21:45:40

Bom kar tole tole staro temo uporabil.

Testiram povezavo na MySQL, zadeva deluje kot je napisano že tukaj.
za povezavo uporabljam ZEOS lib.

Ob nezmožnosti povezave na MySQL server, mi vrne aplikacija error:
MySQL error: Can't to MySQL server on 'localhost (10061)'

Aplikacija deluje naprej normalno, kar je tudi uredu. Moti pa me, da za vsak ponovni poizkus dobim na ekran zopet to sporočilo.
Ker komunikacijo preverjam vedno pred vpisom v bazo, je tega v kratkem lahko zelo veliko na ekranu.

Rad bi da se ta error pojavi samo enkrat in če je že prikazan se ne kaže več, razen če si ga potrdil s tipko OK.

Še bolje pa bi bilo, da se sploh ne prikaže, pa sam v aplikacijo dodam neko opozorilo, ki bo signaliziralo, da povezave z bazo ni.

Mogoče kdo ve kako bi to izvedel?

odisej
Prispevkov: 1363
Pridružen: 09.05.2003 12:58:10

Re: Test povezave s MS SQL Server express 2005

Odgovor Napisal/-a odisej » 23.02.2012 07:30:23

Tako, kot je naredil uni zgoraj. Zadevo daš v try except in na except vpišeš opozorilo kamor si želel in greš naprej.

Koda: Izberi vse

try
  vpis v bazo
except
  vpiši opozorilo nekam
end
ostala koda

lizardk
Prispevkov: 11
Pridružen: 08.06.2007 06:34:36

Re: Test povezave s MS SQL Server express 2005

Odgovor Napisal/-a lizardk » 23.02.2012 17:46:41

Ne ne,

to ni to, ker to kot sem omenil dela ok in imam narejeno tako kot napisano.

kakšna druga ideja?

Odgovori