违规了哦~~

string ls_temp
integer li_ifor
string ls_date

choose case parent.ii_regtype
        case 1
                ls_temp = "注意：~n注册公司名称一但确认，以后将不能更改，~n所以一定要填写正确。~n" + "确认注册吗?"

                if messagebox("提示",ls_temp,question!,yesno!,2) = 2 then
                        return
                end if

                li_ifor = parent.wf_regfirst()

                if li_ifor > 0 then
                        messagebox("提示","注册成功")
                        closewithreturn(parent,"1")
                else

                        if li_ifor = 0 then
                                return
                        else
                                messagebox("提示","注册失败")
                                closewithreturn(parent,"0")
                        end if

                end if

        case 2
                li_ifor = parent.wf_reg()

                if li_ifor > 0 then
                        messagebox("提示","注册成功")
                        closewithreturn(parent,"1")
                else

                        if li_ifor = 0 then
                                return
                        else
                                messagebox("提示","注册失败")
                                closewithreturn(parent,"0")
                        end if

                end if

        case 3 , 4
                li_ifor = parent.wf_delay()

                if li_ifor > 0 then
                        li_ifor = li_ifor - 15
                        ls_date = string(relativedate(today(),li_ifor),"yyyy-mm-dd")
                        ls_date = gfunc.pub_f_str_xor(ls_date)
                        update other_manager set zbw_start =' ' , setup_date =' ' where version_id =0  using sqlca_local;
/* SQL Parameters List
0-> :ls_date
1-> :ls_date
2-> :gfunc.ii_versionid
*/
                        commit using sqlca_local;
                        messagebox("提示","延期成功")
                        closewithreturn(parent,"1")
                else

                        if li_ifor = 0 then
                                return
                        else
                                messagebox("提示","延期失败")
                                closewithreturn(parent,"0")
                        end if

                end if

        case 5
                li_ifor = parent.wf_regfirst_add()

                if li_ifor > 0 then
                        messagebox("提示","注册成功")
                        closewithreturn(parent,"1")
                else

                        if li_ifor = 0 then
                                return
                        else
                                messagebox("提示","注册失败")
                                closewithreturn(parent,"0")
                        end if

                end if

        case 6
                li_ifor = parent.wf_reg()

                if li_ifor > 0 then
                        messagebox("提示","注册成功")
                        closewithreturn(parent,"1")
                else

                        if li_ifor = 0 then
                                return
                        else
                                messagebox("提示","注册失败")
                                closewithreturn(parent,"0")
                        end if

                end if

end choose

return

最初由 KuNgBiM 发布
违规了哦~~

呵呵，确实是吃不透它了

违规与否我个人理解的是在学习过程中都会遇到的一些问题，这个帖子中的问题在今天的你来说可能是小儿科了，但也许在不久前的一天你也问过同样的问题或是遇到过同样的难题，关键是我们怎么去学习新知识并消化处理。。。。。。
    或许就如你题所指违规了哦~~ [/QUOTE]，一句话就说完了，你是高手或许这种简单问题你早也解决或是不屑去了解并解决，那么对你对我可能都会是一种损失：对你来说，有可能失去一次接触新加密知识的可能，对我来说如果都像你这样，那对我这种初级阶段的自学新人来说则是永远去走许多弯路，并有可能永远不会得到正确答案。
    我想这也许违背了看雪论坛的初衷，授人以鱼不如授人以渔。
    对新入门的人来说关键是要学习到解决问题的方式方法以及更多的技巧，如果都是向你一样的此中高手了我想别人也就不会来提问了，也许当别人有问题不能解决的时候也就会一样的说违规了哦。
   
    同时看着你已经有了47篇精华帖，同时对你怀着无比的崇敬。高山仰止，我也希望经过在看雪各位前辈的指点学习，有一天我也能像你以及更多的优秀前辈一样能在这方面能学有所长，学有所精，学有所用。
    一点孤陋寡闻之浅言，就事论事，对事不对人，不对之处，望企指点，见谅 。

还有密码还有密码还有密码还有密码

最初由 5151 发布
还有密码还有密码还有密码还有密码

留下邮箱发给你

如题........
发个密码来

狗验证不在主程序里。

是百威3000XP商业POS系统(服务器版)？是PB编写的，我已经破解了！
lcqh@163.com

最初由 蝙蝠侠 发布
是百威3000XP商业POS系统(服务器版)？是PB编写的，我已经破解了！
lcqh@163.com

这个比那个好多了,你说的那个已经停售了,这是最新版本的

如果你说的是BW9K的06年1月版,那就没有啥意思了!

加密简单的多了!狗已经复制过了.呵呵!看来昨天你没有看到邮件了.

最初由 nig 发布
如果你说的是BW9K的06年1月版,那就没有啥意思了!

加密简单的多了!狗已经复制过了.呵呵!看来昨天你没有看到邮件了.

什么邮件

我给你那个地址去了邮件!

软件太大，请到邮箱去下载

      binf_sd@163.com
      888888

解压：bw9898989898

最初由 nig 发布
我给你那个地址去了邮件!

软件太大，请到邮箱去下载

binf_sd@163.com
........

昨天不知道谁把邮箱邮件全删了,没有看见,

请重发   

chinavschina@163.com