论坛 › 技巧探讨 › 动态破解UltraEdit的过期提示

Golden Blonde 发表于 2014-12-21 02:55:15

动态破解UltraEdit的过期提示

UE是根据系统时间来判断试用期是否结束的，如果结束的话，就会弹出一个“模态对话框”，阻挡你使用。
于是直接用VB6写几行代码突破即可。
Private Declare Function GetParent Lib "user32.dll" (ByVal hwnd As Long) As Long
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function ShowWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Declare Function EnableWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal fEnable As Long) As Long
'//需要去掉《快速入门指南》的“启动时显示”的钩
Sub main()
    Dim w1 As Long, w2 As Long
    w2 = FindWindow("#32770", "试用期结束") ': MsgBox w2, , "w2"
    w1 = GetParent(w2) ': MsgBox w1, , "w1"
    ShowWindow w2, 0
    EnableWindow w1, 1
End Sub从此之后可以无限期“试用”UE了。如果把这坨代码放到TIMER里，编译成EXE随机启动，那么就跟静态破解UE没啥区别了。

KxIX 发表于 2014-12-21 02:58:30

0xAA55 发表于 2014-12-21 02:58:45

哈哈 真是简单粗暴。相比较Office就比较不好破解了。

Golden Blonde 发表于 2014-12-21 03:03:22

624322077 发表于 2014-12-21 02:58
直接破解不是更好吗

人家破解的BIN你放心在HOST上用吗？？？

Golden Blonde 发表于 2014-12-21 03:04:06

0xAA55 发表于 2014-12-21 02:58
哈哈 真是简单粗暴。相比较Office就比较不好破解了。

多半是UE公司根本不在乎这个。。。
不过又有人说中文UE是唯一有网络验证的，呵呵，不懂了。。。

cyycoish 发表于 2014-12-21 23:26:15

{:soso_e113:}我之前用ph来激活窗体

xiawan 发表于 2022-5-13 16:37:09

非常感谢~~支持~~~

查看完整版本: 动态破解UltraEdit的过期提示