前端之家收集整理的这篇文章主要介绍了
物资管理信息系统5 -- 删除用户界面,
前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
//importwin.ui;
/*DSG{{*/
varfrmUserDel=..win.form(text="删除用户";right=376;bottom=320;parent=...)
frmUserDel.add(
button={cls="button";text="确定";left=229;top=148;right=319;bottom=179;z=4};
button2={cls="button";text="取消";left=229;top=240;right=319;bottom=271;z=5};
listview={cls="listview";left=19;top=56;right=180;bottom=271;bgcolor=16777215;edge=1;z=6};
password={cls="edit";left=198;top=56;right=341;bottom=88;edge=1;password=1;z=3};
static={cls="static";text="系统现有用户";left=17;top=20;right=164;bottom=44;transparent=1;z=1};
static2={cls="static";text="请输入所选用户的密码";left=191;top=20;right=355;bottom=47;transparent=1;z=2}
)
/*}}*/
vardb=frmUserDel.parent.db
frmUserDel.listview.insertColumn("用户编号",70)
frmUserDel.listview.insertColumn("用户名",100)
forid,nameindb.each("SELECTid,用户名from[use]ORDERBYid"){
frmUserDel.listview.addItem({id;name})
}
frmUserDel.button.oncommand=function(id,event){//确定
varid=frmUserDel.listview.getItemText(frmUserDel.listview.selIndex,1)
varpass=frmUserDel.password.text
varrs=db.stepQuery("SELECT密码FROM[use]",{id=id})
rs?=rs.密码
if(rs!=pass){
frmUserDel.msgBox("密码不符请重输")
frmUserDel.password.text=""
frmUserDel.password.setFocus(0);
}
elseif(frmUserDel.listview.count=1){
frmUserDel.msgBox("删除无效,系统必须有一个!")
frmUserDel.close()
}
else{
db.exec("DELETEFROM[use]whereid=@id",{id=id})
frmUserDel.msgBox("删除成功")
frmUserDel.listview.delItem(frmUserDel.listview.selIndex)
}
}
frmUserDel.button2.oncommand=function(id,event){
frmUserDel.close()
}
frmUserDel.listview.onnotify=function(id,code,ptr){
select(code){
case0xFFFFFFFE/*_NM_CLICK*/{//鼠标点击用户编号密码框置焦点
if(frmUserDel.listview.selIndex){
frmUserDel.password.text=""
frmUserDel.password.setFocus()
}
}
}
}
frmUserDel.show()
win.loopMessage();
returnfrmUserDel;
原文链接:https://www.f2er.com/sqlite/200741.html