现在有两张表，分别是top_trade和配货表1。两张表都有列top_buyer_nick，top_print_logistics_time，top_seller_nick，top_xuhao
其中top_trade表数据是在服务器SQL数据库中，每天数据库都会新增加内容，想要在配货表1中同步列内容。以下是代码，放在DataColChanged事件中，但是执行没有反应，
请大神帮忙看看问题出在哪里？
Select Case e.DataCol.name
Case "top_xuhao"
Dim dr As DataRow = DataTables("配货表1").Find("top_xuhao = '" & e.OldValue & "'")
If dr Is Nothing Then
dr = DataTables("配货表1").AddNew()
dr("top_buyer_nick") = e.DataRow("top_buyer_nick")
dr("top_print_logistics_time") = e.DataRow("top_print_logistics_time")
dr("top_seller_nick") = e.DataRow("top_seller_nick")
Else
dr("top_xuhao") = e.DataRow("top_xuhao")
End If
Case "top_print_logistics_time","top_seller_nick"
Dim dr As DataRow = DataTables("配货表1").Find("top_xuhao = '" & e.DataRow("top_xuhao") & "'")
If dr IsNot Nothing Then
dr("top_buyer_nick") = e.DataRow("top_buyer_nick")
dr("top_print_logistics_time") = e.DataRow("top_print_logistics_time")
dr("top_seller_nick") = e.DataRow("top_seller_nick")
End If
此主题相关图片如下：peihuobiao1.jpg
此主题相关图片如下：daima.jpg
End Select
此主题相关图片如下：top_trade.jpg
加好友 
发短信
Post By：2017/11/12 22:20:00 [显示全部帖子]
