Datenbankzugriff über einen Dienst

k6_2

Hallo,

ich möchte über einen Dienst von Zeit zu Zeit Daten aus einer Datenbank auslesen. Als EXE-Programm geht das auch prima. Mache ich einen Dienst daraus, funktioniert der Verbindungsaufbau zur Datenbank nicht mehr.

Wie kann ich dieses Problem lösen? Ich poste mal ein paar Zeilen Quelltext mit ...

Diese Methode wird auch ausgeführt, doch bei ADOConnection1->Connected = true;
ist dann schluss (exception) die Verbindung wird nicht aufgebaut.

void __fastcall TMyService::Timer1Timer(TObject *Sender)
{

...
// Send SQL command

ADOConnection1->Connected = true;

ADOQuery1->Active = false;
fputs("setze adoquery false\n", stream);

ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Append("select * from ...')");
ADOQuery1->Active = true;

...
}

schon mal vielden Dank k6_2

Peter

Konfigurier Deinen Dienst so (Verwaltung -> Dienste), daß er sich nicht ans lokale Systemkonto anmeldet, sondern an ein Benutzerkonto.

k6_2

... also da hab ich nun wirklich nicht daran gedacht.

DANKE