FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Servicios de Windows
Si, yo tengo un servidor con windows 2003 server como RAS y entonces pasado un tiempo este serviicio se bloquea y me deja a todos los clientes sin RAS, entonces cuando llego al trabajo me doy cuenta de que esta bloqueado, voy al administrador de servicio , lo reinicio y ya, entonces mi idea es que delphi haga una consulta al servicio, si esta bloqueado, lo reinicie.
Me explique bien, tendras algun ejemplo que me sirva, he visto varios y niguno trabaja. Saludos de antemano Jocey |
#2
|
||||
|
||||
Parar un servicio y reiniciarlo es sencillo en Delphi; Es un tema que ya hemos tratado varias veces y además creo que hay algun truco en la sección de Trucos de clubDelphi donde podrás encontrar en código para hacerlo (sino en algun hilo ya se ha añadido).
En cuanto a saber si un servicio está bloqueado, creo que debes probar a hacer un programa que intente "consumir" de ese servicio; Si el resultado no es el esperado, actuar en consecuencia.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#3
|
|||
|
|||
Servicio con windows
Si, ya he encontrado dos trucos y ninguno me funciona.....
|
#4
|
||||
|
||||
Deberías dar alguna explicación más. En mi caso tengo dos programas que utilizan ese código y funcionan perfectamente parando, arrancando y testeando el estado del servicio.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#5
|
|||
|
|||
Servicio con windows
Eso es lo que necesito un programa que testee el servicio y lo arranque o reinicie en caso de que el servicio este detenido o bloqueado.... no se que mas puedo explicar.... si fueras tan amable.
Saludos |
#6
|
||||
|
||||
Podrías explicar ¿Qué es lo que no funciona? ¿Parar? ¿Arrancar? ¿Que te devuelva el estado?
¿No te compilan los trucos? ¿Sí compilan, pero no ejecutan? ¿Algun error? ¿No funcionan con tu servicio concreto o no funcionan con ninguno? ¿qué llamada estás haciendo? ¿Qué parrémetro pasas para identificar el servicio? ... A eso me refería.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#7
|
|||
|
|||
Servicio con windows
No compilan, por ejemplo este
la parte sudbrayada en rojo, ojo, se que es un cardinal y el valor esta fuera de rango, ahora, asi estaba en el truco que encontre... esto es lo que me pasa |
#8
|
|||
|
|||
Servicio con windows
en este si compila, pero el valor que le subrayo siempre esta en cero....
entonces nunca entra, sale al final de la aplicacion... |
#9
|
||||
|
||||
¿Puedes poner con qué parámetros los llamas?
¿Cómo identificas el servicio?
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#10
|
|||
|
|||
Servicio con windows
en el caso del segundo ejemplo que es el que más se me ajusta:
servicio : Enrutamiento y acceso remoto llamada : StartSrv('Enrutamiento y acceso remoto'); el nombre del servicio lo saque de la consola services.msc. |
#11
|
||||
|
||||
Cita:
Ahora prueba lo mismo que estás haciendo, pero con el Nombre del servicio, no con el nombre a mostrar; A ver qué resultado da.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#12
|
||||
|
||||
Solo una reflexion ... que facil es decir que algo no funciona
|
#13
|
||||
|
||||
Bueno, iba a decir que al ser nuevo en el club (aunque veo que no lo es -con más 100 mensajes-) tal vez no conoce mucho a los integrantes.
De ser así, sabría que los "códigos" de Domingo -Seoane- no suelen fallar ("no funcionar").
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#14
|
|||
|
|||
Servicio con windows
Es verdad tienen razon, es mas facila decir que no funciona y esperar a que te lo haga otro, tendre mas precaucion para la proxima, Gracias
|
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Servicios de Windows | Eklypsex | API de Windows | 3 | 31-10-2008 19:30:13 |
Listar los servicios instalados en Windows XP | fide | API de Windows | 2 | 01-03-2008 17:05:11 |
programar servicios en WINDOWS-XP | jesusid | Servers | 3 | 20-01-2007 02:25:32 |
Servicios en windows vista | seoane | Noticias | 10 | 08-06-2006 02:52:35 |
|