Hola, que tal... espero que alguien pueda ayudarme... estoy armando una aplicacion asp para mi curso , en el colegio... y tengo el siguiente problema...
tengo usuarios, ke forman grupos... un usuario puede pertenecer a mas de un grupo...
al iniciar sesion, el usuario puede ver los grupos a los ke pertenece... para esto tengo tablas asi
Usuario: nombre,apellido,mail,telefono, etc...
Grupos: nombre,fecha,descripcion,creador
Integrantes: grupo,usuario
la tabla integrantes tiene los integrantes del grupo... y bueno, las hice en access, estan relacionadas y todo okey... el tema es ke kuando trato de ke la pag. asp me traiga los grupos en los ke esta el usuario de la tabla integrantes... y me traiga la fecha de la tabla grupos ... tengo problemas. Este es el codigo de mi pagina
Código:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<% 'conexion a base de datos
dim con,rs,sql2
set con = server.CreateObject("ADODB.Connection")
con.open "Driver={Microsoft Access Driver (*.mdb)};Dbq=C:\\inetpub\\wwwroot\\promo2006\\proyecto asp\proyecto.mdb;Exclusive=1;Uid='';Pwd="
set rs = server.CreateObject("ADODB.Recordset")
sql2 = "Select * From INTEGRANTES Where USUARIO=" & "'" & session("usuario") & "'"
rs.open sql2,con,1,2
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>>>>Desarrollador de Proyectos - 4to Año</title>
<link rel="stylesheet" type="text/css" href="../librerias/estilo_base.css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
</head>
<body>
<center>
<table width="750" border="0">
<% If session("categoria") = "" then %>
<tr bgcolor="#265D9D">
<td colspan="2" bgcolor="#265D9D" class="celdaBorde">
<td width="170" colspan="4" class="celdaBorde"> <%
Response.write("Hoy es " & date)
Else %>
<tr bgcolor="#265D9D">
<td colspan="2" bgcolor="#265D9D" class="celdaBorde"> Bienvenido
<% Dim nombreUsuario
nombreUsuario = session("usuario")
response.Write(nombreUsuario) %>
<td width="170" colspan="4" class="celdaBorde">
<a href="../login/logout.asp">Cerrar Sesión</a> - <a href="../login/panel.asp">Mi Cuenta</a>
<%
End If
%>
<tr>
<td colspan="3"><div align="center"><img src="../image/head.jpg" width="740" height="110"></div></td>
</tr>
<tr bgcolor="#265D9D">
<td colspan="3" class="celdaBorde"> <div align="center">| <a href="../index.asp">Home</a>
| <a href="../comentarios.asp">Comentarios</a> | <a href="../proyecto.asp">Proyectos</a>
| <a href="../grupos.asp">Grupos</a> | <a href="../usuarios.asp">Usuarios</a>
| <a href="../tesoreria.asp">Tesoreria</a> | </div>
<div align="right"></div>
<div align="center"> </div></td>
</tr>
<tr>
<td width="212"> </td>
<td width="389"><div align="center"></div></td>
<td> </td>
</tr>
</table>
<table width="88%" border="1">
<tr>
<td colspan="3" class="titularesPintados">A continuación aparecen
los grupos en los cuales tienes participación</td>
</tr>
<tr>
<td> </td>
<td> </td>
<td> </td>
</tr>
<% dim sqlGrupo,rsGrupo,grupo
Set rsGrupo = server.CreateObject("ADODB.Recordset")
while (not rs.EOF)
session("grupo") = rs.Fields("GRUPO")
sqlGrupo = "Select * FROM GRUPOS Where NOMBRE =" & "'" & session("grupo") & "'"
rsGrupo.open sqlGrupo,con,3,3
%>
<tr>
<td><strong>Nombre: </strong><% =rs.Fields("GRUPO")%></td>
<td><strong>Fecha Creación: <% =rsGrupo.Fields("FECHA")%></strong></td>
<td> </td>
</tr>
<% rs.moveNext
wend%>
</table>
<p> </p>
</center>
</body>
</html>
<%
rs.Close
con.Close
Set rs = Nothing
%>
Espero ke puedan ayudarme, muchas gracias!
