以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何设置数据删除关联？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=18158)
--  作者：rjh4078
--  发布时间：2012/4/4 20:55:00
--  如何设置数据删除关联？

问题如下请教各位：有2个表 一个是客户表 一个是订单表 我想实现这样的功能 如果某个客户已经建立了订单 就不允许删除该客户 除非将所有开过的订单删除 但另外又可以允许可以修改该客户的除编号以外的其他信息

 

 

 
--  作者：xongyijd
--  发布时间：2012/4/4 21:44:00
--  

在客户表BeforeDeleteDataRow事件中

Dim q As DataRow = DataTables("订单表").Find("[客户] = \'" & e.DataRow("客户") & "\'")
If q IsNot Nothing Then

e.Cancel = True
End If
--  作者：rjh4078
--  发布时间：2012/4/5 7:38:00
--  

已经OK 非常感谢老师指导