<% resultname="Result of Final Year B.Tech/ MCA Even Semester Exams 2011-2012 has been declared. Any discrepancies/mistakes may be reported to the COE office, HBTI, Kanpur immediately." callHeader() Set Conn = makeConnectionMSSQL() Set rst = server.CreateObject("adodb.recordset") Set rec = server.CreateObject("adodb.recordset") if request.querystring("rollno") = "" then askRollNo() else 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 ResultBTechMCA_2011_2012 where rollno='"& rollNo &"'" '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="" if ucase(trim(rec.fields("UPDATED")))="C" then showErrorSpecial_dues(resultName) end if if trim(rec.fields("rollno"))="0904510035" or trim(rec.fields("rollno"))="0904514060" then showErrorHeald(resultName) end if '------------------- %>

<%=resultname%>


Name: <%=rec.fields("sName")%>
Father's Name: <%=rec.fields("fName")%>
Roll No: <%=rec.fields("rollno")%>
Course/Branch: <%=rec.fields("bName")%>

MARKS DETAIL
<% 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 &"" s8Sub=s8Sub &"" s8Sub=s8Sub &"" s8Sub=s8Sub &"" s8Sub=s8Sub &"" s8Sub=s8Sub &"" s8Sub=s8Sub &"" end if Next response.Write("") %> <% response.Write(s8Sub) %> <% 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 &"" s7Sub=s7Sub &"" s7Sub=s7Sub &"" s7Sub=s7Sub &"" s7Sub=s7Sub &"" s7Sub=s7Sub &"" s7Sub=s7Sub &"" end if Next response.Write("") response.Write(s7Sub) %>
<%=rec.fields("sem_1")%>
Subject Name
Max. Marks
Obtained Marks
Examination Sessional Total Examination Sessional Total
"& rec.fields("sub"& c &"N_1") &" -"& rec.fields("sub"& c &"_1") &""& rec.fields("sub"& c &"TEM_1") &""& rec.fields("sub"& c &"TSM_1") &""& rec.fields("sub"& c &"TTM_1") &""& rec.fields("sub"& c &"TEO_1") &""& rec.fields("sub"& c &"TSO_1") &""& rec.fields("sub"& c &"TTO_1") &"
<%=rec.fields("sem")%>
"& trim(rec.fields("sub"& c &"N")) &" - "& rec.fields("sub"& c) & ""& rec.fields("sub"& c &"TEM") &""& rec.fields("sub"& c &"TSM") &""& rec.fields("sub"& c &"TTM") &""& rec.fields("sub"& c &"TEO") &""& rec.fields("sub"& c &"TSO") &""& rec.fields("sub"& c &"TTO") &"

<%If trim(rec.fields("crpp")) <> "" Then%> <% 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 %> <% Else %> <%End If %> <%End If%>
Carry Over Paper(Current Year)<%=rec.fields("cpon")%>

<% if trim(rec.fields("sem")) = "SEMESTER - 1" then %> <% elseif trim(rec.fields("sem")) = "SEMESTER - 3" then %> <% elseif trim(rec.fields("sem")) = "SEMESTER - 5" then %> <% end if %> <% if trim(rec.fields("sem")) = "SEMESTER - 1" And UCase(Trim(rec.fields("rfirst"))) <> "PASS" then %> <% elseif trim(rec.fields("sem")) = "SEMESTER - 3" And UCase(Trim(rec.fields("rsecond"))) <> "PASS" then %> <% elseif trim(rec.fields("sem")) = "SEMESTER - 5" And UCase(Trim(rec.fields("rthird"))) <> "PASS" then %> <% end if %>
Result
Obtained Marks/Max. Marks <%=rec.fields("totalobt")%>/<%=rec.fields("totalMX")%>
Status<%=rec.fields("rfirst")%><%=rec.fields("rsecond")%><%=rec.fields("rthird")%>
Carry Over Paper/Grace Paper<%=rec.fields("cpon")%><%=rec.fields("cpon")%><%=rec.fields("cpon")%>
<%=sMsg%>
<% END IF callFooter_all_aug11(msg) %>