Foxtable(狐表)用户栏目专家坐堂 → 项目中的几个问题,请老师给予解决。


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

主题:项目中的几个问题,请老师给予解决。

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


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

第四个问题,打回和取消,有什么不同?原始状态又是什么状态?

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


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

第三个问题,也好解决。

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


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

第五个问题,隐藏列的代码,在哪儿?

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


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/5/10 14:18:00 [只看该作者]

这个不是右键“隐藏”即可了吗????

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


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

怎么问题不回答,搞不清你的问题,怎么解决问题?

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


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/5/10 14:24:00 [只看该作者]

个案申请,他有几个步骤,新建文件,保存文件,审核、批准、终审、裁决,

 

取消:就是取消审核内容,取消批准内容、取消终审内容、取消裁决内容;

 

打回,就是,直接回到,保存文件阶段。。。。。。。

 

批准的打回修改按钮:取消审核内容回到文件保存的状态;

终审的打回修改按钮:取消审核内容、批准内容回到文件保存的状态;

裁决的打回修改按钮:取消审核内容、批准内容、裁决内容回到文件保存的状态;

 


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


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/5/10 14:26:00 [只看该作者]

隐藏列,我没有代码,我用的方法是,对着表中的列,右键,隐藏;

 

有个窗口叫“个案申请”里面有各TABLE,我设置了显示列;


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


加好友 发短信
等级:三尾狐 帖子:660 积分:3965 威望:0 精华:0 注册:2014/3/16 20:34:00
  发帖心情 Post By:2014/5/10 14:28:00 [只看该作者]

第一个问题全局变量的问题会变成2,是在窗口“功能栏”的TIMECLICK里面

 

If e.form.ExistControl("WebBrowser1") Then
    If e.form.controls("WebBrowser1").basecontrol.Document.Window.Frames.Count > 0 Then
        If Vars("编辑器校验")=0 Then
            If Tables("个案申请").current IsNot Nothing Then       
                e.form.controls("WebBrowser1").basecontrol.Document.Window.Frames(0).Document.body.InnerHtml = Tables("个案申请").current("内容")
            End If
            Vars("编辑器校验")=1
        Else If Vars("编辑器校验")=2 Then
            e.form.controls("WebBrowser1").basecontrol.Document.Window.Frames(0).Document.body.InnerHtml = ""
            Vars("编辑器校验")=1
        End If
        e.Form.Controls("TextBox1").text = e.form.controls("WebBrowser1").basecontrol.Document.Window.Frames(0).Document.body.InnerHtml
    End If
End If


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


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

又连不上了。

打回?就是取消修改,回到未修改状态?


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


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

以下是引用wealthwind在2014-5-10 14:28:00的发言:

第一个问题全局变量的问题会变成2,是在窗口“功能栏”的TIMECLICK里面

 

If e.form.ExistControl("WebBrowser1") Then
    If e.form.controls("WebBrowser1").basecontrol.Document.Window.Frames.Count > 0 Then
        If Vars("编辑器校验")=0 Then
            If Tables("个案申请").current IsNot Nothing Then       
                e.form.controls("WebBrowser1").basecontrol.Document.Window.Frames(0).Document.body.InnerHtml = Tables("个案申请").current("内容")
            End If
            Vars("编辑器校验")=1
        Else If Vars("编辑器校验")=2 Then
            e.form.controls("WebBrowser1").basecontrol.Document.Window.Frames(0).Document.body.InnerHtml = ""
            Vars("编辑器校验")=1
        End If
        e.Form.Controls("TextBox1").text = e.form.controls("WebBrowser1").basecontrol.Document.Window.Frames(0).Document.body.InnerHtml
    End If
End If

Else If Vars("编辑器校验")=2 Then
这是判断,不是赋值,变不成2


 回到顶部
总数 76 上一页 1 2 3 4 5 6 7 8 下一页