以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于OA滚动条无法使用的求救  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=50169)

--  作者:wealthwind
--  发布时间:2014/4/30 15:19:00
--  关于OA滚动条无法使用的求救

请问老师,为什么我OA中的HTML窗口中的滚动条无法动,造成HTML中内容无法看全


图片点击可在新窗口打开查看此主题相关图片如下:360截图20140430151548812.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:360截图20140430151543359.jpg
图片点击可在新窗口打开查看

--  作者:wealthwind
--  发布时间:2014/4/30 15:20:00
--  

其中窗口中TIMERTICK代码是:

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").Enabled = Tables("个案申请").current.IsNull("审核")
                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


--  作者:有点甜
--  发布时间:2014/4/30 15:32:00
--  
 呃,因为你设置了这个空间不允许它使用啊。
--  作者:wealthwind
--  发布时间:2014/4/30 15:38:00
--  

我需要的是,其他不变,只需要更加可以看全内容即可~~


--  作者:wealthwind
--  发布时间:2014/4/30 15:47:00
--  
老师,我应该怎么样弄呢??
--  作者:wealthwind
--  发布时间:2014/4/30 15:55:00
--  

如果一份文件已经全部审核完,但个案提报人,却无法看到全部的HTML自己的文件内容,那是不合理的~~

 

 

我的想法是,只要开始的审核,空间锁定是正确的但能不能不要锁定,滚动条~~


--  作者:Bin
--  发布时间:2014/4/30 16:25:00
--  
用浏览器控件,显示生成的HTML文件,就无法编辑了.  无须锁定,自然就可以滚动
--  作者:wealthwind
--  发布时间:2014/4/30 16:31:00
--  
但是现在实际就是锁定了~~
--  作者:wealthwind
--  发布时间:2014/4/30 16:31:00
--  
内容无法向下滚动看到下面的内容
--  作者:Bin
--  发布时间:2014/4/30 16:31:00
--  
使用7楼的方案,不要进行锁定,即可