Help me decompiler this program?

VB Decompiler / VB decompiling Forum / Help me decompiler this program?

Author	Message
hoangkk Member	Posted: 11 Jan 2010 11:33:58 Help me decompiler this program? http://www.mediafire.com/?nygkxonnjiq I use ver pro to decompiler this file and I recive like : Public Function FCheck() '11013180 loc_110131A2: var_C = "" loc_110131A5: var_8 = 11001540h loc_110131AC: edi = "" loc_110131AE: var_4 = "" loc_110131B7: call Me.AddRef 'Ignore this(edi, esi, arg_8) loc_110131C5: var_18 = "" loc_110131C8: var_28 = "" loc_110131CB: var_38 = "" loc_110131CE: var_48 = "" loc_110131D1: var_58 = "" loc_110131D4: var_68 = "" loc_110131D7: var_78 = "" loc_110131DA: var_8C = "" loc_110131E2: var_38 = Trim(arg_C) loc_110131EC: var_38 = arg_C loc_110131F7: var_18 = var_38 loc_11013200: call undef 'Ignore this '__vbaFreeVar(var_38) loc_11013211: var_30 = 1 loc_11013218: var_38 = 2 loc_1101321F: var_70 = var_18 loc_11013222: var_78 = &H4008 loc_1101322F: Len(var_18) = Len(var_18) - 00000001h If Err.Number <> 0 Then GoTo loc_1101333D loc_11013241: var_48 = Mid$(, Len(var_18), var_38) loc_1101324D: var_58 = Chr(9) loc_1101325B: Var_Ret_1 = (var_48 <> var_58) loc_11013272: call undef 'Ignore this '__vbaFreeVarList(var_58) If Var_Ret_1 = edi Then GoTo loc_110132C8 loc_110132B0: system.var_8C = PropBag.ReadProperty(system.Width = %x1, edi) loc_110132CD: GoTo loc_110132FA If = 0 Then GoTo loc_110132DE loc_110132D8: call undef 'Ignore this '__vbaFreeVar(11013304h) loc_110132DE: loc_110132F0: call undef 'Ignore this '__vbaFreeVarList(var_68) loc_110132F9: Exit Sub loc_110132FA: loc_110132FD: var_18 = "" loc_11013303: Exit Sub loc_1101330A: call Me.Release 'Ignore this loc_1101333A: Exit Sub loc_1101333D: End Function This file was pacth with another program? Can you give me full source code
GPcH Admin	Posted: 11 Jan 2010 21:48:50 Quoting: hoangkk I use ver pro to decompiler this file and I recive like Please contact us via Email and attach your license information.