飘云阁

 找回密码
 加入我们

QQ登录

只需一步,快速开始

查看: 3246|回复: 3

[原创] [在VB6程序中寻找控件的事件断点]脚本

[复制链接]
  • TA的每日心情
    擦汗
    2020-7-7 10:06
  • 签到天数: 2 天

    [LV.1]初来乍到

    发表于 2007-10-29 17:41:47 | 显示全部楼层 |阅读模式
    /*
       在VB6程序中寻找控件的事件断点
       programer :SPC_CLL
       Email    :spc_cll@163.com
    */
    var NextStart
    var FindAddr
    var BrkCount

    mov NextStart,eip
    mov BrkCount,0

    NextPoint:
    find NextStart,#816c2404#
    cmp $RESULT,0
    je ExitLoop
    mov FindAddr,$RESULT
    mov NextStart,FindAddr
    add NextStart,8
    add FindAddr,4
    mov FindAddr,[FindAddr]
    cmp FindAddr,0000FFFF
    je NextPoint
    bp NextStart
    inc BrkCount
    jmp NextPoint

    ExitLoop:

    var BreakCount
    cmp BrkCount,0
    eval "没有找到断点"
    je lblShowMsg
    eval "共设置0x{BrkCount}个事件断点"

    lblShowMsg:
    mov BreakCount,$RESULT
    log BreakCount

    ret

    设置VB6事件断点.txt

    607 Bytes, 下载次数: 38, 下载积分: 飘云币 -2 枚

    评分

    参与人数 1威望 +20 飘云币 +20 收起 理由
    tigerisme + 20 + 20 鼓励

    查看全部评分

    PYG19周年生日快乐!
  • TA的每日心情
    奋斗
    2016-10-21 20:30
  • 签到天数: 1 天

    [LV.1]初来乍到

    发表于 2007-10-29 19:06:40 | 显示全部楼层
    先收藏,改天试试效果如何。
    PYG19周年生日快乐!
  • TA的每日心情
    开心
    2 小时前
  • 签到天数: 741 天

    [LV.9]以坛为家II

    发表于 2007-10-30 14:00:19 | 显示全部楼层
    好啊,用这个应该方便些。
    PYG19周年生日快乐!
  • TA的每日心情

    2017-4-9 17:10
  • 签到天数: 4 天

    [LV.2]偶尔看看I

    发表于 2008-7-24 18:30:55 | 显示全部楼层
    很方便.比设API方便多了.
    PYG19周年生日快乐!
    您需要登录后才可以回帖 登录 | 加入我们

    本版积分规则

    快速回复 返回顶部 返回列表