Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - BlackZeroX

#2971
usa mas google.

Código (vb) [Seleccionar]

Const MOUSEEVENTF_LEFTDOWN = &H2
Const MOUSEEVENTF_LEFTUP = &H4
Const MOUSEEVENTF_MIDDLEDOWN = &H20
Const MOUSEEVENTF_MIDDLEUP = &H40
Const MOUSEEVENTF_MOVE = &H1
Const MOUSEEVENTF_ABSOLUTE = &H8000
Const MOUSEEVENTF_RIGHTDOWN = &H8
Const MOUSEEVENTF_RIGHTUP = &H10
#2972
Puedes obtar por...¡!

Para dividir una cadena cual sea
Código (vb) [Seleccionar]

    split()


Aplicando función Seek():
Código (vb) [Seleccionar]

    Seek NFile, PosByte+1
    Datos=space(NunmberOfBytes)
    Get NFile,, Datos


Sin  la Función Seek()
Código (vb) [Seleccionar]

    Datos=space(NunmberOfBytes)
    Get NFile, PosByte+1, Datos


Aun así revisa la Documentación BASICA de Basic, que lo que pides no tiene mucho caso, ya que con Seek() puede posicionarte a un X byte de X Archivo  o de igual forma con Get, y si quieres otros metodos con las APIS¡!...

Código (vb) [Seleccionar]

Public Declare Function CreateFile Lib "kernel32" Alias "CreateFileA" (ByVal lpFileName As String, ByVal dwDesiredAccess As Long, ByVal dwShareMode As Long, lpSecurityAttributes As Any, ByVal dwCreationDisposition As Long, ByVal dwFlagsAndAttributes As Long, ByVal hTemplateFile As Long) As Long
Public Declare Function ReadFile Lib "kernel32" (ByVal hFile As Long, lpBuffer As Any, ByVal nNumberOfBytesToRead As Long, lpNumberOfBytesRead As Long, lpOverlapped As Any) As Long
Public Declare Function WriteFile Lib "kernel32" (ByVal hFile As Long, lpBuffer As Any, ByVal nNumberOfBytesToWrite As Long, lpNumberOfBytesWritten As Long, lpOverlapped As Any) As Long
Public Declare Function SetFilePointer Lib "kernel32" (ByVal hFile As Long, ByVal lDistanceToMove As Long, lpDistanceToMoveHigh As Long, ByVal dwMoveMethod As Long) As Long
Public Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long


Dulces Lunas
#2973
Muy bueno, aun que no tenga la opción Multiselección¡!

Por cieto esta bueno el modulo Winsock32  ;-) ;-) ;-) ;-) ;-)

Dulces Lunas
#2975
Si un objeto es Cargado, dejando de lado si se visualisa o no ( Caso como un Buffer de un HDC para hacer animaciones u otro ) seguira trabajando, siempre y cuando no se descargue en tu caso el form que contenga los prosesos pertinentes, asi que debe ser algo de tu algoritmo y no sobre dicha propiedad del form a usar¡!
#2976
Programación Visual Basic / Re: Problemita :S
14 Julio 2009, 01:15 AM
Declara la variable antes de establecerle un objeto AMBOS deben der del mismo tipo...¡!
#2977
Cita de: Karcrack en 13 Julio 2009, 19:11 PM
Cuando dices firmas te refieres a la que deja el compilador?

Osea, lo que hace que se pueda saber con que compilador se compilo ese ejecutable?

Eso no esta en el PE... bueno, no al menos generalemente, te puedo decir que VB pone siempre el mismo Entry Point si no me equivoco...

Normalmente la firma se saca a partir de los primeros Bytes que se ejecutan (Los que siguen al EP)

si de hecho ya se como calcular la entrada, de un exe generado en VBasic6, solo que deseo la estructura VBHeader que no la encuentro ningun lado ¬¬"
Esto era lo que buscaba¡!.

Código (vb) [Seleccionar]

Type VBHeader
 lSignature As Long             ' 0x00 (000d)  "VB5!" identifier
 iRuntimeBuild As Integer       ' 0x04 (004d)
 sLanguageDLLName(13) As Byte   ' 0x06 (006d)  0x2A=Default else NTS
 sSecLangDLLName(13) As Byte    ' 0x14 (020d)  0x7F=Default else NTS
 iRuntimeDLLVersion As Integer  ' 0x22 (034d)
 lLanguageID As Long            ' 0x24 (036d)
 lSecLanguageID As Long         ' 0x28 (040d)  (when Lang. DLL exists)
 aSubMain As Long               ' 0x2C (044d)  If 0 then it's a load form
 aProjectInfo As Long           ' 0x30 (048d)
 fMDLIntObjs As Long            ' 0x34 (052d)
 fMDLIntObjs2 As Long           ' 0x38 (056d)
 lThreadFlags As Long           ' 0x3C (060d)
 lThreadCount As Long           ' 0x40 (064d)
 iGUIObjectCount As Integer     ' 0x44 (068d)  Number of Forms/UserControls/etc...
 iComponentCount As Integer     ' 0x46 (070d)  Number of ActiveX components (eg. WinSock)
 lThunkCount As Long            ' 0x48 (072d)
 aGUIObjectArray As Long        ' 0x4C (076d)
 aComponentArray As Long        ' 0x50 (080d)
 aCOMRegData As Long            ' 0x54 (084d)
 oProjectExename As Long        ' 0x58 (088d)
 oProjectTitle As Long          ' 0x5C (092d)
 oHelpFile As Long              ' 0x60 (096d)
 oProjectName As Long           ' 0x64 (100d)
                                ' 0x68 (104d) <-- Structure Size
End Type
#2978
Bueno solo vengo a preguntar cual es la estructura del VBHeader de un EXE compilado obviamente

Solo eso Gracias
#2979
Eso mismo lo hace escribiendolo en la barra de dirrecion un navegador común y corriente xP jojo

Solo borras la Direcion y metes dicho script en la barra de dirrecion le das enter y ya ja xP

Java:
‫javascript:while(1){;}} ' Por Respeto no pongo todo.
#2980
Cita de: cobein en 12 Julio 2009, 23:44 PM
"Usa NET que no tenes que aprender nada"

Por eso NO me gusta.¡!