发布时间 : 星期一 文章数据库系统课程设计报告 正文更新完毕开始阅读
哈尔滨工业大学（威海）数据库系统课程设计报告 messagebox (\错误信息\房间号第\号重号！请改正。\ sle_id.setfocus ()
return
end if
c_bed=trim (sle_bed.text) c_price=trim (sle_price.text) c_describe=trim(mle_describe.text)
insert into room 入数据
//( \//\// \// \// \// \ ) values (:c_id, :c_kind, :c_bed, :c_price, :c_status, :c_describe);
sle_id.text=\ 成后，清空输入控件
sle_bed.text=\ sle_price.text=\ mle_describe.text=\
messagebox(\成功\添加房间成功！\
sle_id.setfocus () 40 / 50
//向数据库写 //数据输入完//将光标放到”学
哈尔滨工业大学（威海）数据库系统课程设计报告 号“输入栏
int i
select room_number into :i
from room_number; i=i+1
update room_number set room_number=:i;
2，更新房间：
string c_id, c_kind, c_bed, c_price, c_status, c_describe long c_idi
c_id=trim(sle_id_.text) c_kind=trim (ddlb_kind_.text) c_bed=trim (sle_bed_.text) c_price=trim (sle_price_.text) c_describe=trim(mle_describe_.text)
if rb_empty_.checked then //取出房间状
41 / 50
哈尔滨工业大学（威海）数据库系统课程设计报告 态选择
c_status=rb_empty_.text elseif rb_full_.checked then
c_status=rb_full_.text
end if
update room set
r_kind=:c_kind, r_bed=:c_bed, r_price=:c_price, r_describe=:c_describe, r_status=:c_status
where r_number=:c_id;
if sqlca.sqlcode=0 then messagebox(\更改信息成功\
else
messagebox(\更改失败\end if
////更改房间信息 // //
//string c_id, c_kind, c_bed, c_price, c_status, c_describe //long c_idi //
//if sle_id_.text=\ // messagebox (\缺少数据\请输入房间号\// sle_id_.setfocus () //
return //end if
42 / 50
//取出房间号选择 哈尔滨工业大学（威海）数据库系统课程设计报告 //c_id=trim (sle_id_.text) //
//if ddlb_kind_.text=\then //取出房间种类选择
//
c_kind=\
//else //
c_kind=trim (ddlb_kind_.text)
//end if //
//if sle_bed_.text=\ // messagebox (\缺少数据\请输入床位\// sle_bed_.setfocus () //
return
//end if //
//if sle_price_.text=\ // messagebox (\缺少数据\请输入价格\// sle_price_.setfocus () //
return
//end if //
//if rb_empty_.checked then 态选择
//
c_status=rb_empty_.text
//elseif rb_full_.checked then //
c_status=rb_full_.text
//end if //
//select room.r_number 有无重号
//into :c_idi //from room
//where room.r_number=:c_id;
43 / 50
//取出床位数选择 //取出价格选择 //取出房间状 //检查房间号