Ir al contenido


Foto

Como controlar los videos que se ejecuten en la PC?


  • Por favor identifícate para responder
27 respuestas en este tema

#21 escafandra

escafandra

    Advanced Member

  • Administrador
  • 4.107 mensajes
  • LocationMadrid - España

Escrito 05 julio 2011 - 05:13

Felicidades JoAnCa y muchas gracias a escafandra, realmente son éstas las cosas que hacen que valga la pena seguir adelante con una comunidad.



En realidad son los pequeños gestos, como éste tuyo y otros muchos, los que animan a seguir participando activamente y con entusiasmo en DA.


Saludos.
  • 0

#22 JoAnCa

JoAnCa

    Advanced Member

  • Miembro Platino
  • PipPipPip
  • 775 mensajes
  • LocationPinar del Río, Cuba

Escrito 07 julio 2011 - 09:21

De nuevo aqui "asediando" a escafandra

Amigo estuve leyendo este hilo tuyo y se me ocurrio la idea de combinarlo con el bloqueador de videos, pero como necesita las DLL, tendria que copiarlas tambien en el equipo remoto.
Segun vi, solo puedo copiar un archivo que sera ejecutado como servicio al momento de copiarse

Seria posible copiar tambien esas DLL para que funcione el videolock?

Disculpa por molestarte tanto  :embarrassed:



  • 0

#23 escafandra

escafandra

    Advanced Member

  • Administrador
  • 4.107 mensajes
  • LocationMadrid - España

Escrito 07 julio 2011 - 09:48

...Amigo estuve leyendo este hilo tuyo y se me ocurrio la idea de combinarlo con el bloqueador de videos, pero como necesita las DLL, tendria que copiarlas tambien en el equipo remoto.
Segun vi, solo puedo copiar un archivo que sera ejecutado como servicio al momento de copiarse

Seria posible copiar tambien esas DLL para que funcione el videolock?...


Por supuesto que se puede. En ese hilo realizo la copia de dos archivos, el miniservicio y el ejecutable, pero puedes copiar cuantos quieras:



delphi
  1.   if NO_ERROR <> WNetAddConnection2(NetResource, PCHAR(E_PassWord.Text), PCHAR(E_UserName.Text), CONNECT_UPDATE_PROFILE) then
  2.   begin
  3.       SHCopy(Path + 'MiniServicio.exe', '\\' + E_Remote.Text + '\' + ComboBox1.Text + '\MiniServicio.exe');
  4.       SHCopy(E_File.Text, Target);
  5.  
  6.     // Sigue copiando archivos.....
  7.  
  8.       if ComboBox1.Text = 'C$' then Sv:= 'C:\'
  9.       else if ComboBox1.Text = 'D$' then Sv:= 'D:\'
  10.       else if ComboBox1.Text = 'ADMIN$' then
  11.       begin
  12.         GetEnvironmentVariable('WINDIR', Buffer,  MAX_PATH);
  13.         Sv:= String(Buffer) + '\';
  14.       end;
  15.       Sv:= Sv + 'MiniServicio.exe ' + ExtractFileName(E_File.Text);
  16.       LoadService('\\' + E_Remote.Text, Sv);
  17.       DeleteFile('\\' + E_Remote.Text + '\' + ComboBox1.Text + '\MiniServicio.exe');
  18.   end;
  19.   WNetCancelConnection2('M:', CONNECT_UPDATE_PROFILE, true);



También puedes usar  psexec de sysinternals en línea de comandos.

Esto ya me suena a Hackear toda una red... :p :D :D :D



Saludos.
  • 0

#24 JoAnCa

JoAnCa

    Advanced Member

  • Miembro Platino
  • PipPipPip
  • 775 mensajes
  • LocationPinar del Río, Cuba

Escrito 07 julio 2011 - 11:40

Esto ya me suena a Hackear toda una red...   


No, no voy a llegar a tanto,  *-) pues es mi propia red y no le voy a hacer daño  *-) :D


Lo que estaba buscando era la comodidad de no tener que ir a instalar el videolock en cada PC de la red, si de esta forma lo puedo hacer sin levantarme de mi puesto es mucho mejor  :D (y) |-)


Lo estuve ensayando con mi primera idea, un reproductor que solo reproduce en su ubicacion y crea un log, y me funciono bien (lo de copiarlo y ejecutarlo)

Pero necesito que me expliques que es lo que sucede en el equipo remoto, no entiendo muy bien pues el tema es completamente nuevo para mi

se que se esta ejecutando porque lo escribio en el log, pero no lo veo en la lista de procesos (del usuario SYSTEM debe ser?)
Tampoco vi en los servicios alguno que se llamara miniservicio o el nombre mi aplicacion

El soft se ejecutara siempre que el usuario inicie sesion?

Si quiero detener el servicio como haria?

Disculpa tantas preguntas  ;)



  • 0

#25 escafandra

escafandra

    Advanced Member

  • Administrador
  • 4.107 mensajes
  • LocationMadrid - España

Escrito 07 julio 2011 - 12:06

MiniServicio se ejecuta sólo para lanzar el programa que quires ejecutar, luego muere y es eliminado del directorio Windows\System32\. El programa lanzado se ejecuta en modo SYSTEM. Esto no siempre es bueno. Desde ese modo, la interacción con el escritorio puede estar limitada y en este caso concreto la inyección de dll se producirá en los procesos system, pero no en el usuario.

La solución pasa por conficurar el registro de windows para que se ejecute VideoLock al inicio y reiniciar el sistema. Esta opción se debe hacer de todas formas, lo haces con un programa auxiliar si quieres o con parámetros en línea de comandos de VideoLock.


delphi
  1. HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run



Otra solución sería usar "ejecutar como", tal como lo muestro aquí.


Saludos.
  • 0

#26 JoAnCa

JoAnCa

    Advanced Member

  • Miembro Platino
  • PipPipPip
  • 775 mensajes
  • LocationPinar del Río, Cuba

Escrito 07 julio 2011 - 01:18

Vaya, que cada vez esto se me pone mas interesante  ;)

Seguiré experimentando a ver al final como me queda  *-)
  • 0

#27 escafandra

escafandra

    Advanced Member

  • Administrador
  • 4.107 mensajes
  • LocationMadrid - España

Escrito 07 julio 2011 - 03:33

Vaya, que cada vez esto se me pone mas interesante 

Seguiré experimentando a ver al final como me queda 



Los retos, cuando se salen de lo común, son verdaderos desafíos y eso es lo que los hace interesantes. En DA tienes muchas pinceladas, repartidas en varios hilos, capaces de darte muchas soluciones y sobre todo de estimular el apetito... *-)




Saludos.
  • 0

#28 escafandra

escafandra

    Advanced Member

  • Administrador
  • 4.107 mensajes
  • LocationMadrid - España

Escrito 20 diciembre 2016 - 05:14

Para los que quieran ejecutar esto en Win10 han de tener en cuenta lo publicado aquí: Hook a la API CreateProcessInternalW en Win10



Saludos.


  • 1




IP.Board spam blocked by CleanTalk.