有关KISALLINONE免费及正式授权写狗版

佳软软件

lk734253121 发表于 2012-12-11 10:05
我用的也是专业版的，最近也出现了数据恢复问题，好再时常用U盘备份，花了10个锭买了专业版得SQL恢复语句， ...

这个在SQL 的查询分析器中执行，SQL 语句是还原了库存单据分录表。

chenxtys

我也中招了，谢谢楼主，不过我用的专业版，还没有恢复数据，

mr2006

我想问一下楼主，此ALLONE的作者在几年前曾开发一些破解如下图，想知道一下有无二次加密？？？？？？？？？

mr2006

你放出来的原代码是否针对这个东东？？？？？？？？？？


begin
         case Fport of
         0: serversocket1.Port:=6988;
         1: serversocket1.Port:=6979;
         end;
         try
            serversocket1.Active:=true;
         except
             Application.MessageBox('请关闭金蝶加密服务程序。', '提示', MB_OK
               + MB_ICONSTOP);
             Exit;
         end;
        // lbl4.Visible:=True;
         Trayicon1.IconIndex:=0;
         btn1.Caption:='停止服务';
     end else
     begin
         // lbl4.Visible:=False;
          btn1.Caption:='启动加密服务';
          ServerSocket1.Active:=False;
          Trayicon1.IconIndex:=1;
          Fusers:=0;

     end;
end;
Function TForm1.Getcomputer:string;
var J : array [0..100] of char ;
    H : cardinal ;
    fws:string;
begin
  fws:='dfdsfd';
  h := sizeof(j) ;
  GetComputerName(@j, h) ;
  result := j
end;
procedure TForm1.FormCreate(Sender: TObject);
var i:Integer;
    Ainfokdinfo;
begin
    Font.Name:='宋体';
    font.Size:=9;
    Fusers:=0;
    Fmaxusers:=0;


    stat1.Panels[2].Text:='服务器名称：'+GetComputer;
    stat1.Panels[3].Text:='服务器IP:'+gethostip;
    stat1.Panels[4].Text:=DateToStr(date);

    conn1.Server:=GetComputer;
    //商贸版
    if fisbusiness then
       conn1.Database:='acctcommerce';
    qrypub.SQL.Text:='delete from t_ad_usingrec';
    qrypub.Execute;
    //装入模块
    Flist:=TList.Create;

    Flist.Clear;
    Fmaxusers:=0;
    for i:=0 to 20 do
    begin
         New(ainfo);
         ainfo^.Name:=fsysinfo[i,0];
         ainfo^.caption:=fsysinfo[i,1];
         ainfo^.users:=20;
         Flist.Add(ainfo);
         Fmaxusers:=Fmaxusers+ainfo^.users;
    end;
    refresh;

dreameng

mr2006 发表于 2012-12-11 15:06
我想问一下楼主，此ALLONE的作者在几年前曾开发一些破解如下图，想知道一下有无二次加密？？？？？？？？？

不清楚的事情不加评论！！！！！！！！你可以检验检验！！！！

dreameng

chenxtys 发表于 2012-12-11 14:54
我也中招了，谢谢楼主，不过我用的专业版，还没有恢复数据，

希望好运啊！！！！备份留着有恢复的希望，如果连备份或数据库文件都没有了，那就没希望了

no29

下载源代码。。。。。。。。。。。

no29

其实这开发者人品还真是不怎么样。。都是事发之后才说那些没用的。。什么为了不让自己死才让KISAllInOne死。。。你既然写明了不能商用。。那你收个毛的费用啊。。。这个不是摆明了是针对商用的吗？

你提前说明了又怎么？？。。。哪一个破解程序没有这样的声明？？？！！！

还不是打着免责的幌子。。赚黑心钱。。。真正的牛人。。破解了微软操作系统。。不做任何后门。。。造福了多少中国企业和中国人。。。！！！！！！

说到底。。那不就是道德人品太坏。。。。楼主你别帮他说好话了。。免责那套话。。。大家都懂。。

Ｓｈμｎ

非常悲剧的说啊。。太痛苦了     

cupdee

大哥。。你说得太好了。要是这贴早点出来。我就不会那么的郁闷了，当时真的吓了一跳。不过我还是花了费用把数据请他弄回来了。。。