Foxtable(狐表)用户栏目专家坐堂 → 请教HttpClient代码问题


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

主题:请教HttpClient代码问题

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


加好友 发短信
等级:超级版主 帖子:109736 积分:558396 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/29 14:43:00 [显示全部帖子]

试试

Dim hc As New HttpClient(http://netocr.com/api/recog.Do)
 
'设置参数
hc.Timeout = 5 '秒
hc.Headers.Add("user-agent", "Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/36.0.1985.143 Safari/537.36")
hc.FormData.Add("key","xxxx") 
hc.FormData.Add("secret","xxxx") 
hc.FormData.Add("typeId","2") 
hc.FormData.Add("format","ddddd") 
'添加文件
hc.Files.Add("file","C:\图片2\IMAG3622.jpg")
Output.Show(hc.GetData())

或者

Dim hc As New HttpClient(http://netocr.com/api/recog.Do)
 
'设置参数
hc.Timeout = 5 '秒
hc.Headers.Add("user-agent", "Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/36.0.1985.143 Safari/537.36")
hc.C
'添加文件
hc.Files.Add("file","C:\图片2\IMAG3622.jpg")
Output.Show(hc.GetData())

 回到顶部