MODÜL HAKKINDA
Dahilileri Listeleme
Aşağıdaki api üzerinden dahili bilgileri ve register olma durumları görüntülenebilir. Json sistemi ile veriler çekilebilir.
APİ
http://{site adı}/?username={kullanıcı adı}&password={api şifresi}&action=users
EKRAN ÇIKTISI
[ { "success": true, "count": 3, "data": [ { "username": "100", "name": "Mehmet", "regstatus": "OK (93 ms)" }, { "username": "101", "name": "Telsam", "regstatus": "OK (109 ms)" }, { "username": "102", "name": "Telekom", "regstatus": "OK (91 ms)" } ] } ]
TANIMLAR
username=Dahili no
name=Dahili kullanıcısı adı
regstatus=Register durumu
DELPHİ KODU
Var JSONObject, Veriler: TJsonObject; VeriArray: TJSONArray; don:Integer; Begin JSONObject := TJsonObject.Create; try JSONObject.Parse(TEncoding.UTF8.GetBytes(NetHTTPDahili.Get(' http://xxx.telsam.com.tr/?username=ApiKullanıcıAdı&password=ApiŞifre&action=users’).ContentAsString), 1); if StrToInt(JSONObject.GetValue('count').Value)<>0 then Begin VeriArray := JSONObject.GetValue('data') as TJSONArray; for don := 0 to VeriArray.Count-1 do begin Veriler := TJsonObject.Create; try Veriler.Parse(TEncoding.UTF8.GetBytes(VeriArray.Items[don].ToString), 0); UniMemo1.Lines.Add(Veriler.GetValue(‘username’).Value); UniMemo1.Lines.Add(Veriler.GetValue('name').Value); UniMemo1.Lines.Add(Veriler.GetValue('regstatus').Value); finally Veriler.Free; end; end; End; finally JSONObject.Free; end; end;
JAVA SCRİPT KODU
function dahililisteleme(j){ var rjson=JSON.parse(j); if (rjson.success==true){ for (var i = 0; i < rjson.count; i++) { var counter = rjson.data[i]; console.log("data: "+ (i+1)); console.log("username: "+ rjson.data[i].username); console.log("name: "+ rjson.data[i].name); console.log("regstatus: "+ rjson.data[i].regstatus); } else { console.log('hata'); } }
C# KODU
using Newtonsoft.Json; using Newtonsoft.Json.Linq; void jsonparse(string json) { int count = 0; string username, name, regstatus, success; var myJObject = JObject.Parse(json); success = myJObject.SelectToken("success").Value<string>(); if (success == "True") { count = myJObject.SelectToken("count").Value<int>(); if (count > 0) { JToken[] data = myJObject["data"].ToArray(); for (int i = 0; i < count; i++) { var dataparse = JObject.Parse(data[i].ToString()); username = dataparse.SelectToken("username").Value<string>(); name = dataparse.SelectToken("name").Value<string>(); regstatus = dataparse.SelectToken("regstatus").Value<string>(); } } } }