以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Bin总在吗，我想继续追问  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=42181)
--  作者：dycjj
--  发布时间：2013/11/5 22:52:00
--  Bin总在吗，我想继续追问
我做的是一个计价产品的登记，仅仅只需要登记一条记，并无手机号吗一列，两个表几乎没一相同的标识，本来可用姓名列作为标识，但是会有同名的情况，一但出现同名的情况，有些记录便不能删除，所以麻，还得麻烦Bin总再给我想一个更好的法子。这是你给我修改的代吗
If e.DataCol.Name = "同时开通_手机银行"
  If e.DataRow("同时开通_手机银行") = True Then
    Dim dr As DataRow = DataTables("手机银行").AddNew
    For Each dc As DataCol In DataTables("手机银行").DataCols
            dr(dc.Name) = e.DataRow(dc.Name)
    Next
else
  dim dr as DataRow=DataTables("手机银行").Find("手机号码=\'" & e.datarow("手机号码") & "\'")    \'这里假设唯一标识列为手机号码
  if dr isnot nothing then
     dr.delete
  end if
end if
End If
提示：我是为了方便操作员更快的登记，因为当顾客开通手机银行时，会同时开通电话银行、网上银行等，这样的记录每天会登记很多，而我的目的，只是为了统计柜员的工作业绩
--  作者：有点甜
--  发布时间：2013/11/5 23:14:00
--  
 那就多加一列唯一标识列呗，这样才不会出现重复的情况。