Фигня какая-то твориться. Делаю сервис. Перед тем, как перенести все на него отладил в обычной прикладухе функциональные блоки. Т.в. при переносе на сервис возникла совершенно не предвиденная проблема есть строка конекта с ADO
Log('Start');
CoInitialize(nil);
try
adocnct := TADOConnection.Create(self);
adocnct.Provider := 'MSDASQL.1';
adocnct.ConnectionString := 'Provider=MSDASQL.1;Persist Security Info=True;Extended Properties="DSN=Excel Files;DBQ=D:\080119_G.XLS;DefaultDir=D:\;DriverId=790;MaxBufferSize=2048;PageTimeout=5;"';
adocnct.Connected := true;
except
on E: Exception do
begin
Started := false;
Log(e.Message);
end;
end;
Log('Excel ok');
В дизайнере коннект проходит, в обычном приложении тоже, а в сервисе дает ошибку:
[Microsoft][Диспетчер драйверов ODBC] Источник данных не найден и не указан драйвер, используемый по умолчанию
Причем в нем же есть коеннект с SQL сервером и все ok.
Что ему нужно?