Help
Olha só estou desenvolvendo um sistema de boletim escolar e estou com algumas dúvidas, antes de mais nada meu msn é ivan_nci@Hotmail.com quem tiver interesse em trocar idéias sobre o assunto entrar em contato.
o Esquema é o seguinte:
TENHO UMA TABELA ASSIM:
E A PÁGINA ABRE OS DADOS DA SEGUINTE FORMA:
E segue o codigo da pagina:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="conexao.asp" -->
<%
set rsboletim = server.CreateObject("ADODB.Recordset")
SQL3 = "SELECT * FROM BOLETIM WHERE ID_ALUNO = "&request.QueryString("id")
rsboletim.open SQL3, conexao
set rsaluno = server.CreateObject("ADODB.Recordset")
SQL2 = "SELECT * FROM ALUNOS WHERE ID = "&request.QueryString("id")
rsaluno.open SQL2, conexao
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Descrição da turma</title>
<link href="css.css" rel="stylesheet" type="text/css" />
</head>
<body>
<%
If rsboletim.EOF Then
%>
<table border="0" align="center" cellpadding="0" cellspacing="5">
<tr>
<td>NENHUM REGISTRO CADASTRADO! </td>
</tr>
</table>
<%
else
%>
<table border="0" align="center" cellpadding="0" cellspacing="5">
<tr>
<td><strong>BOLETIM DO ALUNO: <%=rsaluno("nome")%> </td>
</tr>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="3">
<tr>
<td bgcolor="#999999"><div align="center">DISCIPLINA</div></td>
<td bgcolor="#999999"> <div align="center">1 BIMESTRE </div></td>
<td bgcolor="#999999"> <div align="center">2 BIMESTRE </div></td>
<td bgcolor="#999999"> <div align="center">3 BIMESTRE </div></td>
<td bgcolor="#999999"> <div align="center">4 BIMESTRE </div></td>
</tr>
<%
Do While Not rsboletim.EOF
set rsmateria = server.CreateObject("ADODB.Recordset")
SQL = "SELECT NOME FROM DISCIPLINAS WHERE ID_DISCIPLINA = "&rsboletim("id_disciplina")&""
rsmateria.open SQL, conexao
set rsnota = server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM BOLETIM WHERE ID_DISCIPLINA = "&rsboletim("id_disciplina")&""
rsnota.open SQL, conexao
%>
<tr>
<td bgcolor="#CCCCCC"> <strong><i><%=rsmateria("nome")%></i></strong></div></td>
<td bgcolor="#B1C3D9"><div align="center"><%=rsnota("nota1")%></div></td>
<td bgcolor="#B1C3D9"><div align="center"><%=rsnota("nota2")%></div></td>
<td bgcolor="#B1C3D9"><div align="center"><%=rsnota("nota3")%></div></td>
<td bgcolor="#B1C3D9"><div align="center"><%=rsnota("nota4")%></div></td>
</tr>
<%
rsboletim.MoveNext
LOOP
%>
</table></td>
</tr>
</table>
<p>
<%
end if
%>
</p>
</body>
</html>
