05-11-16, 05:27 AM
السلام عليكم اخواني
اثناء الDecompile لبرنامج exe
وجدت هذا الكود
====================
0069DEB0: Private frmRegister.cmdRegister_Click()
0069DEB6: push __vbaExceptHandler
0069DF2A: call __vbaObjSet ; Set (object)
0069DF4B: call __vbaHresultCheckObj
0069DF54: mov ebx, __vbaStrMove
0069DF66: call mGeneral.Sub_32
0069DF84: call __vbaObjSet ; Set (object)
0069DF8F: call __vbaLateIdCallLd
0069DF99: call __vbaStrVarMove
0069DFA7: call __vbaStrCmp
0069DFC4: call __vbaFreeStrList
0069DFD4: call __vbaFreeObjList
0069DFE0: call __vbaFreeVar
0069E002: call __vbaNew2
0069E027: call __vbaHresultCheckObj
0069E04B: call __vbaHresultCheckObj
0069E063: call __vbaObjSet ; Set (object)
0069E06E: call __vbaLateIdCallLd
0069E078: call __vbaStrVarMove
0069E089: push "Code"
0069E08E: push "Code"
0069E094: push "v4"
0069E099: call __vbaStrCat ; &
0069E0A7: call rtcSaveSetting ; SaveSetting()
0069E0BB: call __vbaFreeStrList
0069E0CB: call __vbaFreeObjList
0069E0D7: call __vbaFreeVar
0069E0FF: mov d,[ebp][XX], "?? ??????? ?????! ???????"
0069E10D: call __vbaVarDup
0069E125: call rtcMsgBox ; MsgBox()
0069E13D: call __vbaFreeVarList
0069E159: call __vbaNew2
0069E177: call __vbaObjSetAddref
0069E19D: call __vbaHresultCheckObj
0069E1A6: call __vbaFreeObj
0069E1BF: call __vbaNew2
0069E21B: push "???????????????????????????????"
0069E222: call __vbaHresultCheckObj
0069E24C: mov d,[ebp][XX], "????? ??????? ?????? ??? ??????? ??? ????????"
0069E25A: call __vbaVarDup
0069E272: call rtcMsgBox ; MsgBox()
0069E28A: call __vbaFreeVarList
0069E2B3: call __vbaFreeStrList
0069E2C3: call __vbaFreeObjList
0069E2DB: call __vbaFreeVarList
ممكن المساعدة في شرحه اكثر او تحويله لـ vb
اثناء الDecompile لبرنامج exe
وجدت هذا الكود
====================
0069DEB0: Private frmRegister.cmdRegister_Click()
0069DEB6: push __vbaExceptHandler
0069DF2A: call __vbaObjSet ; Set (object)
0069DF4B: call __vbaHresultCheckObj
0069DF54: mov ebx, __vbaStrMove
0069DF66: call mGeneral.Sub_32
0069DF84: call __vbaObjSet ; Set (object)
0069DF8F: call __vbaLateIdCallLd
0069DF99: call __vbaStrVarMove
0069DFA7: call __vbaStrCmp
0069DFC4: call __vbaFreeStrList
0069DFD4: call __vbaFreeObjList
0069DFE0: call __vbaFreeVar
0069E002: call __vbaNew2
0069E027: call __vbaHresultCheckObj
0069E04B: call __vbaHresultCheckObj
0069E063: call __vbaObjSet ; Set (object)
0069E06E: call __vbaLateIdCallLd
0069E078: call __vbaStrVarMove
0069E089: push "Code"
0069E08E: push "Code"
0069E094: push "v4"
0069E099: call __vbaStrCat ; &
0069E0A7: call rtcSaveSetting ; SaveSetting()
0069E0BB: call __vbaFreeStrList
0069E0CB: call __vbaFreeObjList
0069E0D7: call __vbaFreeVar
0069E0FF: mov d,[ebp][XX], "?? ??????? ?????! ???????"
0069E10D: call __vbaVarDup
0069E125: call rtcMsgBox ; MsgBox()
0069E13D: call __vbaFreeVarList
0069E159: call __vbaNew2
0069E177: call __vbaObjSetAddref
0069E19D: call __vbaHresultCheckObj
0069E1A6: call __vbaFreeObj
0069E1BF: call __vbaNew2
0069E21B: push "???????????????????????????????"
0069E222: call __vbaHresultCheckObj
0069E24C: mov d,[ebp][XX], "????? ??????? ?????? ??? ??????? ??? ????????"
0069E25A: call __vbaVarDup
0069E272: call rtcMsgBox ; MsgBox()
0069E28A: call __vbaFreeVarList
0069E2B3: call __vbaFreeStrList
0069E2C3: call __vbaFreeObjList
0069E2DB: call __vbaFreeVarList
ممكن المساعدة في شرحه اكثر او تحويله لـ vb