%
resultname="Harcourt Butler Technological Institute, Kanpur
(An autonomous Institute affiliated to UP Technical University, Lucknow)
Result of B. Tech./MCA Final Year 2014-15 has been declared. For any discrepancies/ corrections students are directed to contact the office of Controller of Examination, HBTI, Kanpur."
callHeader()
Set Conn = makeConnectionMSSQL()
Set rst = server.CreateObject("adodb.recordset")
Set rec = server.CreateObject("adodb.recordset")
if request.querystring("rollno") = "" Then
resultname="Harcourt Butler Technological Institute, Kanpur
(An autonomous Institute affiliated to UP Technical University, Lucknow)
Tentative Result of B. Tech./MCA Final Year 2014-15 has been declared.
This is tentative result incorporating the previous years Carry-Over result (if any).
For any kind of discrepancy please contact the Office of Controller of Examination, HBTI, Kanpur within 7 days."
askRollNo()
Else
resultname="Harcourt Butler Technological Institute, Kanpur
(An autonomous Institute affiliated to UP Technical University, Lucknow)
Tentative Result of B. Tech./MCA Final Year 2014-15"
rollNo = request.querystring("rollno")
validChars = true
for i = 1 to len(rollNo)
c = mid(rollNo, i, 1)
if InStr("0123456789", c) = 0 then validChars = false
next
if validChars = false then showErr_all()
'sqlStr = "SELECT * from _ResultBTechMCA_2010_2011_1_TO_3 where rollno='"& rollNo &"' and updated<>'SP'"
sqlStr = "SELECT * from _Result_2014_15_Even where rollno='"& rollNo &"' and isnull(division,'') !='' and entry like 'R%'"
'response.Write(sqlStr)
if Conn.State <> 1 then Conn.close
rec.open sqlStr,Conn,2,2
If rec.Eof = true Then
showErrorSpecial_bt09(resultname)
else
rec.Movefirst
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
end if
'---------------------------------------------------------------------------
s7Sub=""
s8Sub=""
'-------------------
%>
|
<%=resultname%> |
Name: |
<%=rec.fields("sName")%> |
Father's Name: |
<%=rec.fields("fName")%> |
Roll No: |
<%=rec.fields("rollno")%> |
Course/Branch: |
<%=rec.fields("bName")%> |
Date of declaration of result |
<%if trim(rec.fields("CourseCode")) = "20" Then%>
June 13, 2015 |
<%else%>
July 09, 2015 |
<%End if%>
MARKS DETAIL |
<%=rec.fields("sem_1")%> |
Subject Name |
Max. Marks |
Obtained Marks |
Examination |
Sessional |
Total |
Examination |
Sessional |
Total |
<%
for c = 1 to 13
if (trim(rec.fields("sub"& c &"N")) <> "" AND trim(rec.fields("sub"& c)) <> "") AND trim(rec.fields("sub"& c &"N_1")) <> "" Then
'-------------------------------------------------------------------------------
s8Sub=s8Sub &""& rec.fields("sub"& c &"N_1") &" -"& rec.fields("sub"& c &"_1") &" | "
s8Sub=s8Sub &""& rec.fields("sub"& c &"TEM_1") &" | "
s8Sub=s8Sub &""& rec.fields("sub"& c &"TSM_1") &" | "
s8Sub=s8Sub &""& rec.fields("sub"& c &"TTM_1") &" | "
s8Sub=s8Sub &""& rec.fields("sub"& c &"TEO_1") &" | "
s8Sub=s8Sub &""& rec.fields("sub"& c &"TSO_1") &" | "
s8Sub=s8Sub &""& rec.fields("sub"& c &"TTO_1") &" | "
end if
Next
response.Write(" ")
%>
<%
response.Write(s8Sub)
%>
<%=rec.fields("sem")%> |
<%
for c = 1 to 13
if (trim(rec.fields("sub"& c &"N")) <> "" AND trim(rec.fields("sub"& c)) <> "") AND trim(rec.fields("sub"& c &"N")) <> "" Then '''"sub"& c &"N" &" - "&
'-------------------------------------------------------------------------------
s7Sub=s7Sub &""& trim(rec.fields("sub"& c &"N")) &" - "& rec.fields("sub"& c) & " | "
s7Sub=s7Sub &""& rec.fields("sub"& c &"TEM") &" | "
s7Sub=s7Sub &""& rec.fields("sub"& c &"TSM") &" | "
s7Sub=s7Sub &""& rec.fields("sub"& c &"TTM") &" | "
s7Sub=s7Sub &""& rec.fields("sub"& c &"TEO") &" | "
s7Sub=s7Sub &""& rec.fields("sub"& c &"TSO") &" | "
s7Sub=s7Sub &""& rec.fields("sub"& c &"TTO") &" | "
end if
Next
response.Write(" ")
response.Write(s7Sub)
%>
|
<%If trim(rec.fields("cpon")) <> "" Then%>
Carry Over Paper(Current Year) |
<%
If (trim(rec.fields("sem")) = "SEMESTER - 1" And InStr(trim(rec.fields("rfirst")),"PCP") >0) Or (trim(rec.fields("sem")) = "SEMESTER - 3" And InStr(trim(rec.fields("rsecond")),"PCP") >0) Or (trim(rec.fields("sem")) = "SEMESTER - 5" And InStr(trim(rec.fields("rthird")),"PCP") >0) then
%>
<%=rec.fields("cpon")%> |
<% Else %>
|
<%End If %>
<%End If%>
<%If(rec.fields("bname")="MCA") then %>
Year |
Obtained Marks/Max. Marks |
Status |
First Year |
<%=trim(rec.fields("first"))%> |
<%=rec.fields("rfirst")%> |
Second Year |
<%=trim(rec.fields("second"))%> |
<%=rec.fields("rsecond")%> |
Final Year |
<%=rec.fields("totalobt")%>/<%=rec.fields("totalMX")%> |
<%=rec.fields("rthird")%> |
<%
else
%>
Year |
Obtained Marks/Max. Marks |
Year wise Status |
First Year |
<%=trim(rec.fields("first"))%> |
<%=rec.fields("rfirst")%> |
Second Year |
<%=trim(rec.fields("second"))%> |
<%=rec.fields("rsecond")%> |
Third Year |
<%=trim(rec.fields("third"))%> |
<%=rec.fields("rthird")%> |
Final Year |
<%=rec.fields("totalobt")%>/<%=rec.fields("totalMX")%> |
<%=rec.fields("rfourth")%> |
<%End if%>
<%
If trim(rec.fields("division")) <> "FAIL" Then
Division = rec.fields("division")
TotalMarks = rec.fields("grdm")
MaximumMarks = rec.fields("grdt")
percent = round((Cint(rec.fields("grdm")) * 100)/ cint(rec.fields("grdt")),2)
sMsg = " "
Else
Division = "Yet to pass Carryover Paper, Course not complete."
TotalMarks = "Nil"
MaximumMarks = "Nil"
percent = "Nil"
sMsg = ""
End If
%>
Final Results |
Division |
<%=Division%> |
Total Marks |
<%=TotalMarks%> |
Maximum Marks |
<%=MaximumMarks%> |
Percentage |
<%=percent%> |
<%=sMsg%> |
<%
END IF
callFooter_all_aug11(msg)
%>