Foxtable(狐表)用户栏目专家坐堂 → 关于发布后的移动开发的问题


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

主题:关于发布后的移动开发的问题

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/20 16:53:00 [显示全部帖子]

试试这样

 

httpRequest事件,执行自定义函数abc,然后动态添加abc函数的代码,你代码可以保存在表里面,这样可以简单测试。

 

http://www.foxtable.com/webhelp/scr/1487.htm


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/20 16:53:00 [显示全部帖子]

 尽量还是在你本机调试,调试好了再发布到服务器去吧。

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/20 17:07:00 [显示全部帖子]

 测试了下,可行。

 

 httpRequest事件

 

Functions.Execute("test", e)

 

 做个窗口动态编译函数

 

Functions.remove("test")
Dim Code As String
Code = e.Form.controls("Textbox1").text
Functions.Add("test",Code)
Functions.Complie()
Functions.Execute("test")

 

 AfterOpenProject执行代码,弄一个空白的函数

 

Functions.remove("test")
Dim Code As String
Code = ""
Functions.Add("test",Code)
Functions.Complie()


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/20 17:20:00 [显示全部帖子]

以下是引用ap9709130在2017/4/20 17:10:00的发言:
发布后的程序能调出代码窗口吗?

 

不能。你要自己做一个 TextBox,一个 Button,然后用 4楼代码


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/20 17:30:00 [显示全部帖子]

try
    Functions.add("test", "")
    Functions.remove("test")
catch ex As exception
    msgbox("已存在")
End try

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/25 16:40:00 [显示全部帖子]

 为什么要动态增加函数,你把代码全部写到test函数里面不就好了?

 

 楼上的那种方法,只是给你临时使用一下,用于调试的,不要太过依赖。

 

 Functions没有Contains等方法的。9楼的代码,你可以写成一个函数来用。


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/27 12:09:00 [显示全部帖子]

 已经告诉你方法了啊,用try catch可以捕捉是否存在。

 

 9楼的代码,你不会可以写成一个内部函数来判断?传递函数名,返回一个结果,和调用contains是一样的。


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/27 14:18:00 [显示全部帖子]

 不影响啊,有什么问题?测试是否存在test函数,如果存在,弹出提示,如果不存在就移除刚才的test,有什么问题?

 

 请举例说明。

 

try
    Functions.add("test", "")
    Functions.remove("test")
catch ex As exception
    msgbox("已存在")
End try


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/4/27 15:24:00 [显示全部帖子]

以下是引用ap9709130在2017/4/27 14:56:00的发言:
 色老师

我理解错了,你这个方法对于动态加进去的函数有效,但对原来存在的函数无效。也就是说,如果存在已经编码的函数,返回的结果也是:false.

 

官方并没有提供对应的方法,这个检测不了......你写过的函数,单独用一个表记录起来吧。


 回到顶部