Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 15-08-2003
Masu Masu is offline
Miembro
 
Registrado: jul 2003
Posts: 21
Poder: 0
Masu Va por buen camino
Question Apagar cualquier equipo de una red local??

Hola a tod@s,

tengo una red local con 5 puestos, y quisiera saber como puedo hacer una aplicacion con la cual pueda apagar o reiniciar cualquiera de los equipos de la red desde mi puesto.

A ver si me podeis decir que componentes usar para la conexion, y como seria la llamada para reiniciar o apagar la maquina.

Espero vuestra ayuda.

Gracias.
Responder Con Cita
  #2  
Antiguo 15-08-2003
Masu Masu is offline
Miembro
 
Registrado: jul 2003
Posts: 21
Poder: 0
Masu Va por buen camino
Hola de nuevo,

al parecer con la funcion api InitiateSystemShutdown, se puede apagar cualquier equipo, pero sin embargo mis equipos no lo hacen.

Mi nueva pregunta es, sabe alguien si esta puede usarse en equipos con XP??
Responder Con Cita
  #3  
Antiguo 15-08-2003
Avatar de __hector
[__hector] __hector is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Santo Domingo, Rep. Dom.
Posts: 1.075
Poder: 23
__hector Va por buen camino
Si te sirve, existen herramientas en PSTools (http://www.sysinternals.com/ntw2k/fr.../pstools.shtml), mas concretamente PsShutdown, un ejecutable que desde la consola puede apagar cualquier equipo en la red, o reinciarlo (tiene diferentes switches), siempre y cuando seas admin de red o de la maquina.

Asi, solo tendrias que hacer un shellexecute utilizando el ejecutable con algunos parametros, y voilá
__________________
Héctor Geraldino
Software Engineer
Responder Con Cita
  #4  
Antiguo 15-08-2003
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Poder: 27
delphi.com.ar Va por buen camino
Yo crearía una aplicación pequeña que se conecte por IP con el WinSock y que al recibir X comando apague el equipo. (Si buscas en mi página, hay una app llamada peep machine que hace esto), de esta manera no tendría que liar con los privilegios de los equipos.

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.

Última edición por delphi.com.ar fecha: 13-05-2004 a las 15:21:47.
Responder Con Cita
  #5  
Antiguo 04-05-2004
mrmanuel mrmanuel is offline
Miembro
 
Registrado: may 2003
Posts: 135
Poder: 22
mrmanuel Va por buen camino
Hola a todos,

Yo tambien estoy interesado en el tema y al parecer no soy el único , hay varios hilos relacionados con el tema y en ninguno se termina de concretar ni se informa de si alguien lo ha conseguido hacer y menos como hacerlo jejeje

Alguien puede dejar constancia de tal duda?.....

A lo que dijo HECTOR, (PSTools) no lo he podido probar aun, si lo consigo ya diré algo y si no, seguire dando el coñazo.


Un saludo
__________________
Un Saludo a todos/as
Responder Con Cita
  #6  
Antiguo 13-05-2004
mrmanuel mrmanuel is offline
Miembro
 
Registrado: may 2003
Posts: 135
Poder: 22
mrmanuel Va por buen camino
Hola,

he probado las PsTools y tienen buena pinta, apago perfectamente la máquina desde donde la ejecuto, pero en red no he consguido nada. creo que es por problemas con los permisos administrativos, pero no he probado a fondo.
__________________
Un Saludo a todos/as
Responder Con Cita
  #7  
Antiguo 13-05-2004
Avatar de __hector
[__hector] __hector is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Santo Domingo, Rep. Dom.
Posts: 1.075
Poder: 23
__hector Va por buen camino
Si, debe ser por permisos, y es que no puedes ir apagando las maquinas de la red medalaganariamente, sino que el usuario que utilizes para ejecutar la utilidad tiene que pertenecer a los grupos de administradores de la red (administrators, domain admins, enterprise admins, depende de tu configuracion), o tener los permisos en la maquina especifica en cuestion.
__________________
Héctor Geraldino
Software Engineer
Responder Con Cita
  #8  
Antiguo 14-05-2004
Avatar de DarkByte
DarkByte DarkByte is offline
Miembro
 
Registrado: sep 2003
Ubicación: Desconocido
Posts: 1.322
Poder: 22
DarkByte Va por buen camino
Yo, como delphi.com.ar, me inclino más hacia poner un server en las computadoras y que estén intentando conectaste al servidor, así el servidor tendría una lista completa y podría apagar el que quisiese enviando un comando.

¿Qué tienen que ver los permisos con esto?, no me aclaro, ¿Acaso se debería de evitar que se apagase el pc si el usuario es el Administrador?¿No se podría conseguir eso poniendo en CURRENT_USER en el registro en vez de LOCAL_MACHINE?
__________________
:)
Responder Con Cita
  #9  
