Foxtable(狐表)用户栏目专家坐堂 → [求助]导入列


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

主题:[求助]导入列

帅哥哟,离线,有人找我吗?
大红袍
  61楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/8 10:23:00 [只看该作者]

(S elect distinct [工位],[员工工号],[姓名] from {产量报表} where 工位 is not null and 员工工号 is not null and 姓名 is not null Group by [工位],[员工工号],[姓名]) 
[此贴子已经被作者于2016/8/8 10:23:35编辑过]

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


加好友 发短信
等级:一尾狐 帖子:481 积分:3258 威望:0 精华:0 注册:2015/6/2 8:33:00
  发帖心情 Post By:2016/8/8 19:09:00 [只看该作者]

老师,现在项目连接服务器,如果电脑A窗口已经打开,那么电脑B发布信息后,服务器数据已经变了,同时电脑A本地加载服务器的数据也变了,但是打开的窗口却没发生任何改变,只有把窗口关了后再次打开才会更新,如何做到不关闭窗口而能进行同步更新?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/8 20:12:00 [只看该作者]

 方法一:重新load你的表数据;

 

 方法二:http://www.foxtable.com/webhelp/scr/3006.htm

 


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


加好友 发短信
等级:一尾狐 帖子:481 积分:3258 威望:0 精华:0 注册:2015/6/2 8:33:00
  发帖心情 Post By:2016/8/9 15:54:00 [只看该作者]

老师你的方法1:加载数据表加载了,但已打开的窗口仍然不会改动,除非关了再开
                 2:第二个是类似于提示你消息吧,并不会自动刷新窗口吧
                 3:类似Forms("窗口").open如何打开窗口时默认全屏?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/9 15:57:00 [只看该作者]

1、重新加载了数据,表数据就会变啊;

 

2、你要刷新窗口什么啊?

 

3、AfterLoad事件 e.form.baseform.windowstate = 2


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


加好友 发短信
等级:一尾狐 帖子:481 积分:3258 威望:0 精华:0 注册:2015/6/2 8:33:00
  发帖心情 Post By:2016/8/9 18:06:00 [只看该作者]

老师,能否有类似于网页刷新的方法来实现刷新窗口内的内容,现在我是写在计划里关闭窗口后又打开窗口,这样显示器有2个屏幕时,他会重新回到原来的位置,能否在不动窗口的情况下直接重新加载窗口内的listview和label内容?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/9 18:08:00 [只看该作者]

 你把AfterLoad事件的代码拷贝出来运行一次,不就好了?


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


加好友 发短信
等级:一尾狐 帖子:481 积分:3258 威望:0 精华:0 注册:2015/6/2 8:33:00
  发帖心情 Post By:2016/8/9 19:04:00 [只看该作者]

老师
If Forms("分页").Opened Then
  Dim pm As WinForm.Label = Forms("分页").Controls("Label9")
  Dim j As Integer
  Static i As Integer 
   i=Forms("分页").TimerInterval +i
   j=i Mod 125
  Select Case j
    Case 0
        pm.ForeColor = Color.Fuchsia
    Case 1
        pm.ForeColor = Color.Peru
    Case 2
        pm.ForeColor = Color.Navy
    Case 3
         pm.ForeColor = Color.Aqua
    Case 4
        pm.ForeColor = Color.Yellow
    Case 5
        pm.ForeColor = Color.Gold
    Case Else
         pm.ForeColor = Color.Red
End Select

  Dim zwz As Integer =pm.left-5
    If zwz +pm.Width<= 5 Then
      pm.left = Forms("分页").Width 
    Else
      pm.left = zwz 
  End If
End If

label9的内容在窗口内不会变,即使后台服务器内容都变了,它的内容也没变,如上为label9写在计划管理中的进行滚动的代码,用什么办法来刷新label9啊?或者是重新加载label9

老师,已解决
[此贴子已经被作者于2016/8/9 19:53:14编辑过]

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


加好友 发短信
等级:一尾狐 帖子:481 积分:3258 威望:0 精华:0 注册:2015/6/2 8:33:00
  发帖心情 Post By:2016/8/11 17:52:00 [只看该作者]

老师,1:窗口能旋转90度显示吗?
        2:
图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看
             老师,这个是我写在计划管理中的,为什么会报错?
If Forms("分页").Opened Then
   Forms("分页").Controls("Label5").Text = format(Date.Now, "yyyy年MM月dd日 dddd HH:mm:ss")
End If
[此贴子已经被作者于2016/8/11 18:28:36编辑过]

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/11 18:47:00 [只看该作者]

以下是引用扶风在2016/8/11 17:52:00的发言:
老师,窗口能旋转90度显示吗?

 

不行的。你把显示器选择90度吧图片点击可在新窗口打开查看


 回到顶部