Foxtable(狐表)用户栏目专家坐堂 → 请教一句代码


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

主题:请教一句代码

帅哥哟,离线,有人找我吗?
CRM2013
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:315 积分:3554 威望:0 精华:0 注册:2012/12/10 10:38:00
请教一句代码  发帖心情 Post By:2013/7/10 11:43:00 [只看该作者]

再请教一句代码:见下面标识为红色的一句,但报错编辑错误:datarow不是ControlEventArgs成员? 不知为何?


    Dim cmd As New SQLCommand
    Dim dt As DataTable
    Dim sCols() As String = {"客户代码", "客户名称", "姓名", "职位",  "移动电话"}
    Dim dCols() As String = {"客户代码", "客户名称", "姓名", "职位",  "移动电话"}
    cmd.C
    cmd.CommandText = "SELECT 客户代码,客户名称,姓名,职位,移动电话 From {联系人信息} WHERE 移动电话 IS NOt NULL And 客户代码 In (Select 客户代码 From {客户信息} Where " & Filter & ")"
    dt = cmd.ExecuteReader()
    For Each dr As DataRow In dt.DataRows
        Dim nr As DataRow = DataTables("短信列队").AddNew()
        e.DataRow("列队日期") = Date.Today()
       ' e.DataRow("添加人") = User.Name
        For i As Integer =0 To sCols.Length -1
            nr(dCols(i)) = dr(sCols(i))
        Next
    Next
End If


 回到顶部
帅哥哟,离线,有人找我吗?
程兴刚
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:7258 积分:40773 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2013/7/10 11:50:00 [只看该作者]

e.DataRow("列队日期") = Date.Today()
改为:

Tables("短信列队").Current.datarow("列队日期") = Date.Today()


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/7/10 11:51:00 [只看该作者]

你是写在什么事件里的,你要实现的是什么呢?

 回到顶部
帅哥哟,离线,有人找我吗?
CRM2013
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:315 积分:3554 威望:0 精华:0 注册:2012/12/10 10:38:00
  发帖心情 Post By:2013/7/10 15:01:00 [只看该作者]

dear bin:

 

我写在一个按钮的click事件上,通过多条件动态查询到一些数据后,然后将这些数据逐行写到一个新的表中,在逐行增加的同时希望能记录行增加日期和添加者。


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/7/10 15:04:00 [只看该作者]

按钮何来的e.datarow 呢.

 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/7/10 15:05:00 [只看该作者]

多个解释,不如一个实例。

 回到顶部
帅哥哟,离线,有人找我吗?
CRM2013
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:315 积分:3554 威望:0 精华:0 注册:2012/12/10 10:38:00
  发帖心情 Post By:2013/7/10 15:07:00 [只看该作者]

谢谢指点

 回到顶部