erlang http post and get 请求

最新推荐文章于 2024-06-25 10:39:11 发布

杨宗卫的爸爸

最新推荐文章于 2024-06-25 10:39:11 发布

阅读量3.5k

点赞数

分类专栏： erlang 文章标签： http client erlang

本文链接：https://blog.csdn.net/yangzm/article/details/51506384

版权

erlang 专栏收录该内容

51 篇文章 3 订阅

订阅专栏

参考：

http://erlang.org/doc/apps/inets/http_client.html

get 请求：

％同步请求
createid() ->
   inets:start(),
   Rui = "http://some..../.php",
   {ok,Result}=httpc:request(get,{Rui,[]},[],[]),
   inets:stop(),
   Result.

post 请求：

t()->
    inets:start(),
    case httpc:request(post,{"http://192.168.0.42:8080/WeiXiaoWS/services/P2SMsgService/usr/login",
        [],"application/json", "{ \"user\":\"yamma3\",\"pwd\":\"45b9ea1d748393c9bc2ed39d10ca665d\",\"net\":\"0\",\"token\":\"token\",\"version\":\"1\"}"},[],[]) of
        {ok, {_,_,Body}}-> Body;
        {error, Reason}->io:format("error cause ~p~n",[Reason])
    end.

-define(Name,"hosr").
-define(Passwd,112233).

t()->
   inets:start(),
   case httpc:request(post,{"http://192.168.2.185:8080/login",
		[],"application/x-www-form-urlencoded", lists:concat(["username=" ,Name ,"&password=" ,Passwd])},[],[]) of 
		{ok, {_,_,Body}}-> Body;
		{error, Reason}->io:format("error cause ~p~n",[Reason])
   end.