以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- post... (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=47439) |
-- 作者:qianqian1530 -- 发布时间:2014/3/10 15:30:00 -- post... 有一段 Ruby 的 post 代码·· 想改成 vb.net 的···研究了 一个通宵,还是不会啊···· **************---ruby--- ********* require \'rest-client\' # gem install rest-client parameters = \'client_id=CLIENT_ID&client_secret=CLIENT_SECRET&code=CODE&grant_type=authorization_code&redirect_uri=REDIRECT_URI\' RestClient.post \'https://api.shop-pro.jp/oauth/token\', parameters ***************************************************** http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&replyID=257150&ID=40878&skin=1 /// 以前 小甜甜 发过的帖子 Dim XMLH As Object XMLH = CreateObject("Microsoft.XMLHTTP") Dim u As String u="http://dwz.cn/create.php" XMLH.open("Post", u, True) xmlH.setRequestHeader("CONTENT-TYPE","application/x-www-form-urlencoded; charset=UTF-8") XMLH.send("url=http://www.baidu.com") Do While XMLH.readyState <> 4 Application.DoEvents Loop Output.Show( XMLH.responseText) 怎么才能 转换呢??
[此贴子已经被作者于2014-3-10 15:34:02编辑过]
|