Antiguo 14-05-2004
Avatar de __hector
[__hector] __hector is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Santo Domingo, Rep. Dom.
Posts: 1.075
Poder: 23
__hector Va por buen camino
Tiene mucho que ver, y es que parece que has liado los hilos del tema. Yo igual no entiendo cuando mencionas lo de "poner en el registro CURRENT_USER en vez de LOCAL_MACHINE", pero en cuanto a los pstools, utilizan servicios de WINNT para ejecutar acciones en maquinas de la red, tareas de administracion en este caso, y para acceder a las mismas requieres niveles de permisos en el dominio/maquina.
__________________
Héctor Geraldino
Software Engineer
Responder Con Cita
  #10  
Antiguo 14-05-2004
Avatar de DarkByte
DarkByte DarkByte is offline
Miembro
 
Registrado: sep 2003
Ubicación: Desconocido
Posts: 1.322
Poder: 22
DarkByte Va por buen camino
y para qué hacen falta las pstools? esq estoy poco puesto en el tema, pero me parece que poniendo en CURRENT_USER (para evitar cerrar a un administrador, se pondría en todos los usuarios a cerrar)-> Software -> Microsoft -> Windows -> Current Version -> Run la aplicación.

Después, el diseño de la aplicación sería:
Cliente:
-Autoconectar a la ip del servidor
-Esperar respuesta
-Si el comando es APAGA entonces notifico de la recepción y me apago
-Si el comando es REINICIA entonces notifico y a reiniciar se ha dicho.
Servidor:
-Tengo un lista con los clientes conectados
-Cuando se conecta un cliente, refresco
-Cuando el "jefe" escriba en el edit una ip y pulse apagar intento enviar el comando APAGA a esa computadora.
-Si el "jefe" escribe la ip y pulsa REINICIA... manda el comando reiniciar
-Intento capturar la respuesta de recepcion del comando
-Si me responde... aviso, si ha pasado 6 segundos y no hay respuesta, aviso al "jefe" de lo que ha pasado y le pregunto si ha escrito la ip correcta.

Más o menos..., esta podría ser el planteamiento.
__________________
:)
Responder Con Cita
  #11  
Antiguo 27-05-2004
mrmanuel mrmanuel is offline
Miembro
 
Registrado: may 2003
Posts: 135
Poder: 22
mrmanuel Va por buen camino
Jolines como se complica la cosa.

Pensaba que esto sería más facil., de momento a probar la ide de los WinSock, me pelearé e investigaré como se hace.

grcias
__________________
Un Saludo a todos/as
Responder Con Cita
  #12  
Antiguo 27-05-2004
Amilius Amilius is offline
No confirmado
 
Registrado: ene 2004
Posts: 138
Poder: 0
Amilius Va por buen camino
Cita:
Empezado por mrmanuel
Jolines como se complica la cosa.

Pensaba que esto sería más facil., de momento a probar la ide de los WinSock, me pelearé e investigaré como se hace.

grcias
Imagínate si fuera fácil:

"Nuevo virus se extiende por internet apagando máquinas a diestra y siniestra, basta conectarse a internet para correr el riesgo de que su compu se apaque."

Es por eso que hay que tener en cuenta permisos y privilegios que se suponen que deben ser necesarios para apagar una máquina.
Responder Con Cita
  #13  
Antiguo 28-05-2004
Avatar de DarkByte
DarkByte DarkByte is offline
Miembro
 
