Foxtable(狐表) → 用户栏目 → 专家坐堂 → 代码冲突


  共有2796人关注过本帖树形打印复制链接

主题：代码冲突
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2707 积分：18062 威望：0 精华：0 注册：2013/4/9 10:41:00 		代码冲突  发帖心情 Post By：2017/9/1 20:42:00 [只看该作者]

代码1
If e.DataCol.Name = "下周工作计划" Then
    Dim fdr As DataRow = e.DataTable.Find("附加列 = " & e.DataRow("_Identify"))
    If fdr IsNot Nothing Then
        fdr("事件类型") = e.DataRow("事件类型")
        fdr("项目名称") = e.DataRow("项目名称")
        fdr("项目流程") = e.DataRow("项目流程")
        fdr("项目内容") = e.DataRow("项目内容")
        fdr("状态") = e.DataRow("状态")
        fdr("本周工作目标") = e.DataRow("下周工作计划")
    End If
End If
代码2
Dim t As Table = Tables("计划表")
For Each r As Row In t.Rows
    If r("状态") = "办理中" Then
        r("进行_开始日期") = Date.Now
    Else
    End If
Next

每次增加行后 状态状态都会更新进行_开始日期列。
可以是在正常执行代码1后，代码2不会受代码1的影响吗？其他的输入还是有用，比如手动输入代码2还是有效果的。
感谢 感谢 
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111409 积分：567115 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2017/9/1 20:56:00 [只看该作者]

代码分别都在什么事件的？

事件的完整代码发上来看看
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2707 积分：18062 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/9/1 21:55:00 [只看该作者]

都在 datacolchanged 里面
If e.DataCol.Name = "下周工作计划" Then
    Dim fdr As DataRow = e.DataTable.Find("附加列 = " & e.DataRow("_Identify"))
    If fdr IsNot Nothing Then
        fdr("事件类型") = e.DataRow("事件类型")
        fdr("项目名称") = e.DataRow("项目名称")
        fdr("项目流程") = e.DataRow("项目流程")
        fdr("项目内容") = e.DataRow("项目内容")
        fdr("状态") = e.DataRow("状态")
        fdr("本周工作目标") = e.DataRow("下周工作计划")
    End If
End If

Dim t As Table = Tables("计划表")
For Each r As Row In t.Rows
    If r("状态") = "办理中" Then
        r("进行_开始日期") = Date.Now
    Else
    End If
Next


这是全部代码
感谢 感谢 
 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111409 积分：567115 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2017/9/1 22:29:00 [只看该作者]

Select Case e.DataCol.Name
    Case "下周工作计划"
        Dim fdr As DataRow = e.DataTable.Find("附加列 = " & e.DataRow("_Identify"))
        If fdr IsNot Nothing Then
            fdr("事件类型") = e.DataRow("事件类型")
            fdr("项目名称") = e.DataRow("项目名称")
            fdr("项目流程") = e.DataRow("项目流程")
            fdr("项目内容") = e.DataRow("项目内容")
            fdr("状态") = e.DataRow("状态")
            fdr("本周工作目标") = e.DataRow("下周工作计划")
        End If
    Case "状态"
        If e.DataRow("状态") = "办理中" Then
            e.DataRow("进行_开始日期") = Date.Now
        End If
End Select
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2707 积分：18062 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/9/1 22:39:00 [只看该作者]

感谢 感谢 可以了 感谢 
如果"状态"= "完成" ，就在"进行_完成日期"列输入日期可以吗？差别是不在是选择改变的行，而是改变行“分类”列相同同时进行_开始日期列 有字符的列，这个可以吗？感谢 感谢 
相当于 状态列 选择完成，然后先查找“类别”列内容相同的，然后同时在已经输入日期的“进行_进行日期”列同行的“进行_完成日期”列输入时间，感谢 感谢 ，不知道我说清楚没有，实在是不好意思。感谢 感谢 

[此贴子已经被作者于2017/9/1 22:46:20编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2707 积分：18062 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/9/2 23:22:00 [只看该作者]

能帮忙看看这个吗？就当增加一行后，会复制上一行的类容，这种情况可以不输入 进行_开始日期 列的日期吗？只是箭头用选择才有效 感谢 感谢 


图片点击可在新窗口打开查看此主题相关图片如下：qq截图20170902232246.jpg
图片点击可在新窗口打开查看

Select Case e.DataCol.Name
    Case "下周工作计划"
        Dim fdr As DataRow = e.DataTable.Find("附加列 = " & e.DataRow("_Identify"))
        If fdr IsNot Nothing Then
            fdr("事件类型") = e.DataRow("事件类型")
            fdr("项目名称") = e.DataRow("项目名称")
            fdr("项目流程") = e.DataRow("项目流程")
            fdr("项目内容") = e.DataRow("项目内容")
            'fdr("状态") = e.DataRow("状态")
            fdr("本周工作目标") = e.DataRow("下周工作计划")
        End If
    Case "状态"
        If e.DataRow("状态") = "办理中" Then
            e.DataRow("进行_开始日期") = Date.Now
            e.DataRow("状态") = e.DataRow("状态")
        End If
End Select
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/9/3 12:02:00 [只看该作者]

没看到你上面写的什么意思，上传具体实例，说明如何操作表，要做到什么效果。

 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2707 积分：18062 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/9/3 14:22:00 [只看该作者]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:甘特图.table

我重新做例子，太麻烦你了，感谢 感谢 
给你们填麻烦了，感谢 感谢 
已经实现功能1：代码本来是在 状态列输入办理中在计划_开始日期 输入时间，但是只是本行。
已经实现功能2：在下周工作计划列输入内容会把状态列内容复制到新建的行。
想请教的问题是：在功能2的时候，功能1 ，也就是可以不在当行输入日期吗？但只是在用功能1的时候不在日期列输入日期，感谢 感谢。
问题2就是当在状态列输入已完成后， 在计划_完成日期 列输入当天的日期，但行是 筛选项目流程相同的行里面，同时在计划_开始日期 已经输入了日期的行输入当时的日期，感谢 感谢


图片点击可在新窗口打开查看此主题相关图片如下：qq截图20170903150155.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2017/9/3 15:09:56编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/9/3 15:01:00 [只看该作者]

写了一大堆，完全没看懂你想表达什么。上传具体实例，说明哪个表哪行输入什么，最后要什么效果。

 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2707 积分：18062 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/9/3 15:12:00 [只看该作者]

确实太为难你了，感谢 感谢，只是没有你的帮助，实在是毫无头绪，感谢你，谢谢

 回到顶部
总数 16 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 5 次数据查询