3

我开发了这个功能:

sms_sentByHttp(NumPhone,MsgReceived) ->

    NumPhoneTroncated = string:sub_string(NumPhone,2),
    {X1, X2, X3} = erlang:now(),
    Rand = random:uniform(9999),
    {{Y,M,D},{H,Mn,S}}=erlang:universaltime(),
    Ws_req_id = lists:flatten(io_lib:format("~p~p~p~p~p~p~p~p", [X3, Rand,Y,M,D,H,M,S])),
   Url = io_lib:format("http://localhost:7703/enda?msg=~s&from=~s&id=~s", [http_urii:encode(MsgReceived),http_urii:encode(NumPhoneTroncated),Ws_req_id]),

    case http:request(lists:flatten(Url)) of
        {ok , A} -> io:format("response sent\n");
        {error, B} -> io:format("response not sent\n ~w\n", [B])
    end.

现在我想在请求中添加超时的概念,例如 20 秒后。我想显示来自服务器的错误

我试过:

case http:request(lists:flatten(Url),[ {timeout,timer:seconds(20)}]) of
           {ok , A} -> io:format("response sent\n");
    {error, B} -> io:format("error from server\n ~w\n", [B])
        end.
4

1 回答 1

4

我建议使用ibrowse作为您的 HTTP 客户端。它在 send_req/6 中包含一个超时参数(以及更多微调超时的选项)。它通常也比默认包含的 inets 库更有效。

另一种选择是lhttpc,但这显然使用环境变量来设置超时,如果您需要更改某些请求的超时,这将是一个问题。

编辑:

httpc:request/4允许您将超时指定为 HTTPOptions 的一部分,例如:

httpc:request(get, {URL, []}, [{timeout, timer:seconds(20)}], []).
于 2013-01-03T17:12:59.927 回答