移动终端不能正常显示 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 移动终端不能正常显示

共有2776人关注过本帖树形打印复制链接主题：移动终端不能正常显示

goe12345

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：389 积分：2988 威望：0 精华：0 注册：2015/5/15 20:56:00

移动终端不能正常显示 发帖心情

Post By：2018/8/22 17:53:00 [只看该作者]

这是我写的自定义函数，在httprequest 中调用，原来显示正常用，后来我不知调整了什么地方，之后就不显示了，手机主菜单中调用时，该页面空白，没有任可显示

下载信息 [文件大小：下载次数： ]
点击浏览该文件:新建文本文档.txt

goe12345

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：389 积分：2988 威望：0 精华：0 注册：2015/5/15 20:56:00

Post By：2018/8/22 17:56:00 [只看该作者]

这个附件是主菜单界面，调用的是工段考核，就是这个自定义函数
图片点击可在新窗口打开查看

此主题相关图片如下：1111.png

有点蓝

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：112815 积分：574444 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/8/22 20:04:00 [只看该作者]

wb.AddPageTitle("","ph1","工段考核","新能凤凰(滕州)有限公司")

Select Case e.Path

Case "gdkh.htm" '工段考核

wb.AddForm("","form1","receive.htm") '"receive.htm")

Dim st2,st3,st4,st5 As String '列表字串

st2=dt.SQLGetComboListString("set2","set1='装置'") '装置名称

If st2> "" Then

st2="|" & st2 ' 增加一个空选项,为的是只有一个选项时,可以改变当前值,便于二级选项选择

Else

With wb.AddMsgPage("","msg_gdkh","工段考核提示:","没找到装置划分标准,请与管理员联系!")

.AddButton("btn2","返回首页","default.htm").Kind=1

End With

e.WriteString(wb.Build)

return “”

End If

Dim kh As String= dt.SQLGetComboListString("set2","set1='工段长考核标准'") '考核维度

If kh>"" Then

kh="|" & kh

Else

With wb.AddMsgPage("","msg_gdkh","工段考核提示:","没找到考核标准,请与管理员联系!")

.AddButton("btn2","返回首页","default.htm").Kind=1

End With

e.WriteString(wb.Build)

return “”

End If

其它地方看不出什么问题。httprequest代码看看

[此贴子已经被作者于2018/8/22 20:03:58编辑过]

goe12345

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：389 积分：2988 威望：0 精华：0 注册：2015/5/15 20:56:00

httprequest内容 发帖心情

Post By：2018/8/23 15:12:00 [只看该作者]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:httprequest.txt

这是httprequest内容，请老师帮助看看，什么原因，网页不能正常显示

有点蓝

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：112815 积分：574444 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/8/23 15:32:00 [只看该作者]

Case "gdkh.htm" ,"gdkh1.htm", "gdkh2.htm" ,"gdkh3.htm", "gdkh4.htm","gdkh5.htm","khcx.htm","khcx1.htm","receive.htm","tishi.htm" '工段考核

Functions.Execute("gdkh",e)

return '不能重复调用e.WriteString，这里必须返回

goe12345

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：389 积分：2988 威望：0 精华：0 注册：2015/5/15 20:56:00

Post By：2018/8/23 15:41:00 [只看该作者]

在httprequest中，每个case 中，调用函数后，均要加return吗?

问题是，以前不加return,也正常显示，现在，我把gdkh函数，写成简单的几个控件，它也不显示了。

goe12345

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：389 积分：2988 威望：0 精华：0 注册：2015/5/15 20:56:00

加上return，好了，可以显示了，谢谢老师 发帖心情

Post By：2018/8/23 15:47:00 [只看该作者]

加上return，好了，可以显示了，谢谢老师

有点蓝

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：112815 积分：574444 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/8/23 15:53:00 [只看该作者]

总之不能重复调用e.WriteString，函数里面调用了，外部就不需要。自己检查代码

goe12345

小大 9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：389 积分：2988 威望：0 精华：0 注册：2015/5/15 20:56:00

移动端不支持手机拍照 发帖心情

Post By：2018/8/23 16:55:00 [只看该作者]

由于微信不支持手机拍照，我用本论坛的例子，在我上传的这个自定义函数中，但是点按钮，没反应，不能调用摄像头及文件选择器。

With wb.AddInputGroup("form1","ipg2","事件描述")
            .AddTextArea("事件描述",4).Placeholder = "请输入200字以内的备注"
            With .AddInputCell("ic4") '通过InputCell增加输入框onclick
                .AddVcodeButton("img1","选择相片",0) '增加获取验证码按钮,2表示显示在右边
                wb.InsertHTML("<img id='test' src=''width='50px' height='50px'>")
           End With

        End With

有点蓝

小大 10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：112815 积分：574444 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/8/23 16:59:00 [只看该作者]

没有绑定事件，当然没有反应。

使用别人的例子测试有没有问题？

下一主题 >> << 上一主题

总数 15 1 2 下一页

主题：移动终端不能正常显示