以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  由字符选择逻辑列的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=82347)
--  作者：douglas738888
--  发布时间：2016/3/16 12:19:00
--  由字符选择逻辑列的问题
老师，下面代码怎样修改，通过表A单元格字符（列：投标进度）的条件，表B逻辑列（投标准备）勾选

If e.DataCol.name="投标进度" Then     \'如果表A该列字符变动
   DataTables("表B").ReplaceFor( "投标准备",e.DataRow("投标进度"),"信息编号=\'" & e.DataRow("信息编号") & "\'")
End If
--  作者：wyz20130512
--  发布时间：2016/3/16 12:52:00
--  
If e.DataCol.name="投标进度" Then     \'如果表A该列字符变动
   DataTables("表B").SQLReplaceFor( "投标准备",e.DataRow("投标进度"),"信息编号=\'" & e.DataRow("信息编号") & "\'")
End If
--  作者：douglas738888
--  发布时间：2016/3/16 13:12:00
--  
加SQL应该是后台数据更新，好像不是这样用
--  作者：大红袍
--  发布时间：2016/3/16 13:26:00
--  

代码没什么问题啊，看看是否弹出123

 

If e.DataCol.name="投标进度" Then     \'如果表A该列字符变动
    msgbox(123)
    DataTables("表B").ReplaceFor( "投标准备",e.DataRow("投标进度"),"信息编号=\'" & e.DataRow("信息编号") & "\'")
End If
--  作者：douglas738888
--  发布时间：2016/3/16 13:47:00
--  
123弹出，但是报错，也没有实现功能，发个例子请老师看看
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip
--  作者：大红袍
--  发布时间：2016/3/16 14:41:00
--  

代码

 

If e.DataCol.name="投标进度" Then     \'如果表A该列字符变动
    If DataTables("表B").DataCols.Contains(e.NewValue) Then
        DataTables("表B").ReplaceFor(e.NewValue, True,"信息编号=\'" & e.DataRow("信息编号") & "\'")
    End If
End If