Registrado: sep 2003
Ubicación: Desconocido
Posts: 1.322
Poder: 22
DarkByte Va por buen camino
Cita:
Empezado por mrmanuel
Jolines como se complica la cosa.
Te prometo que preferiría tener que hacer un programa como ese a volver a pasar por los trimestrales de la escuela , de lejos todo parece difícil, pero recuerda que sólo el conocimiento te hace libre.
Cita:
Empezado por Amilius
Imagínate si fuera fácil:

"Nuevo virus se extiende por internet apagando máquinas a diestra y siniestra, basta conectarse a internet para correr el riesgo de que su compu se apaque."
No es fácil... pero tampoco tan difícil.
Cita:
Empezado por Amilius
Es por eso que hay que tener en cuenta permisos y privilegios que se suponen que deben ser necesarios para apagar una máquina
Sigo pensando que nó, que teniendo un servidor corriendo en la máquina remota y estando ese bien programado, no hay que tener en cuenta los permisos, pensando claro que tengas acceso manual a la máquina para instalar el servidor claro.
__________________
:)
Responder Con Cita
  #14  
Antiguo 28-05-2004
Avatar de __hector
[__hector] __hector is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Santo Domingo, Rep. Dom.
Posts: 1.075
Poder: 23
__hector Va por buen camino
DarkByte, no se cual sea el caso particular del que inicio el hilo, pero suponiendo que se cuenta con muchas computadoras, varias decenas por ejemplo, el tiempo de deployment para instalar la aplicacion receptora, dar mantenimiento a los equipos y la aplicacion, y todas las demas tareas administrativas, asi como la codificacion, se simplifican de una manera soberbiamente grande con el simple hecho de bajar un pequeño ejecutable, y correrlo en el command prompt.

Ahora, si se quiere diseñar una aplicacion, se puede hacer sin ningun problema. Es simple tambien, pero vuelvo y repito que el tiempo de deployment no es igual. Y eso, en algunas empresas, cuenta ($)
__________________
Héctor Geraldino
Software Engineer
Responder Con Cita
  #15  
Antiguo 30-08-2004
Avatar de miguel_fr
miguel_fr miguel_fr is offline
Miembro
 
Registrado: mar 2004
Ubicación: Santiago del estero, Capital
Posts: 73
Poder: 21
miguel_fr Va por buen camino
aver si aporto algo. Yo tambien quiero hacer una aplicacion de este tipo, tengo instalado Windows Xp en todas mis pc, no tienen ninguna cuenta ya que si lo hago algunos juegos no me lo funcionan, es por esto que algunas aplicaciones que estan para descargar no me lo funcionan correctamente debido al permiso que necesito. Yo me hice una aplicacion cliente/servidor usando socket, cambie algunas cosas pero almenos me lo funciona de este modo, les explico:
Pc´s Cliente ----------------- Pc Servidora
(Uso ServerSocket) (Uso ClientSocket)
Ya que mi servidor no esta ejecutandoce siempre, no podia lograr que se logre la conexion correctamente una ves que el servidor se iniciaba despues que los clientes.
Yo ahora pongo a los Pc´s clientes en estado de espera y cuando reciben la señal de conexion por parte del Pc server ejecuto la siguiente linea que me reinicia la pc
Código Delphi [-]
WinExec(PChar('C:\WINDOWS\system32\shutdown.exe -r -t 01'),SW_SHOWNORMAL);
El tema esta en que tengo un juego (RoadRash) que toma todo los recursos y demora mucho tiempo en salirse, es casi imposible salirse al Win, no responde a la tecla de Win y tampoco a Ctrl+Esc, y la famosa Ctrl+Alt+Supr tambien demora su buen rato, Mi pregunta es si alguno de ustedes sabe algun modo de cerrar rapidamente aplicaciones, yo utilice
Código Delphi [-]
Mango:=FindWindow(nil,'ROADRASH');
 if mango<>0 then
  SendMessage(Mango,WM_CLOSE,0,0);
pero se sigue demorando y ademas el win queda clavado a la hora de reiniciarse
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 19:10:17.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi