не буду создавать новой темы, если кто подскажет что не так буду благодарен
и так что имеем:
ошибка загрузки документа в вк:
Свернуть ↑
Код:
<?xml version="1.0" encoding="utf-8"?>
<error>
<error_code>5</error_code>
<error_msg>User authorization failed: user revoke access for this token.</error_msg>
<request_params list="true">
<param>
<key>oauth</key>
<value>1</value>
</param>
<param>
<key>method</key>
<value>docs.save.xml</value>
</param>
<param>
<key>act</key>
<value>add_doc</value>
</param>
<param>
<key>mid</key>
<value>22930688</value>
</param>
<param>
<key>aid</key>
<value>0</value>
</param>
<param>
<key>gid</key>
<value>0</value>
</param>
<param>
<key>hash</key>
<value>fee6854eef436393edbe2363b4a3ab4d</value>
</param>
<param>
<key>rhash</key>
<value>9df4c59cf3a767abfe23a23ee4634ee9</value>
</param>
<param>
<key>api</key>
<value>1</value>
</param>
<param>
<key>access_token</key>
<value>33ecb57ada713a3d9ec42a7d795e7aaea67047c0f575cfdfb3579799fc3a8b7072fd31=
aa356e54fad493b</value>
</param>
</request_params>
</error>
Свернуть ↑Развернуть ↓
в ошибке указано что использован не верный токен ???
не верный он не может быть так как получаю и сразу использую в той же программе
Код:
function Pars(TextIn, Text, TextOut: string): string;
var
TempStr: string;
begin
Result:='';
TempStr:=Text;
TempStr:=Copy(TempStr, Pos(TextIn, TempStr) +Length(TextIn), Length(TempStr));
Delete(TempStr, Pos(TextOut, TempStr), Length(TempStr));
Result:=TempStr;
end;
Код:
begin
WebBrowser1.Navigate('http://oauth.vk.com/authorize?client_id=3648678&scope=notify,friends,photos,audio,video,docs,notes,pages,messages,notifications,stats,ads,offline&redirect_uri=http://oauth.vk.com/blank.html&display=page&response_type=token');
// пользовался не авторизовался, пробуем еще раз
end
else
if Pos('http://oauth.vk.com/blank.html#access_token',URL)<>0 then
begin
data:= WebBrowser1.LocationURL;
form1.Memo2.Text:= WebBrowser1.LocationURL;
form1.sLabel4.caption:= Pars('access_token=', data, '&expires_in');
текст в левом memo - оригинальная строка, на лейбле - готовый токен
снифер показывает следующие:
ну и на закуску
http://vk.com/pages?oid=-1&p=docs.save док по методу
уже не представляю где мог накосячить
убейте меня веником....