actualizar proyecto de visual y/o .EXE
Publicado por RICARDO (9 intervenciones) el 13/10/2018 03:40:27
Hola a todos
tengo un problema con un archivo .EXE lamentablemente no tengo el código fuente original del archivo, el problema es el siguiente:
en el proyecto de visual encontré lo siguiente:
la verdad no logro entender al 100 la logica de la macro, entiendo que el comando es para ingresar a mi .EXE y el numero 900 son los dias para actualizar el .EXE ya que si ejecuto el programa y cambio la fecha de mi ordenador cuando funcionaba el .EXE el programa funciona pero si actualizo de nuevo a la fecha actual no funciona.
como lo comente antes no cuento con el codigo original y completo del .EXE solo algunas partes ejemplo formularios algunos codigos pero al compilar el proyecto tengo varios errores y algunos formularios no funcionan.
alguien me podra ayudar si es necesario algun archivo para actualizar los dias del .EXE original ya que por lo que he investigado no se puede descompilar un .EXE ya he tratado con varios programas y ninguno me ha funcionado para descompilar.
espero poder contar con su ayuda
muchas gracias
tengo un problema con un archivo .EXE lamentablemente no tengo el código fuente original del archivo, el problema es el siguiente:
en el proyecto de visual encontré lo siguiente:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Option Explicit
Public Sub MakeDir(DirPath As String)
On Error GoTo error
MkDir DirPath$
Exit Sub
error: MsgBox Err.Description, vbExclamation, "Error"
End Sub
Private Sub Form_Load()
FActual = Format(Now, "dd_mm_yyyy_HH_MM")
Dim o As String, p As String, q As String, neo As String
o = "20": q = "18": p = "09"
neo = o & "/" & p & "/" & q
Dim A As Long, b As Long, c As Long
A = Format(Date, "#####"): b = (Format(o & "/" & p & "/" & q, "#####") + 900): c = Format(neo, "#####")
If A > b Then End
If A > c Then If A < (c + 3) Then End
la verdad no logro entender al 100 la logica de la macro, entiendo que el comando es para ingresar a mi .EXE y el numero 900 son los dias para actualizar el .EXE ya que si ejecuto el programa y cambio la fecha de mi ordenador cuando funcionaba el .EXE el programa funciona pero si actualizo de nuevo a la fecha actual no funciona.
como lo comente antes no cuento con el codigo original y completo del .EXE solo algunas partes ejemplo formularios algunos codigos pero al compilar el proyecto tengo varios errores y algunos formularios no funcionan.
alguien me podra ayudar si es necesario algun archivo para actualizar los dias del .EXE original ya que por lo que he investigado no se puede descompilar un .EXE ya he tratado con varios programas y ninguno me ha funcionado para descompilar.
espero poder contar con su ayuda
muchas gracias
Valora esta pregunta
0