Foxtable(狐表)用户栏目专家坐堂 → 在自定义函数里 写控件内容出错


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

主题:在自定义函数里 写控件内容出错

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


加好友 发短信
等级:童狐 帖子:282 积分:2835 威望:0 精华:0 注册:2019/4/23 11:17:00
在自定义函数里 写控件内容出错  发帖心情 Post By:2021/5/25 17:17:00 [只看该作者]

Dim MaxVal As String = Args(0)
Dim str As  String 

try
 
Form("webjson").Controls("TextBox1").Value  = JObject.Parse(Args(0))  (这句出错 不知道为啥)

Dim jo As JObject = JObject.Parse(Args(0)) 
If jo("msgtype").ToString = "text" Then
str ="可识别json格式数据  "+ jo("text")("content").Tostring

'Return "json数据"+ jo("text")("content")
Else 
str ="不可识别的json  "+  Args(0).tostring
'Return  Args(0)
End If 
Return str 
catch
str ="NO Json Data" +    Date.Now    
Return  str
End try

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111422 积分:567186 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/25 17:19:00 [只看该作者]

什么错误?

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


加好友 发短信
等级:童狐 帖子:282 积分:2835 威望:0 精华:0 注册:2019/4/23 11:17:00
  发帖心情 Post By:2021/5/25 17:20:00 [只看该作者]

图片点击可在新窗口打开查看

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


加好友 发短信
等级:幼狐 帖子:163 积分:1100 威望:0 精华:0 注册:2020/1/16 11:58:00
  发帖心情 Post By:2021/5/25 17:24:00 [只看该作者]

Forms

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


加好友 发短信
等级:童狐 帖子:282 积分:2835 威望:0 精华:0 注册:2019/4/23 11:17:00
  发帖心情 Post By:2021/5/25 17:56:00 [只看该作者]

谢谢

 回到顶部