Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]窗口


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

主题：[求助]窗口
帅哥哟，离线，有人找我吗？
江南小镇
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1701 积分：11355 威望：0 精华：0 注册：2015/6/22 8:11:00 		[求助]窗口  发帖心情 Post By：2019/10/19 10:09:00 [显示全部帖子]

老师好，下面代码是论坛上抄来的想把标出的地方去掉并修改。谢谢老师。


e.Sender.Cursor = System.Windows.Forms.Cursors.WaitCursor
Dim cmd As New SQLCommand
Dim dr As DataRow
Dim dt As DataTable
cmd.C
cmd.CommandText = "SEL ECT * From {劳动合同} where 劳动合同_到期 = false and [劳动合同_结束时间] <= #" & DateAdd("d",30,Functions.Execute("服务器时间"))  & "#"
dt = cmd.ExecuteReader()
forms("窗口1").controls("人事档案Label8").text = dt.Compute("count([_Identify])")
 回到顶部
帅哥哟，离线，有人找我吗？
江南小镇
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1701 积分：11355 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2019/10/19 10:41:00 [显示全部帖子]

直接改掉

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


加好友 发短信
等级：七尾狐 帖子：1701 积分：11355 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2019/10/19 11:50:00 [显示全部帖子]

老师，主窗口动态添加独立或模式窗口后在代码设置中应该用主窗口的名称吗？

窗口1是主窗口的名称、整个代码在另一个独立窗口中，我把窗口1改成独立窗口名称（不添加到主窗口中）。

forms("窗口1").controls("人事档案Label8").text = dt.Compute("count([_Identify])")
 回到顶部
帅哥哟，离线，有人找我吗？
江南小镇
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1701 积分：11355 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2019/10/19 22:02:00 [显示全部帖子]

老师，文件上传不了，文件在D:\中
图片点击可在新窗口打开查看此主题相关图片如下：2345截图20191019215828.png
图片点击可在新窗口打开查看
添加后就变成下面的地址了。

图片点击可在新窗口打开查看 C:\fakepath\2345截图20191019215828.png 

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


加好友 发短信
等级：七尾狐 帖子：1701 积分：11355 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2019/10/19 22:05:00 [显示全部帖子]

老师好，项目上传不了。
[此贴子已经被作者于2019/10/19 22:15:01编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
江南小镇
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1701 积分：11355 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2019/10/20 21:39:00 [显示全部帖子]

老师，没有用，换了两个谷歌、火狐。

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


加好友 发短信
等级：七尾狐 帖子：1701 积分：11355 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2019/10/21 18:32:00 [显示全部帖子]

老师，下面代码默认用户报错，进入开发者不报错。


.NET Framework 版本：2.0.50727.8669
Foxtable 版本：2017.4.22.1
错误所在事件：表，人事档案_人事档案Table1，DrawCell
详细错误信息：
调用的目标发生了异常。
值不能为空。
参数名: image

Select Case  e.Col.name
    Case "合"
        If e.Row("合") = 1
            e.StartDraw()
            e.Graphics.DrawImage(contract, e.x + 3, e.y + 3)
            e.Style = "a"
            e.EndDraw()
        End If
    Case "详"
        If e.Row("详") = 1 Then
            e.StartDraw()
            e.Graphics.DrawImage(clerk, e.x + 3, e.y + 3)
            e.Style = "a"
            e.EndDraw()
End If
        Case "调"
            If e.Row("调") = 1 Then
                e.StartDraw()
                e.Graphics.DrawImage(transfer, e.x + 3, e.y + 3)
                e.Style = "a"
                e.EndDraw()
            End If
        Case "离"
            If e.Row("离") = 1 Then
                e.StartDraw()
                e.Graphics.DrawImage(lizhi, e.x + 3, e.y + 3)
                e.Style = "a"
                e.EndDraw()
            End If
    End Select
 回到顶部
帅哥哟，离线，有人找我吗？
江南小镇
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1701 积分：11355 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2019/10/21 21:12:00 [显示全部帖子]

开发者进入能找到

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


加好友 发短信
等级：七尾狐 帖子：1701 积分：11355 威望：0 精华：0 注册：2015/6/22 8:11:00 		  发帖心情 Post By：2019/10/22 8:43:00 [显示全部帖子]

老师，变量在全局代码中，现在改为绝对路径就好了，

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