mirror of
https://github.com/Bayselonarrend/OpenIntegrations.git
synced 2024-12-10 11:10:31 +02:00
29 lines
650 B
Plaintext
29 lines
650 B
Plaintext
Token = "001.3501506236.091...";
|
|
LastID = 0;
|
|
|
|
For N = 1 To 5 Do
|
|
|
|
Result = OPI_VKTeams.GetEvents(Token, LastID, 3);
|
|
Events = Result["events"];
|
|
|
|
If Not Events.Count() = 0 Then
|
|
|
|
For Each Event In Events Do
|
|
|
|
callbackData = Event["payload"];
|
|
|
|
If callbackData["callbackData"] = "ButtonEvent1" Then
|
|
|
|
EventID = callbackData["queryId"];
|
|
Result = OPI_VKTeams.AnswerButtonEvent(Token, EventID, "Get it!");
|
|
|
|
EndIf;
|
|
|
|
EndDo;
|
|
|
|
LastID = Events[Events.UBound()]["eventId"];
|
|
|
|
EndIf;
|
|
|
|
EndDo;
|