Imports System
Imports System.Web
Imports System.Data
Imports System.Configuration
Imports System.Data.SqlClient
Imports System.Collections.Generic
Imports System.Web.Script.Serialization
Imports NewgradingforAlevel
Imports Computescoresforalevel
Imports Grades
Public Class HandlerVB : Implements IHttpHandler
Public Sub ProcessRequest(ByVal context As HttpContext) Implements IHttpHandler.ProcessRequest
Dim callback As String = context.Request.QueryString("callback")
Dim customerId As String = context.Request.QueryString("customerId")
Dim json As String = Me.GetCustomersJSON(customerId)
If Not String.IsNullOrEmpty(callback) Then
json = String.Format("{0}({1});", callback, json)
End If
context.Response.ContentType = "text/json"
context.Response.Write(json)
End Sub
Private Function GetCustomersJSON(customerId As String) As String
Dim customers As New List(Of Object)()
Dim newgradingforAlevel = New NewgradingforAlevel()
Dim computescoresforalevel = New Computescoresforalevel()
Dim Grades = New Grades()
' Dim art As String
Using conn As New SqlConnection()
conn.ConnectionString = ConfigurationManager.ConnectionStrings("constr").ConnectionString
Using cmd As New SqlCommand()
cmd.CommandText = "SELECT * FROM ALEVELREPORTandroid WHERE ACCOUNT = @CustomerId"
cmd.Parameters.AddWithValue("@CustomerId", customerId)
cmd.Connection = conn
conn.Open()
Using sdr As SqlDataReader = cmd.ExecuteReader()
While sdr.Read()
customers.Add(New With {
.ACCOUNT = sdr("ACCOUNT"),
.Name = sdr("Name"),
.Class = sdr("Class"),
.House = sdr("House"),
.Trm = sdr("trm"),
.artscience = sdr("artscience"),
.h15 = Grades.gradingarts(sdr("h15")),
.h25 = Grades.gradingarts(sdr("h25")),
.h35 = Grades.gradingarts(sdr("h35")),
.GP = Grades.gradingarts(sdr("g5")),
.HISP = IIf(computescoresforalevel.CountHis(Grades.gradingarts(sdr("h15")), Grades.gradingarts(sdr("h25")), Grades.gradingarts(sdr("h35"))), newgradingforAlevel.SCOREHIS(Grades.gradingarts(sdr("h15")), Grades.gradingarts(sdr("h25")), Grades.gradingarts(sdr("h35"))), ""),
.GPPoints = IIf(Grades.gradingarts(sdr("g5")) = "P7" Or Grades.gradingarts(sdr("g5")) = "P8" Or Grades.gradingarts(sdr("g5")) = "F9" Or Grades.gradingarts(sdr("g5")) = "", "F", "O"),
.PhyPoints = IIf(Grades.gradingsci(sdr("b15")) = "" And Grades.gradingsci(sdr("b25")) = "" And Grades.gradingsci(sdr("b35")) = "", "", newgradingforAlevel.SCORE3(Grades.gradingsci(sdr("b15")), Grades.gradingsci(sdr("b25")), Grades.gradingsci(sdr("b35")))),
.GeogPoints = IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("f15")), Grades.gradingarts(sdr("f25")), Grades.gradingarts(sdr("f35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("f15")), Grades.gradingarts(sdr("f25")), Grades.gradingarts(sdr("f35"))), ""),
.EconPointst = IIf(sdr("Class") = "S5" And sdr("necon") = 1 And computescoresforalevel.Countone(Grades.gradingecon(sdr("g15"))), computescoresforalevel.Score1(Grades.gradingecon(sdr("g15"))), IIf(computescoresforalevel.Counttwo(Grades.gradingecon(sdr("g15")), Grades.gradingecon(sdr("g25"))), newgradingforAlevel.SCORE(Grades.gradingecon(sdr("g15")), Grades.gradingecon(sdr("g25"))), "")),
.LitPoints = IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("i15")), Grades.gradingarts(sdr("i25")), Grades.gradingarts(sdr("i35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("i15")), Grades.gradingarts(sdr("i25")), Grades.gradingarts(sdr("i35"))), ""),
.IREPoints = IIf(computescoresforalevel.Countdiv(Grades.gradingarts(sdr("e15")), Grades.gradingarts(sdr("e25")), Grades.gradingarts(sdr("e35")), Grades.gradingarts(sdr("e45"))), newgradingforAlevel.SCOREdiv(Grades.gradingarts(sdr("e15")), Grades.gradingarts(sdr("e25")), Grades.gradingarts(sdr("e35")), Grades.gradingarts(sdr("e45"))), ""),
.LugPoints = IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("j15")), Grades.gradingarts(sdr("j25")), Grades.gradingarts(sdr("j35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("j15")), Grades.gradingarts(sdr("j25")), Grades.gradingarts(sdr("j35"))), ""),
.artpoints = IIf(computescoresforalevel.artpapers(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))) = 3, newgradingforAlevel.SCOREart(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))), IIf(computescoresforalevel.artpapers(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))) = 4, newgradingforAlevel.SCOREART4(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))), "")),
.FoodPoints = IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("r15")), Grades.gradingarts(sdr("r25")), Grades.gradingarts(sdr("r35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("j15")), Grades.gradingarts(sdr("r25")), Grades.gradingarts(sdr("r35"))), ""),
.TDPoints = IIf(computescoresforalevel.TDpapers(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))) = 2, newgradingforAlevel.SCOREHIS(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))), IIf(computescoresforalevel.TDpapers(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))) = 3, newgradingforAlevel.SCORE3(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))), "")),
.GermanPoints = IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("u15")), Grades.gradingarts(sdr("u25")), Grades.gradingarts(sdr("u35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("u15")), Grades.gradingarts(sdr("u25")), Grades.gradingarts(sdr("u35"))), ""),
.WoodPoints = IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("p15")), Grades.gradingarts(sdr("p25")), Grades.gradingarts(sdr("p35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("p15")), Grades.gradingarts(sdr("p25")), Grades.gradingarts(sdr("p35"))), ""),
.ArabPoints = IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("v15")), Grades.gradingarts(sdr("v25")), Grades.gradingarts(sdr("v35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("v15")), Grades.gradingarts(sdr("v25")), Grades.gradingarts(sdr("v35"))), ""),
.EnterprPoints = IIf(sdr("Class") = "S5" And computescoresforalevel.Countone(Grades.gradingarts(sdr("z15"))) And sdr("nent") = 1, computescoresforalevel.Score1(Grades.gradingarts(sdr("z15"))), IIf(computescoresforalevel.Counttwo(Grades.gradingarts(sdr("z15")), Grades.gradingarts(sdr("z25"))), newgradingforAlevel.SCORE(Grades.gradingarts(sdr("z15")), Grades.gradingarts(sdr("z25"))), "")),
.SubMathPoints = IIf(computescoresforalevel.Counttwo(Grades.gradingsci(sdr("m15")), Grades.gradingsci(sdr("m25"))), IIf(computescoresforalevel.SCOREsubmath(Grades.gradingsci(sdr("m15")), Grades.gradingsci(sdr("m25"))) = "P7" Or computescoresforalevel.SCOREsubmath(Grades.gradingsci(sdr("m15")), Grades.gradingsci(sdr("m25"))) = "P8" Or computescoresforalevel.SCOREsubmath(Grades.gradingsci(sdr("m15")), Grades.gradingsci(sdr("m25"))) = "F9", "F", IIf(computescoresforalevel.SCOREsubmath(Grades.gradingsci(sdr("m15")), Grades.gradingsci(sdr("m25"))) = "", "", "O")), ""),
.CompPOINTS = IIf(computescoresforalevel.Counttwo(Grades.gradingsci(sdr("s15")), Grades.gradingsci(sdr("s25"))), IIf(computescoresforalevel.SCOREsubmath(Grades.gradingsci(sdr("s15")), Grades.gradingsci(sdr("s25"))) = "P7" Or computescoresforalevel.SCOREsubmath(Grades.gradingsci(sdr("s15")), Grades.gradingsci(sdr("s25"))) = "P8" Or computescoresforalevel.SCOREsubmath(Grades.gradingsci(sdr("s15")), Grades.gradingsci(sdr("s25"))) = "F9", "F", IIf(computescoresforalevel.SCOREsubmath(Grades.gradingsci(sdr("s15")), Grades.gradingsci(sdr("s25"))) = "", "", "O")), ""),
.Principle = computescoresforalevel.POINTS(IIf(computescoresforalevel.artpapers(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))) = 3, newgradingforAlevel.SCOREart(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))), IIf(computescoresforalevel.artpapers(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))) = 4, newgradingforAlevel.SCOREART4(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))), ""))) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("f15")), Grades.gradingarts(sdr("f25")), Grades.gradingarts(sdr("f35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("f15")), Grades.gradingarts(sdr("f25")), Grades.gradingarts(sdr("f35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("j15")), Grades.gradingarts(sdr("j25")), Grades.gradingarts(sdr("j35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("j15")), Grades.gradingarts(sdr("j25")), Grades.gradingarts(sdr("j35"))), "")) + computescoresforalevel.POINTS(IIf(sdr("Class") = "S5" And sdr("necon") = 1 And computescoresforalevel.Countone(Grades.gradingecon(sdr("g15"))), computescoresforalevel.Score1(Grades.gradingecon(sdr("g15"))), IIf(computescoresforalevel.Counttwo(Grades.gradingecon(sdr("g15")), Grades.gradingecon(sdr("g25"))), newgradingforAlevel.SCORE(Grades.gradingecon(sdr("g15")), Grades.gradingecon(sdr("g25"))), ""))) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("r15")), Grades.gradingarts(sdr("r25")), Grades.gradingarts(sdr("r35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("j15")), Grades.gradingarts(sdr("r25")), Grades.gradingarts(sdr("r35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("p15")), Grades.gradingarts(sdr("p25")), Grades.gradingarts(sdr("p35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("p15")), Grades.gradingarts(sdr("p25")), Grades.gradingarts(sdr("p35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("u15")), Grades.gradingarts(sdr("u25")), Grades.gradingarts(sdr("u35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("u15")), Grades.gradingarts(sdr("u25")), Grades.gradingarts(sdr("u35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.TDpapers(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))) = 2, newgradingforAlevel.SCOREHIS(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))), IIf(computescoresforalevel.TDpapers(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))) = 3, newgradingforAlevel.SCORE3(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))), ""))) + computescoresforalevel.POINTS(IIf(computescoresforalevel.CountHis(Grades.gradingarts(sdr("h15")), Grades.gradingarts(sdr("h25")), Grades.gradingarts(sdr("h35"))), newgradingforAlevel.SCOREHIS(Grades.gradingarts(sdr("h15")), Grades.gradingarts(sdr("h25")), Grades.gradingarts(sdr("h35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("i15")), Grades.gradingarts(sdr("i25")), Grades.gradingarts(sdr("i35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("i15")), Grades.gradingarts(sdr("i25")), Grades.gradingarts(sdr("i35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countdiv(Grades.gradingarts(sdr("e15")), Grades.gradingarts(sdr("e25")), Grades.gradingarts(sdr("e35")), Grades.gradingarts(sdr("e45"))), newgradingforAlevel.SCOREdiv(Grades.gradingarts(sdr("e15")), Grades.gradingarts(sdr("e25")), Grades.gradingarts(sdr("e35")), Grades.gradingarts(sdr("e45"))), "")) + computescoresforalevel.POINTS(IIf(sdr("Class") = "S5" And computescoresforalevel.Countone(Grades.gradingarts(sdr("z15"))) And sdr("nent") = 1, computescoresforalevel.Score1(Grades.gradingarts(sdr("z15"))), IIf(computescoresforalevel.Counttwo(Grades.gradingarts(sdr("z15")), Grades.gradingarts(sdr("z25"))), newgradingforAlevel.SCORE(Grades.gradingarts(sdr("z15")), Grades.gradingarts(sdr("z25"))), ""))) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("v15")), Grades.gradingarts(sdr("v25")), Grades.gradingarts(sdr("v35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("v15")), Grades.gradingarts(sdr("v25")), Grades.gradingarts(sdr("v35"))), "")),
.Subsidiary = computescoresforalevel.POINTSgp(Grades.gradingarts(sdr("g5"))) + computescoresforalevel.POINTSgp(computescoresforalevel.SCOREsubmath(Grades.gradingarts(sdr("m15")), Grades.gradingarts(sdr("m25")))) + computescoresforalevel.POINTSgp(computescoresforalevel.SCOREsubmath(Grades.gradingarts(sdr("s15")), Grades.gradingarts(sdr("s25")))),
.TotalPoints = computescoresforalevel.POINTS(IIf(computescoresforalevel.artpapers(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))) = 3, newgradingforAlevel.SCOREart(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))), IIf(computescoresforalevel.artpapers(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))) = 4, newgradingforAlevel.SCOREART4(Grades.gradingarts(sdr("k15")), Grades.gradingarts(sdr("k25")), Grades.gradingarts(sdr("k35")), Grades.gradingarts(sdr("k45")), Grades.gradingarts(sdr("k55")), Grades.gradingarts(sdr("k65"))), ""))) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("f15")), Grades.gradingarts(sdr("f25")), Grades.gradingarts(sdr("f35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("f15")), Grades.gradingarts(sdr("f25")), Grades.gradingarts(sdr("f35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("j15")), Grades.gradingarts(sdr("j25")), Grades.gradingarts(sdr("j35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("j15")), Grades.gradingarts(sdr("j25")), Grades.gradingarts(sdr("j35"))), "")) + computescoresforalevel.POINTS(IIf(sdr("Class") = "S5" And sdr("necon") = 1 And computescoresforalevel.Countone(Grades.gradingecon(sdr("g15"))), computescoresforalevel.Score1(Grades.gradingecon(sdr("g15"))), IIf(computescoresforalevel.Counttwo(Grades.gradingecon(sdr("g15")), Grades.gradingecon(sdr("g25"))), newgradingforAlevel.SCORE(Grades.gradingecon(sdr("g15")), Grades.gradingecon(sdr("g25"))), ""))) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("r15")), Grades.gradingarts(sdr("r25")), Grades.gradingarts(sdr("r35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("j15")), Grades.gradingarts(sdr("r25")), Grades.gradingarts(sdr("r35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("p15")), Grades.gradingarts(sdr("p25")), Grades.gradingarts(sdr("p35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("p15")), Grades.gradingarts(sdr("p25")), Grades.gradingarts(sdr("p35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("u15")), Grades.gradingarts(sdr("u25")), Grades.gradingarts(sdr("u35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("u15")), Grades.gradingarts(sdr("u25")), Grades.gradingarts(sdr("u35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.TDpapers(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))) = 2, newgradingforAlevel.SCOREHIS(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))), IIf(computescoresforalevel.TDpapers(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))) = 3, newgradingforAlevel.SCORE3(Grades.gradingsci(sdr("w15")), Grades.gradingsci(sdr("w25")), Grades.gradingsci(sdr("w35"))), ""))) + computescoresforalevel.POINTS(IIf(computescoresforalevel.CountHis(Grades.gradingarts(sdr("h15")), Grades.gradingarts(sdr("h25")), Grades.gradingarts(sdr("h35"))), newgradingforAlevel.SCOREHIS(Grades.gradingarts(sdr("h15")), Grades.gradingarts(sdr("h25")), Grades.gradingarts(sdr("h35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("i15")), Grades.gradingarts(sdr("i25")), Grades.gradingarts(sdr("i35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("i15")), Grades.gradingarts(sdr("i25")), Grades.gradingarts(sdr("i35"))), "")) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countdiv(Grades.gradingarts(sdr("e15")), Grades.gradingarts(sdr("e25")), Grades.gradingarts(sdr("e35")), Grades.gradingarts(sdr("e45"))), newgradingforAlevel.SCOREdiv(Grades.gradingarts(sdr("e15")), Grades.gradingarts(sdr("e25")), Grades.gradingarts(sdr("e35")), Grades.gradingarts(sdr("e45"))), "")) + computescoresforalevel.POINTS(IIf(sdr("Class") = "S5" And computescoresforalevel.Countone(Grades.gradingarts(sdr("z15"))) And sdr("nent") = 1, computescoresforalevel.Score1(Grades.gradingarts(sdr("z15"))), IIf(computescoresforalevel.Counttwo(Grades.gradingarts(sdr("z15")), Grades.gradingarts(sdr("z25"))), newgradingforAlevel.SCORE(Grades.gradingarts(sdr("z15")), Grades.gradingarts(sdr("z25"))), ""))) + computescoresforalevel.POINTS(IIf(computescoresforalevel.Countthree(Grades.gradingarts(sdr("v15")), Grades.gradingarts(sdr("v25")), Grades.gradingarts(sdr("v35"))), newgradingforAlevel.SCORE3(Grades.gradingarts(sdr("v15")), Grades.gradingarts(sdr("v25")), Grades.gradingarts(sdr("v35"))), "")) + computescoresforalevel.POINTSgp(Grades.gradingarts(sdr("g5"))) + computescoresforalevel.POINTSgp(computescoresforalevel.SCOREsubmath(Grades.gradingarts(sdr("m15")), Grades.gradingarts(sdr("m25")))) + computescoresforalevel.POINTSgp(computescoresforalevel.SCOREsubmath(Grades.gradingarts(sdr("s15")), Grades.gradingarts(sdr("s25"))))})
End While
End Using
conn.Close()
End Using
Return (New JavaScriptSerializer().Serialize(customers))
End Using
End Function
Public ReadOnly Property IsReusable() As Boolean Implements IHttpHandler.IsReusable
Get
Return False
End Get
End Property
End Class
Server Error in '/Generic_Handler_JSON' Application.
Operator '=' is not defined for type 'DBNull' and type 'Integer'.
Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.
Exception Details: System.InvalidCastException: Operator '=' is not defined for type 'DBNull' and type 'Integer'.
Source Error:
Line 41: Using sdr As SqlDataReader = cmd.ExecuteReader()
Line 42: While sdr.Read()
Line 43: customers.Add(New With {
Line 44: .ACCOUNT = sdr("ACCOUNT"),
Line 45: .Name = sdr("Name"),
This is what i was trying to pass
http://kccug.com/Generic_Handler_JSON/HandlerVBAlevelreport.ashx?customerId=05-00005
