Mensajes

[EHR]

Yo dije que no me iba de elhacker.net y lo sostengo, no voy a enviar mi solicitud a EHN. Cree una alianza como la otra para todos los que se quieran unir, yo me quedo donde estaba.

Etiqueta: EHR
Nombre: elhacker.net Reloaded

Saludos.

Para los archivos de texto no se usa el modo Binary, para editar linea por linea un archivo de texto usa el modo Random, que te permite escribir y leer al mismo tiempo.

Saludos.

El objeto App tiene todas las propiedades del programa, la descripción, versión, Nombre de la compañía, etc.

La propiedad FileDescription te da la descripción del programa en tiempo de ejecución.

Saludos.

Manda la solicitud que la acepto.

Saludos.

Quedamos así, más de 1500 puntos y los pongo de Oficial Superior . Más de 500 Oficial, y más de 50 Recluta.

Vamos que es un buen incentivo, tienen más privilegios .

Saludos.

[File Transfer Protocol]

Leete el RFC de FTP. Te dejo el link del RFC en español.

File Transfer Protocol

Saludos.

Código [Seleccionar] Expandir


Private Sub multiplicar()
dim i as long
i = 375&*455&
Label1.Caption = i
End Sub


Agregale el identificador de Long luego del número, sino lo toma como Integer y se produce un overflow.

Saludos.

reydelmundo11 eso se puede ver con el bloc de notas cuando se compile el programa.

Lo mejor es crear una función que genere un hash a partir de la contraseña, y luego cuando se ingresa la contraseña es generar el hash correspondiente al pass ingresado y compararlo con el guardado.

Te dejo un código de ejemplo:

Código [Seleccionar] Expandir


Function GetChecksum(Data As String) As Currency
  On Error Resume Next
 
        Dim iChar%, iPrevChar%
        Dim lLen&, i&
        Dim cChecksum@

  lLen = Len(Data)
  If lLen > 46000 Then Exit Function
 
  For i = 1 To lLen
    iChar = Asc(Mid$(Data, i, 1))
   
    cChecksum = (cChecksum + ((iChar Xor (i * lLen)) * ((iPrevChar * i) Xor ((lLen Mod i) ^ 2))))
   
    iPrevChar = iChar + (i Xor lLen)
  Next
 
  GetChecksum = cChecksum
End Function


Entonces primero haces que establezca la contraseña, le pasas la cadena a la función GetChecksum y guardas el número que te  generó en un archivo, luego cuando la quieras verificar llamas a la función GetChecksum pasandole la contrasña que ingresó el usuario, y si el número que generó es igual al que está guardado en el archivo significa que es la misma contraseña.

Saludos.

[GetExitCodeProcess]

Para verificar si sigue activo usa la función GetExitCodeProcess pasandole el handle al proceso que querés verificar, si el código de salida es STILL_ACTIVE (259) significa que no lo pudo cerrar.

Saludos.

El código lo escribi yo y no está incompleto, WriteProcessMemory está ahi por costumbre porque la librería win.tlb no trae ni ReadProcessMemory ni WriteProcessMemory y a esas funciones las uso muuuy seguido.

Saludos.