Ver Mensaje Individual
  #1 (permalink)  
Antiguo 08/05/2003, 16:21
Avatar de vlah
vlah
 
Fecha de Ingreso: enero-2002
Mensajes: 254
Antigüedad: 23 años, 4 meses
Puntos: 0
si alguien sabe??? ayudaaa

ayuda porfavor..
tengo un formularion donde muestro materias y calificaciones de un alumno y en ese mismo formulario anexo las nuevas calificaciones y es ahi donde tengo el problema. como le puedo hacer para jalar el form


aqui el codigo..

Atemp9="SELECT NomMateria,IdMateria,Parcial1,Parcial2,final,Extra Ord,TituloInsuf FROM tblMateria,tblAlumMateria WHERE tblMateria.IdMateria=tblAlumMateria.IdMateria AND IdAlumno='"&id&"'AND Semestre ="&cint(I)
Atabla9.open Atemp9,Aconexion,2,3,1

<form name="form1" method="post" action="Insertar_Cala2.asp?func=1&id=<%=Atabla4("I dAlumno")%>">
<table>
<%while not Atabla9.eof%>
<tr>
<td><input type="text" name="IdM" value='<%=Atabla9("IdMateria")%>'></td>
<td><input type="text" name="NombreMat" value='<%=Atabla9("NomMateria")%>'></td>
<td><input type="text" name="parcial1" value='<%=Atabla9("parcial1")%>'></td>
<td><input type="text" name="parcial2" value='<%=Atabla9("parcial2")%>'></td>
.
.
</tr>
</table>
<%
Atabla9.movenext
wend
Atabla9.close
%>

if func=1 then

for each IdM IN Request.form

Atemp9="SELECT * FROM tblAlumMateria WHERE tblAlumMateria.IdAlumno='"&id&"'AND tblAlumMateria.IdMateria='"&IdM&"'"
Atabla9.open Atemp9,Aconexion,2,3,1

while not Atabla9.eof
atabla9("parcial1")=request.form("p1")
atabla9("parcial2")=request.form("p2")
atabla9("final")=request.form("final")
atabla9("ExtraOrd")=request.form("extra")
atabla9("TituloInsuf")=request.form("titulo")
atabla9.Update
Atabla9.movenext
wend
Atabla9.close
next
response.write "Transaccion Completada"
end if
end if



tambien lo tengo he hecho de esta forma, pero solo me actualiza cuando solo el alumno tiene una sola materia..


<%
if func="1" then
for I=1 to Atabla7("sem")
Atemp9="SELECT * FROM tblAlumMateria WHERE tblAlumMateria.IdAlumno='"&id&"'AND tblAlumMateria.Semestre="&cint(I)
Atabla9.open Atemp9,Aconexion,2,3,1
while not Atabla9.eof
atabla9("parcial1")=request.form("p1")
atabla9("parcial2")=request.form("p2")
atabla9("final")=request.form("final")
atabla9("ExtraOrd")=request.form("extra")
atabla9("TituloInsuf")=request.form("titulo")
atabla9.Update
atabla9.movenext
wend
atabla9.close
next
response.write "Transaccion Completada"
end if
%>



alguien sabe como hacer esto..o de que forma le puedo hacer..

se lo agradecere mucho..
__________________
<<<<VLAH>>>>> :-D