snipplrCallback({"id":20074,"title":"how-to-use-json-objects-and-jqeury-in-aspnet-part-3-jqairlinesashx","source":"
  1. <%<\/span>@ WebHandler Language=<\/span>"VB"<\/span> Class<\/span>=<\/span>"jqAirlines"<\/span> %><\/span><\/div><\/li>
  2.  <\/div><\/li>
  3. Imports<\/span> System<\/div><\/li>
  4. Imports<\/span> System.<\/span>Web<\/span><\/div><\/li>
  5. Imports<\/span> Info<\/div><\/li>
  6. Imports<\/span> BLL<\/div><\/li>
  7. Imports<\/span> System.<\/span>Collections<\/span>.<\/span>Generic<\/span><\/div><\/li>
  8.  <\/div><\/li>
  9. Public<\/span> Class<\/span> jqAirlines : Implements<\/span> IHttpHandler<\/div><\/li>
  10.  <\/div><\/li>
  11.     Public<\/span> Sub<\/span> ProcessRequest(<\/span>ByVal<\/span> context As<\/span> HttpContext)<\/span> Implements<\/span> IHttpHandler.<\/span>ProcessRequest<\/span><\/div><\/li>
  12.         Dim<\/span> action As<\/span> String<\/span> =<\/span> context.<\/span>Request<\/span>.<\/span>QueryString<\/span>(<\/span>"action"<\/span>)<\/span><\/div><\/li>
  13.  <\/div><\/li>
  14.         If<\/span> action =<\/span> "list"<\/span> Then<\/span><\/div><\/li>
  15.  <\/div><\/li>
  16.  <\/div><\/li>
  17.             Dim<\/span> bll As<\/span> New<\/span> AirlinesBLL<\/div><\/li>
  18.             Dim<\/span> lstAir As<\/span> New<\/span> List(<\/span>Of<\/span> TarrifAirlines)<\/span><\/div><\/li>
  19.             Dim<\/span> strJsonAir As<\/span> String<\/span><\/div><\/li>
  20.  <\/div><\/li>
  21.             context.<\/span>Response<\/span>.<\/span>ContentType<\/span> =<\/span> "application\/json"<\/span><\/div><\/li>
  22.             context.<\/span>Response<\/span>.<\/span>ContentEncoding<\/span> =<\/span> Encoding.<\/span>UTF8<\/span><\/div><\/li>
  23.  <\/div><\/li>
  24.             Dim<\/span> count As<\/span> Integer<\/span><\/div><\/li>
  25.             Dim<\/span> pageSize As<\/span> Integer<\/span> =<\/span> Val<\/span><\/a>(<\/span>context.<\/span>Request<\/span>(<\/span>"pageSize"<\/span>)<\/span>)<\/span><\/div><\/li>
  26.  <\/div><\/li>
  27.             If<\/span> pageSize <=<\/span> 0<\/span> Then<\/span> pageSize =<\/span> 20<\/span><\/div><\/li>
  28.  <\/div><\/li>
  29.             Dim<\/span> startRecord As<\/span> Integer<\/span> =<\/span> Val<\/span><\/a>(<\/span>context.<\/span>Request<\/span>(<\/span>"startRecord"<\/span>)<\/span>)<\/span><\/div><\/li>
  30.             If<\/span> startRecord <<\/span> 0<\/span> Then<\/span> startRecord =<\/span> 0<\/span><\/div><\/li>
  31.  <\/div><\/li>
  32.  <\/div><\/li>
  33.             Dim<\/span> writer As<\/span> New<\/span> StringBuilder<\/div><\/li>
  34.             count =<\/span> bll.<\/span>CountAirlinesJQ<\/span><\/div><\/li>
  35.  <\/div><\/li>
  36.             lstAir =<\/span> bll.<\/span>GetAirlinesJQ<\/span>(<\/span>pageSize, startRecord, ""<\/span>)<\/span><\/div><\/li>
  37.             Dim<\/span> finishRecord As<\/span> Integer<\/span> =<\/span> startRecord +<\/span> pageSize<\/div><\/li>
  38.             If<\/span> finishRecord ><\/span> count Then<\/span> finishRecord =<\/span> count<\/div><\/li>
  39.  <\/div><\/li>
  40.             strJsonAir =<\/span> Newtonsoft.<\/span>Json<\/span>.<\/span>JavaScriptConvert<\/span>.<\/span>SerializeObject<\/span>(<\/span>lstAir)<\/span><\/div><\/li>
  41.  <\/div><\/li>
  42.             writer.<\/span>AppendFormat<\/span>(<\/span>"{0} Count: {1}, PageSize: {2}, StartRecord: {3}, FinishRecord: {4}, Data: "<\/span>, _<\/div><\/li>
  43.             "{"<\/span>, count, pageSize, startRecord, finishRecord)<\/span><\/div><\/li>
  44.  <\/div><\/li>
  45.             context.<\/span>Response<\/span>.<\/span>Write<\/span>(<\/span>writer.<\/span>ToString<\/span>)<\/span><\/div><\/li>
  46.             context.<\/span>Response<\/span>.<\/span>Write<\/span>(<\/span>strJsonAir)<\/span><\/div><\/li>
  47.             context.<\/span>Response<\/span>.<\/span>Write<\/span>(<\/span>"}"<\/span>)<\/span><\/div><\/li>
  48.             context.<\/span>Response<\/span>.<\/span>End<\/span>(<\/span>)<\/span><\/div><\/li>
  49.         End<\/span> If<\/span><\/div><\/li>
  50.  <\/div><\/li>
  51.     End<\/span> Sub<\/span><\/div><\/li>
  52.  <\/div><\/li>
  53.     Public<\/span> ReadOnly<\/span> Property<\/span> IsReusable(<\/span>)<\/span> As<\/span> Boolean<\/span> Implements<\/span> IHttpHandler.<\/span>IsReusable<\/span><\/div><\/li>
  54.         Get<\/span><\/div><\/li>
  55.             Return<\/span> False<\/span><\/div><\/li>
  56.         End<\/span> Get<\/span><\/div><\/li>
  57.     End<\/span> Property<\/span><\/div><\/li>
  58.  <\/div><\/li>
  59. End<\/span> Class<\/span><\/div><\/li><\/ol><\/pre>","link":"https:\/\/snipplr.com\/view\/20074\/how-to-use-json-objects-and-jqeury-in-aspnet-part-3-jqairlinesashx"});