Programa que trabaje como servicio

[dbzap]

Hola a todos.
Existira alguna forma de dejar un EXE tipo "servicio" en la charola de XP. ?
Cualquier ayuda bien recibida.
Saludos

[Baxajaun]

dbzap,

mira en http://www.fermu.com/content/view/263/2/lang,es/

Saludos,

Baxajaun

[R.F.]

Ostras Felix, justo hoy estaba por ponerme con eso, me ha venido como anillo al dedo. ¿ que tal esta Gorka ? hace un monton que no se sabe nada de ti

[Raymundo Islas M.]

Hola a todos

Aqui les dejo un link para bajar un archivo que explica todas y cada una de las formas para ejecutar una app, esta muy interesante.


http://hyperupload.com/download/02bb8dc ... !.htm.html


Es una documentacion por parte de Darío Hernán Irigaray que tenia por ahi

Espero les sirva, ( estoy casi seguro que asi sera )

Saludos

[Raymundo Islas M.]

Sobese !!! no sirve el link !!!

Quizas por que estaba o muy largo el nombre o por que era una pagina html, ya lo pase a texto y aqui esta el nuevo link ..


http://hyperupload.com/download/029d9e2 ... p.txt.html


sorry, fue sin querer queriendo


Saludos

[Baxajaun]

Hola Rene,

como puedes ver sobrevivo , ahora con Gorka (ya 7 años) y Sara (3 añitos el 29 de este mes). Intentando huir del mundanal ruido .

Un abrazo,

Felix

[dbzap]

Gracias a todos para su orientacion.
Saludos

[Baxajaun]

Buenas,

de http://www.tacktech.com/display.cfm?ttid=197 os podéis descargar las aplicaciones INSTSRV.EXE y SRVANY.EXE del kit de recursos, necesarias para poder ejecutar una aplicación como servicio.

Saludos,

Félix

[Antonio Linares]

Publicado por Maurilio en estos foros:

Code: Select all  Expand view

#include "FiveWin.ch"
//-------------------------
Function Main()
//-------------------------

ServiceProcess(1)

---- Tu codigo aqui


Return NIL


//------------------------------
Function ServiceProcess( mode )
//------------------------------
Local nProcessId := 0

Default mode := 0

nProcessId := GCP( )

If Abs( nProcessId ) > 0
    RSProcess( nProcessId, mode )

Endif

RETURN

//----------------------------------------------------
DLL32 FUNCTION RSProcess(npID  AS LONG ,;
                         nMode AS LONG ) AS LONG ;
      FROM "RegisterServiceProcess" LIB "kernel32.DLL"
//----------------------------------------------------

//----------------------------------------------------
DLL32 FUNCTION GCP() AS LONG;
      FROM "GetCurrentProcessId" LIB "kernel32.dll"
//----------------------------------------------------


Que la opción de búsqueda en estos foros está para algo...

[Baxajaun]

Antonio,

tienes razón la opción de búsqueda está para algo

Saludos,

Felix

[JmGarcia]

Y digo yo...

Puedo manejar el envio de correos desde un programa ejecutado como servicio y sin estar logeado nadie.