vb 怎么删除信息

Question

一个登记表djb   一个客房表 kf   当客户入住登记后客房表的房态为入住  当删除时　，根据登记表中的姓名删除所属的信息   同时把客房表中的房态更改为空房  这段代码要怎么实现?

Answer 1

一个登记表djb 一个客房表 kf 当客户入住登记后客房表的房态为入住 当退宿时　，根据在登记表中的姓名删除所属的信息 同时把客房表中的房态更改为空房 这段代码Data1.RecordSource = "select djb.房间号 from djb where 姓名 like " + Chr(34) + Text1.Text + "*" + Chr(34) + ""
Data1.Refresh
Data2.RecordSource = "select * from kf where kf.房间号 = djb.房间号"
Data2.Recordset.Edit
Data2.Recordset.Fields("房态") = "空房"
为什么不能实现吧kf表中对应的房态改为空房？

Answer 2

刚才少写一句。一个登记表djb 一个客房表 kf 当客户入住登记后客房表的房态为入住 当退宿时　，根据在登记表中的姓名删除所属的信息 同时把客房表中的房态更改为空房 这段代码Data1.RecordSource = "select djb.房间号 from djb where 姓名 like " + Chr(34) + Text1.Text + "*" + Chr(34) + ""
Data1.Refresh
Data2.RecordSource = "select * from kf where kf.房间号 = djb.房间号"
Data2.Recordset.Edit
Data2.Recordset.Fields("房态") = "空房"
Data2.Recordset.Update
为什么不能实现吧kf表中对应的房态改为空房？

Answer 3

你用的是data控件？试试ado控件，你写的那段话应该是对的。