FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Problemas con Servicios
Estimados colegas quisiera ver si pueden darme una mano con el siguiente problema.-
Estoy escribiendo una aplicacion que funcionara como un servicio en windows, la idea de este servicio es ejecutar otra aplicacion cada cierto tiempo. El problema que tengo que es que una ves que tengo instaldo el servicio y quiero iniciarlo se demora bastante y me arroja el siguiente msg de error: "No se puede iniciar el Servicio de Mantencion Myserv en el equipo local" Error 1053:Elservicio no ha respondido a la peticion o inicio del control en un tiempo adecuado" NOTA: Este Servicio lo probe como una aplicacion normal y funsiona sin problemas Agradeceria cualquier comentario que pudiese darme pistas a resolver este problema.- |
#2
|
||||
|
||||
Cambio de problema
Bueno en realacion al problema que he planteado , el servicio lo instalaba con una funsion que encontre en un foro .
Probe instalar el servicio de forma tradiciona y luego lo inicie sin ningun problema , por lo que creo el error esta en la funsion que estaba usando para instalar el servicio. Manera Tradicional : miservicio.exe -install (modo linea de comandos) Acontinuacion de Detallo la funsion que estaba usando la cual me daba el error al momento de iniciar el servicio..si pueden dar una solucion se los agradeceria bastante. onst svName = 'MySrv'; svDisplayName = 'Servicio de Mantencion Marco Bernal'; procedure TForm1.Button1Click(Sender: TObject); var vSCManager, vServiceCreated: Cardinal; begin vSCManager := 0; vSCManager := OpenSCManager(nil, nil, SC_MANAGER_ALL_ACCESS); vServiceCreated := 0; vServiceCreated := CreateService(vSCManager, svName, svDisplayName, SERVICE_ALL_ACCESS, SERVICE_WIN32_OWN_PROCESS or SERVICE_INTERACTIVE_PROCESS, SERVICE_AUTO_START, SERVICE_ERROR_IGNORE, 'C:\windows\system32\serkll.exe', nil, nil, nil, nil, nil); CloseServiceHandle(vServiceCreated); CloseServiceHandle(vSCManager); end; |
#3
|
||||
|
||||
Espero este enlace te sirva, es una manera alternativa de instalar una aplicación como servicio
http://www.laneros.com/archive/index.php/t-49666.html ... .- .-.. ..- -.. --- ...
__________________
self.free; |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Servicios??? | aeff | API de Windows | 9 | 18-11-2006 11:02:13 |
Servicios Web | Ricardo León | Internet | 4 | 22-09-2005 15:42:36 |
servicios = + problemas!! :( | marceloalegre | Varios | 0 | 12-07-2005 20:59:30 |
Servicios en c# | edgusano | .NET | 1 | 13-04-2005 03:19:05 |
Servicios | arantzal | .NET | 1 | 11-11-2004 14:36:46 |
|