Dim hc As New HttpClient 怎么用变量的写 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → Dim hc As New HttpClient 怎么用变量的写

共有1686人关注过本帖树形打印复制链接主题：Dim hc As New HttpClient 怎么用变量的写

fubblyc

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

等级：九尾狐帖子：2355 积分：16187 威望：0 精华：0 注册：2013/9/1 8:09:00

Dim hc As New HttpClient 怎么用变量的写 发帖心情

Post By：2017/10/27 20:32:00 [只看该作者]

老师，以下标黄色的的写法是不对的，但是不知道怎么写。。。

Dim hc As New HttpClient 这样写不对

If zhangtao = "A"

hc(CExp(url,Functions.Execute("GetAccessToken",appid,appsecret))) hc这样写应该也不对

ElseIf zhangtao = "B"

hc(CExp(url,Functions.Execute("GetAccessTokenshandong",appid,appsecret)))

End If

Dim jo As New JObject

jo("card_id") = cardid

jo("code") = qh

jo("check_consume") = False

hc.Content = jo.ToString()

jo = JObject.Parse(hc.GetData)

有点蓝

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

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

Post By：2017/10/27 20:43:00 [只看该作者]

必须指定一个网络地址

Dim hc As New HttpClient("http://127.0.0.1/gettime.htm")

主题：Dim hc As New HttpClient 怎么用变量的写