房友软件注册码暴力输入程序

哥的电脑被盗,房友软件需要重新安装,一如既往的安装发现:

神奇的房友软件在使用IP地址访问的时候,需要输入一个啥注册码,

神奇的注册码正好只是6位数字,我费力的写了一个自动输入软件并在2个小时就完成注册,

突然发现使用机器名登陆,根本不用注册码,

我心都悔足了,算了,就当我重新学习windows的消息机制吧.

var

windowsHandle,errDlghandle : integer;

procedure TForm1.BitBtn1Click(Sender: TObject);
var
hd2,hdtext,hdbutton : integer;
//窗口句柄, 注册码确定按钮
ii,k,j : integer;
tmpstr : string;
dt : tdatetime;

function   callbackproc(H:HWnd;lparam:longint):Boolean;stdcall;
var
      str:array   [1..255]   of   char;
      ii : integer;
begin
    getclassname(h,@str,255);
    if   (strpas(@str)='#32770') and (GetWindow(h, GW_OWNER)=windowsHandle )   then

begin
      errDlgHandle := h;
      result:=false;
      exit;
    end;
    result:=true;
end;
begin
  windowsHandle := findwindow(nil,'验证码验证');
//找框架
j := findwindowex(windowsHandle,0,'ThunderRT6Frame',nil);
  //找机器码
k := findwindowex(j,0,'ThunderRT6TextBox',nil);
//找到目标控件
hdtext := getwindow(k,GW_HWNDNEXT);
//查找确定按钮
hdbutton := findwindowex(windowsHandle,0,'ThunderRT6CommandButton','确定');
if windowsHandle <= 0 then exit;
for ii := 120263 to 999999 do
begin
    tmpstr := '';
    if ii > 99999 then tmpstr := inttostr(ii)
    else if ii < 10 then tmpstr := '00000' + inttostr(ii)
    else if ii < 100 then tmpstr := '0000' + inttostr(ii)
    else if ii < 1000 then tmpstr := '000' + inttostr(ii)
    else if ii < 10000 then tmpstr := '00' + inttostr(ii)
    else if ii < 100000 then tmpstr := '0' + inttostr(ii);
    //输入验证码
    self.Caption := '输入验证码' +tmpstr;
    //设置文本
    sendmessage(hdtext,WM_SETTEXT,256,integer(tmpstr));
    //按下确定按钮
    postmessage(hdbutton,bm_click,0,0);
    //查找错误对话框 errDlghandle
    errDlghandle := 0;
    Enumwindows(@callbackproc,0);
    while errDlghandle = 0 do
    begin
      form1.Memo1.Lines.add('请检查是否注册码就是:' + tmpstr + '(如果不是,请手动点击确定按钮)');
      application.ProcessMessages;
      Enumwindows(@callbackproc,0);
      postmessage(hdbutton,bm_click,0,0);
    end;
    //关闭错误对话框
    sendmessage(errDlghandle,WM_CLOSE,0,0);
end;

end;

房友软件注册码暴力输入程序相关推荐

基于RSA算法实现软件注册码原理初讨
https://blog.csdn.net/larryliuqing/article/details/7457200 前言目前,商用软件和共享软件绝大部份都是采用注册码授权的方式来保证软件本身不被盗 ...
Mac 常用软件注册码
注册码quicktime7.1.5 注册码: name: Pablo/nop serial: SMH2-6F4K-8SK9-ST5W-QKU3 Final Cut Pro 5.1正式安装 ...
淘宝网携手富友软件助力时尚行业电子商务营销
2011年3月29日,由淘宝网和北京维富友科技发展有限公司主办的"时尚行业淘宝营销"高峰论坛,在白沟隆重举行.这场聚集众多时尚企业高层的高端峰会赢得业界人士的强烈关注. 会议主要围 ...
房友系统连接不上服务器,房友系统服务器地址
房友系统服务器地址内容精选换一换虚拟IP地址用于为网卡提供第二个IP地址,同时支持与多个弹性云服务器的网卡绑定,从而实现多个弹性云服务器之间的高可用性.登录管理控制台.选择"计算 &g ...
房源管理系统房源系统房源源码房友房在线鼎尖易遨房源管理系统
房源管理系统房源系统房源源码房友房在线鼎尖易遨房源管理系统
房友系统服务器怎么看,房友系统服务器地址
房友系统服务器地址内容精选换一换当创建文件系统后,您需要将文件系统挂载至云服务器上,在为root用户创建一个本地目录.如已成功挂载文件系统,可跳过此章节.请记录步骤4的本地目录后,按照为每个用户 ...
房友一直显示连接服务器,房友中介连接服务器设置
房友中介连接服务器设置内容精选换一换本节操作介绍如何在Windows操作系统的本地主机上使用FTP上传文件到云服务器.已在待上传文件的云服务器中搭建 FTP 服务.如果您的云服务器为 Windo ...
破解各种软件注册码【申明：来源于网络】
破解各种软件注册码[申明:来源于网络] 地址:http://wenku.baidu.com/link?url=m6K81YIHFGSbjhs4R-hj1fVBNjg4_vlXvG01WDYzrVT4_ ...
房友系统数据连接服务器地址,房友中介连接服务器设置
房友中介连接服务器设置内容精选换一换华为云提供两种连接方式通过SQL Server客户端连接实例:非SSL连接和SSL连接.其中,SSL连接实现了数据加密功能,具有更高的安全性.安装SQL Se ...
C# 生成软件注册码
C# 生成软件注册码今天早上,花了一个早上弄了个生成机器码和注册码的Demo,通过生成的注册码里面包含时间信息,保证了注册码在使用后的指定时间后失效由于数学不行所以写的比较简单,ok 上代码吧产 ...

房友软件注册码暴力输入程序

房友软件注册码暴力输入程序相关推荐

最新文章

热门文章