Cocos2d-x 3 2 Lua示例 XMLHttpRequestTest（Http网络请求）

àì夳堔傛蜴生んèń 2022-03-17 04:46 83阅读 0赞

分享一下我老师大神的人工智能教程。零基础！通俗易懂！风趣幽默！还带黄段子！希望你也加入到我们人工智能的队伍中来！[https://blog.csdn.net/jiangjunshow][https_blog.csdn.net_jiangjunshow]

**Cocos2d-x 3.2 Lua示例 XMLHttpRequestTest（Http网络请求）**

本篇博客介绍Cocos2d-x 3.2Lua示例中的XMLHttpRequestTest，这里提供GET和POST两种http请求方式，返回数据类型有以下几种：

**cc.XMLHTTPREQUEST\_RESPONSE\_STRING = 0 -- 返回字符串类型  
cc.XMLHTTPREQUEST\_RESPONSE\_ARRAY\_BUFFER = 1 -- 返回字节数组类型  
cc.XMLHTTPREQUEST\_RESPONSE\_BLOB = 2 -- 返回二进制大对象类型  
cc.XMLHTTPREQUEST\_RESPONSE\_DOCUMENT = 3 -- 返回文档对象类型  
cc.XMLHTTPREQUEST\_RESPONSE\_JSON = 4 -- 返回JSON数据类型**

这些常量的定义可以到Cocos2dConstants.lua下找到。

示例代码：

--[[=================XMLHttpRequestTest.luahttp请求=================]]--require("json")local function XMLHttpRequestLayer()  local layer = cc.Layer:create()-- 创建层  local winSize = cc.Director:getInstance():getWinSize()-- 得到窗口大小  local margin = 40-- 间距  local space  = 35-- 宽度  local function init()    local label = cc.Label:createWithTTF("XML Http Request Test", s_arialPath, 28)-- 使用ttf文字格式的标签    label:setAnchorPoint(cc.p(0.5, 0.5))-- 设置锚点    label:setPosition(cc.p(winSize.width / 2, winSize.height - margin))-- 设置显示位置，宽度为屏幕的中间，高度为屏幕高度减去间距    layer:addChild(label, 0) -- 添加标签到层中    -- 显示返回码的标签    local labelStatusCode = cc.Label:createWithTTF("HTTP Status Code", s_markerFeltFontPath, 20)    labelStatusCode:setAnchorPoint(cc.p(0.5, 0.5))    labelStatusCode:setPosition(cc.p(winSize.width / 2,  winSize.height - margin - 6 * space))    layer:addChild(labelStatusCode)    local menuRequest = cc.Menu:create() -- 创建菜单    menuRequest:setPosition(cc.p(0,0))    layer:addChild(menuRequest) -- 添加菜单    --Get    local function onMenuGetClicked()      local xhr = cc.XMLHttpRequest:new() -- http请求      xhr.responseType = cc.XMLHTTPREQUEST_RESPONSE_STRING -- 响应类型      xhr:open("GET", "http://httpbin.org/get") -- 打开链接      -- 状态改变时调用      local function onReadyStateChange()        -- 显示状态文本        local statusString = "Http Status Code:"..xhr.statusText        labelStatusCode:setString(statusString)        print(xhr.response)      end      -- 注册脚本回调方法      xhr:registerScriptHandler(onReadyStateChange)      xhr:send() -- 发送请求      labelStatusCode:setString("waiting...")    end    -- 测试Get的标签    local labelGet  = cc.Label:createWithTTF("Test Get", s_arialPath, 22)    labelGet:setAnchorPoint(cc.p(0.5, 0.5))    local itemGet  =  cc.MenuItemLabel:create(labelGet) -- 菜单标签    itemGet:registerScriptTapHandler(onMenuGetClicked) -- 菜单点击事件    itemGet:setPosition(cc.p(winSize.width / 2, winSize.height - margin - space))    menuRequest:addChild(itemGet) -- 添加菜单项    --Post    local function onMenuPostClicked()      local xhr = cc.XMLHttpRequest:new() -- 新建一个XMLHttpRequest对象      xhr.responseType = cc.XMLHTTPREQUEST_RESPONSE_STRING -- 相应类型为字符串      xhr:open("POST", "http://httpbin.org/post")-- post方式      local function onReadyStateChange()        labelStatusCode:setString("Http Status Code:"..xhr.statusText)        print(xhr.response)      end      -- 注册脚本方法回调      xhr:registerScriptHandler(onReadyStateChange)      xhr:send()-- 发送      labelStatusCode:setString("waiting...")    end    -- 测试Post的标签    local labelPost = cc.Label:createWithTTF("Test Post", s_arialPath, 22)    labelPost:setAnchorPoint(cc.p(0.5, 0.5)) -- 设置锚点    local itemPost =  cc.MenuItemLabel:create(labelPost) -- 设置菜单项标签    itemPost:registerScriptTapHandler(onMenuPostClicked) -- 注册菜单项点击回调方法    itemPost:setPosition(cc.p(winSize.width / 2, winSize.height - margin - 2 * space))    menuRequest:addChild(itemPost)    --Post Binary    local function onMenuPostBinaryClicked()      local xhr = cc.XMLHttpRequest:new()-- 新建一个XMLHttpRequest对象      xhr.responseType = cc.XMLHTTPREQUEST_RESPONSE_ARRAY_BUFFER --返回数据为字节流      xhr:open("POST", "http://httpbin.org/post") -- 打开Socket      -- 状态改变时调用      local function onReadyStateChange()        local response   = xhr.response -- 获得返回数据        local size     = table.getn(response) -- 获得返回数据大小        local strInfo = ""        for i = 1,size do          if 0 == response[i] then            strInfo = strInfo.."\'\\0\'"          else            strInfo = strInfo..string.char(response[i])          end        end        labelStatusCode:setString("Http Status Code:"..xhr.statusText)        print(strInfo)      end      -- 注册脚本方法回调      xhr:registerScriptHandler(onReadyStateChange)      xhr:send()-- 发送      labelStatusCode:setString("waiting...")    end    -- 测试使用Post请求方式发送字节流    local labelPostBinary = cc.Label:createWithTTF("Test Post Binary", s_arialPath, 22)    labelPostBinary:setAnchorPoint(cc.p(0.5, 0.5))    local itemPostBinary = cc.MenuItemLabel:create(labelPostBinary)    itemPostBinary:registerScriptTapHandler(onMenuPostBinaryClicked)    itemPostBinary:setPosition(cc.p(winSize.width / 2, winSize.height - margin - 3 * space))    menuRequest:addChild(itemPostBinary)    --Post Json    local function onMenuPostJsonClicked()      local xhr = cc.XMLHttpRequest:new() -- 新建一个XMLHttpRequest对象      xhr.responseType = cc.XMLHTTPREQUEST_RESPONSE_JSON -- json数据类型      xhr:open("POST", "http://httpbin.org/post")-- POST方式      local function onReadyStateChange()        -- 显示状态码,成功显示200        labelStatusCode:setString("Http Status Code:"..xhr.statusText)        local response   = xhr.response -- 获得响应数据        local output = json.decode(response,1) -- 解析json数据        table.foreach(output,function(i, v) print (i, v) end)        print("headers are")        table.foreach(output.headers,print)      end      -- 注册脚本方法回调      xhr:registerScriptHandler(onReadyStateChange)      xhr:send()-- 发送请求      labelStatusCode:setString("waiting...")    end    -- 测试使用POST方式发送json的标签    local labelPostJson = cc.Label:createWithTTF("Test Post Json", s_arialPath, 22)    labelPostJson:setAnchorPoint(cc.p(0.5, 0.5)) -- 锚点    local itemPostJson = cc.MenuItemLabel:create(labelPostJson) -- 菜单项标签    itemPostJson:registerScriptTapHandler(onMenuPostJsonClicked) -- 注册菜单项点击    itemPostJson:setPosition(cc.p(winSize.width / 2, winSize.height - margin - 4 * space))    menuRequest:addChild(itemPostJson)  end  -- 节点回调事件  local function onNodeEvent(eventName)    if "enter" == eventName then      init()    end  end    -- 注册层的监听回调事件  layer:registerScriptHandler(onNodeEvent)  return layerendfunction XMLHttpRequestTestMain()  local scene = cc.Scene:create() -- 创建场景  scene:addChild(XMLHttpRequestLayer()) -- 添加层  scene:addChild(CreateBackMenuItem()) -- 添加返回菜单项，具体实现查看helper.lua文件  return sceneend

效果图如下：

![20140811140025188][]

Test Get:

![20140811140107683][]

Test Post:

![20140811140001062][]

Test Post Binary:

![20140811140300689][]

Test Post JSON:

![20140811140326679][]

[https_blog.csdn.net_jiangjunshow]: https://blog.csdn.net/jiangjunshow/article/details/77338485
[20140811140025188]: /images/20220317/5a12669d865f4f22af986698c1a6927a.png
[20140811140107683]: /images/20220317/597e0e58d1574b70a9a8078d563ea42e.png
[20140811140001062]: /images/20220317/687e2cf017c84caea28cb105a14d22c4.png
[20140811140300689]: /images/20220317/5548d99ac89b43058d98a20f6bc70178.png
[20140811140326679]: /images/20220317/5ce6625922944da5b595db9210a98153.png