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


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

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


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：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还是有效果的。
感谢 感谢 
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：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


这是全部代码
感谢 感谢 
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/9/1 22:39:00 [显示全部帖子]

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

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


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：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
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：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编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/9/3 15:12:00 [显示全部帖子]

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

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


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/9/3 15:51:00 [显示全部帖子]

好的 
就是当在下周工作计划列输入内容的时候增加的行的进行_开始日期列不输入日期，
第二就是在状态列输入已完成后，当天的日期输入到进行_完成日期列 输入的行不是当行，是与当行项目名称内容相同切进行_开始日期已经有内容的行。
比如在状态输入已完成，然后查找和本行项目名称列相同的，再看这些相同的行的进行_开始日期列已经输入日期，如果输入了，就在进行_完成日期 列也输入当天的日期，感谢 感谢 ，内容有些复杂，不不好意思了，感谢 感谢 
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:甘特图.table
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/9/3 17:11:00 [显示全部帖子]

谢谢 谢谢 太感谢了， 二个问题能在帮忙改改吗？ 就是在状态列输入已完成后，在 项目名称列 内容相同的所有行内同时 计划 _开始日期也已经输入了时间的 已经计划_完成日期 列的行输入当时的日期，不一定是当行。
比如当行选择已完成， 计划_完成日期列的行 是计划_开始日期已经输入了日期，不是当行输入了才输入，没有输入就不输入，是找到项目名称相同的行内，同时 计划_开始日期列已经输入日期，在这行的计划_完成日期 列输入日期。
比如在当年选已完成，筛选出本行项目名称列相同的，在筛选出已经筛选出计划_开始日期已经输入的日期，然后在同时符合项目名称相同，计划_开始日期又已经输入日期的行，在这些行输入 当时的日期。
感谢 感谢，其实就是，这个项目名称 有开始日期的行，麻烦了 感谢 感谢 
 回到顶部
帅哥哟，离线，有人找我吗？
yangwenghd
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2710 积分：18088 威望：0 精华：0 注册：2013/4/9 10:41:00 		  发帖心情 Post By：2017/9/3 18:28:00 [显示全部帖子]

感谢 感谢 可以了，谢谢你，太感谢了，谢谢 。

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