[ميدو الفنان]

---

(24-10-20, 03:52 PM)8409953 كتب : http://vb4arb.com/vb/showthread.php?tid=36608

كود :

       Dim client As New System.Net.WebClient
       Dim response = client.DownloadString(New Uri("http://yacinelivetv.com/api/getChannelsByCategory/4"))
       Dim o As JObject = JObject.Parse(response)
       Dim url As String = CStr(o.SelectToken("data[0].streams[0].url"))
       MsgBox(url)

بيديني خطا في كلمة JObject سطر
        Dim o As JObject = JObject.Parse(response)

اخي قم باضافة مكتبة Newtonsoft.Json

والله انت اسطورة شكرا جدا ليك