-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathFollow_Requests.txt
More file actions
22 lines (22 loc) · 1.3 KB
/
Follow_Requests.txt
File metadata and controls
22 lines (22 loc) · 1.3 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Function Follow_Requests() As String
' Need Login in your account
Dim RestClient As New RestClient("https://i.instagram.com/")
Dim RestRequest As New RestRequest("api/v1/friendships/pending/", Method.GET)
RestClient.UserAgent = "Instagram 172.0.0.21.123 Android (25/7.1.2; 192dpi; 720x1280; google; G011A; G011A; qcom; en_US; 269790795)"
RestClient.AddDefaultHeader("X-IG-Connection-Type", "WIFI")
RestClient.AddDefaultHeader("X-IG-Capabilities", "3brTvx8=")
RestClient.AddDefaultHeader("Accept-Language", "en-US")
RestClient.AddDefaultHeader("X-MID", "YDieZAABAAFQca-B7sAgwxOVyIHu")
RestClient.AddDefaultHeader("Accept-Encoding", "gzip, deflate")
RestClient.AddDefaultHeader("Host", "i.instagram.com")
RestRequest.AddCookie("csrftoken", "PRSHEq547TogDxEgxaBDmUYVY7UAits8")
RestRequest.AddCookie("sessionid", "")
RestRequest.AddCookie("mid", "YDieZAABAAFQca-B7sAgwxOVyIHu")
RestRequest.AddCookie("ig_direct_region_hint", "FRC")
RestRequest.AddCookie("rur", "FTW")
RestRequest.AddCookie("ds_user_id", "")
Dim Headers = RestClient.Execute(RestRequest)
Dim Response As String = Headers.Content
Console.WriteLine(Response)
Return Response
End Function