Нашел решение проблемы https://vk.com/pages?oid=-1&p=%D0%92%D0%B7%D0%B0%D0%B8%D0%BC%D0%BE%D0%B4%D0%B5%D0%B9%D1%81%D1%82%D0%B2%D0%B8%D0%B5_%D1%81_API_%D0%B1%D0%B5%D0%B7_HTTPS
Но если полученную ссылку https://api.vk.com:443/method/execute.getUserInfo?access_token=e2876bd6d42194588b5e0d88a3aaa7af4365b35b5c5aceba710a21c85b0c35cd58bec7c6cd94746949a60&sig=b33972a8a1d505efe8425718af0ae27b Передаю в браузер все работает.Если в Http client выдает ошибку.А HttpGet вообще не отвечает --- Добавлено в 2017-10-02 02:16:50Схема на скоряк Add(MainForm,2953706,21,105)
{ Width=1109 Height=618 } Add(HTTPClient,15812528,329,147) { EncType=1 Boundary="" Point(PostData) link(URL,14280894:FString,[]) link(onFinish,15577976:doEvent1,[]) } Add(Thread,11610816,266,147) { FastStop=0 link(onExec,15812528:doLoadString,[]) } Add(Button,4806645,161,140) { Left=950 Top=15 Width=100 Height=35 Font=[MS Sans Serif,10,1,0,1] Caption="Парсить" link(onClick,9425255:doEvent1,[]) } Add(Memo,1887413,973,210) { Left=25 Top=45 Width=900 Height=165 FileName="1.txt" ScrollBars=3 link(Str,6903315:Var2,[(979,198)(874,198)]) } Add(BlockFind,9560056,413,154) { IncludeBlock=1 StartBlock="{"access_token":"" EndBlock="","expires_in" link(onSearch,8708102:doValue,[]) } Add(Hub,15577976,378,154) { OutCount=4 link(onEvent1,9560056:doSearch,[]) link(onEvent2,514870:doSearch,[(402,167)(402,209)]) link(onEvent3,9091622:doAdd,[(480,174)(480,97)]) } Add(BlockFind,514870,413,203) { IncludeBlock=1 StartBlock="secret":"" EndBlock=""}" link(onSearch,3229096:doValue,[]) } Add(Memo,9091622,567,91) { Left=25 Top=250 Width=900 Height=190 FileName="1.txt" ScrollBars=3 } Add(Memory,8708102,469,154) { } Add(Memory,3229096,476,203) { link(onData,12075861:doString,[]) } Add(FormatStr,13345695,763,203) { Mask="https://api.vk.com:443/method/execute.getUserInfo?access_token=%1&sig=%2\r\n" Point(FString) link(onFString,1887413:doAdd,[(884,209)(884,216)]) link(Str1,762216:Var2,[(769,181)(510,181)]) link(Str2,16587885:Value,[(776,191)(744,191)(744,247)(713,247)]) } Add(FormatStr,12075861,539,203) { Mask="/method/execute.getUserInfo?access_token=%1%2" Point(FString) link(onFString,4759444:doHashsum,[]) link(Str1,762216:Var3,[(545,195)]) link(Str2,3229096:Value,[(552,191)(517,191)(517,247)(482,247)]) } Add(Hashsum,4759444,595,203) { link(onResult,11835991:doModify,[]) link(Data,12075861:FString,[(601,191)(573,191)(573,247)(545,247)]) } Add(StrCase,11835991,651,203) { link(onModify,16587885:doValue,[]) } Add(Memory,16587885,707,203) { link(onData,13345695:doString,[]) } Add(GetDataEx,762216,504,190) { Angle=3 link(Data,8708102:Value,[(475,195)]) } Add(HTTPClient,14921698,861,154) { EncType=1 Boundary="" Point(PostData) } Add(Thread,2724903,798,147) { FastStop=0 } Add(Charset,2355244,910,210) { Type=7 } Add(HTTP_Get,12182166,903,154) { Wait=0 MakeExt(URL,,URL) } Add(FormatStr,14280894,329,98) { Mask="https://oauth.vk.com:443/token?grant_type=password&scope=nohttps&client_id=2274003&client_secret=hHbZxrka2uZ6jB1inYsH&username=%1&password=%2" Point(FString) link(Str1,8165020:Text,[(335,82)(300,82)]) link(Str2,7065608:Text,[(342,82)(363,82)]) } Add(Edit,8165020,294,35) { Left=55 Top=10 Width=165 } Add(Edit,7065608,357,35) { Left=255 Top=10 Width=195 } Add(GetDataEx,6903315,868,231) { Angle=2 link(Data,13345695:FString,[(874,247)(769,247)]) } Add(Hub,9425255,210,140) { link(onEvent1,14280894:doString,[(276,146)(276,104)]) link(onEvent2,11610816:doStart,[]) }
Редактировалось 8 раз(а), последний 2017-10-02 02:16:50
|