|
楼主 |
发表于 2014-6-13 18:22:07
|
显示全部楼层
本帖最后由 ejzhang 于 2014-6-13 19:30 编辑
完整代码如下:- import win.ui;
- import inet.ftp;
- import process.popen;
- /*DSG{{*/
- frmPassWord = ..win.form(text="FTP 密码修改工具";right=458;bottom=350;border="thin";exmode="none";max=false;min=false)
- frmPassWord.add(
- btnCancel={cls="button";text="取消";left=254;top=273;right=346;bottom=311;flat=1;font=LOGFONT( h=-19;weight=700 );tabstop=1;z=13};
- btnOK={cls="button";text="确定";left=116;top=272;right=208;bottom=310;flat=1;font=LOGFONT( h=-19;weight=700 );tabstop=1;z=12};
- edtFtpServer={cls="edit";text="10.69.55.25";left=190;top=78;right=396;bottom=104;autovscroll=false;font=LOGFONT( h=-16 );hidesel=1;tabstop=1;z=7};
- edtNewPassWord={cls="edit";left=190;top=186;right=396;bottom=212;autovscroll=false;font=LOGFONT( h=-16 );hidesel=1;password=1;tabstop=1;z=10};
- edtOldPassWord={cls="edit";left=190;top=151;right=396;bottom=177;autovscroll=false;font=LOGFONT( h=-16 );hidesel=1;password=1;tabstop=1;z=9};
- edtUserName={cls="edit";left=190;top=115;right=396;bottom=141;autovscroll=false;font=LOGFONT( h=-16 );hidesel=1;tabstop=1;z=8};
- edtVerifyPassWord={cls="edit";left=190;top=222;right=396;bottom=248;autovscroll=false;font=LOGFONT( h=-16 );hidesel=1;password=1;tabstop=1;z=11};
- lblFtpServer={cls="static";text="FTP 服务器:";left=38;top=81;right=184;bottom=110;align="right";font=LOGFONT( h=-19;weight=700 );notify=1;transparent=1;z=2};
- lblNewPasswd={cls="static";text="新密码:";left=69;top=188;right=184;bottom=217;align="right";font=LOGFONT( h=-19;weight=700 );notify=1;transparent=1;z=5};
- lblOldPasswd={cls="static";text="原密码:";left=69;top=152;right=184;bottom=181;align="right";font=LOGFONT( h=-19;weight=700 );notify=1;transparent=1;z=4};
- lblUserName={cls="static";text="用户名:";left=69;top=116;right=184;bottom=145;align="right";font=LOGFONT( h=-19;weight=700 );notify=1;transparent=1;z=3};
- lblVerifyPasswd={cls="static";text="确认密码:";left=69;top=224;right=184;bottom=253;align="right";font=LOGFONT( h=-19;weight=700 );notify=1;transparent=1;z=6};
- title={cls="static";text="FTP 密码修改工具";left=126;top=23;right=359;bottom=60;ah=1;align="center";aw=1;color=16711680;font=LOGFONT( h=-24;weight=700 );notify=1;transparent=1;z=1}
- )
- /*}}*/
- frmPassWord.btnOK.oncommand = function(id,event){
- if(#string.trim(frmPassWord.edtFtpServer.text) == 0){
- win.msgbox("请输入FTP服务器地址!");
- frmPassWord.edtFtpServer.setFocus();
- } elseif(#string.trim(frmPassWord.edtUserName.text) == 0){
- win.msgbox("请输入用户名!");
- frmPassWord.edtUserName.setFocus(0,-1);
- } elseif(#string.trim(frmPassWord.edtOldPassWord.text) == 0){
- win.msgbox("请输入原密码!");
- frmPassWord.edtOldPassWord.setFocus(0,-1);
- } elseif(#string.trim(frmPassWord.edtNewPassWord.text) == 0){
- win.msgbox("请输入新密码!");
- frmPassWord.edtNewPassWord.setFocus(0,-1);
- } elseif(frmPassWord.edtNewPassWord.text != frmPassWord.edtVerifyPassWord.text){
- win.msgbox("确认密码与新密码不一致!");
- frmPassWord.edtVerifyPassWord.setFocus(0,-1);
- } elseif(frmPassWord.edtOldPassWord.text == frmPassWord.edtNewPassWord.text){
- win.msgbox("原密码与新密码相同!");
- frmPassWord.edtNewPassWord.setFocus(0,-1);
- } else {
- frmPassWord.btnOK.disabled = true;
- frmPassWord.btnCancel.disabled = true;
- try{
- ftp = inet.ftp(frmPassWord.edtFtpServer.text, frmPassWord.edtUserName.text, frmPassWord.edtOldPassWord.text);
- }
- if(ftp){
- if(ftp.command("SITE PSWD " ++ frmPassWord.edtOldPassWord.text ++ " " ++ frmPassWord.edtNewPassWord.text)){
- win.msgbox("密码修改成功!");
- frmPassWord.edtUserName.text = "";
- frmPassWord.edtOldPassWord.text = "";
- frmPassWord.edtNewPassWord.text = "";
- frmPassWord.edtVerifyPassWord.text = "";
- frmPassWord.edtUserName.setFocus(0,-1);
- } else {
- win.msgbox("密码修改失败!");
- }
- ftp.close();
- } else {
- win.msgbox("无法连接FTP服务器!请检查用户名、密码。");
- }
- frmPassWord.btnOK.disabled = false;
- frmPassWord.btnCancel.disabled = false;
- }
- }
- frmPassWord.btnCancel.oncommand = function(id,event){
- frmPassWord.close();
- }
- frmPassWord.show();
- win.loopMessage();
复制代码 |
|