Advertisement
Guest User

Untitled

a guest
Oct 1st, 2017
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.61 KB | None | 0 0
  1. UserID = 128;
  2. Password = "jlnr-ldnq-yuak";
  3.  
  4. Connection = New HTTPConnection( "repbase.ru", 443, , , , , New OpenSSLSecureConnection() );
  5. Query = New HTTPЗапрос("/TSD/api0/api.php?operation=getList&iduser=" + UserID + "&password=" + Password);
  6. Answer = Connection.Get(Query);
  7.  
  8. If Answer.StatusCode = 200 Then
  9. PageText = Answer.ПолучитьТелоКакСтроку();
  10. If TrimAll(PageText) = "Error: wrong password" Then
  11. Message("Wrong password", MessageStatus.Important);
  12. Else
  13. Message(PageText);
  14. EndIf;
  15. Else
  16. Message("Wrong server answer: " + Answer.StatusCode);
  17. EndIf;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement