He modificado el código y ahora en lugar de usar el inner join he usado el
left outer join pero ahora me da el siguiente error
Gracias
Cita: Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Microsoft Access Driver] Type mismatch in expression.
/admin-ampliarpermisosblog.asp, line 30
Código PHP:
<!--#include file="include/cabeceraweb.asp"-->
<tr>
<td colspan="3" class="blancos"></td>
<td colspan="7" class="blancos" ></td>
<td class="blancos"></td>
</tr>
<tr>
<td height="45" class="blancos" colspan="11"></td>
</tr>
<tr>
<td colspan="2" class="blancos"></td>
<td valign="top" class="blancos" rowspan="4"><!--#include file="include/menu.asp"--></td>
<td class="blancos" ></td>
<%
'titulo=request.Form("blog_titolo")
'fecha=request.Form("txtfecha")
'texto=request.Form("blog_testo")
'ano=request.Form("selano")
'activar=request.Form("activar")
'zona=request.form("selzona")
'autor=request.form("blog_autore")
'activar="1"
idblogweb=request.QueryString("idblogweb")
set Ob_conn1=server.createobject("ADODB.connection")
Ob_conn1.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("../Data/foro_bd.mdb") & ";"
'set rs1=ob_conn1.execute("select * from T_usuarios ")
set rs1=ob_conn1.execute("select * from T_usuarios left outer join T_permisomostrar on T_usuarios.c_idusuario = T_permisomostrar.c_idusuario")
set rs=ob_conn1.execute("select * from T_permisomostrar inner join T_usuarios on cint(T_permisomostrar.c_idusuario)=cint(T_usuarios.c_idusuario)")
'set rs1=ob_conn1.execute("select * from T_usuarios inner join T_permisomostrar on cint(T_usuarios.c_idusuario)=cint(T_permisomostrar.c_idusuario) where T_permisomostrar.c_idblogweb='"& idblogweb &"'")
%>
<td colspan="5" class="blancos" valign="top">
<%if rs.eof then%>
No existe níngún blog
<%else%>
<form action="admin-ampliarpermisosblog2.asp?idblogweb=<%=idblogweb%>" name="permisos" method="post" >
<table cellpadding="0" cellspacing="0" border="0">
<tr>
<%do while not rs1.eof%>
<tr>
<%if rs1("c_idblogweb")=idblogweb then%>
<td >
<img src="img/verdadero.gif" />
</td>
<td><%=rs1("c_nombre")%></td>
<%else%>
<td>
<input type="checkbox" name="checkpermiso" class="input" value="<%=rs1("c_idusuario")%>"/>
</td>
<td><%=rs1("c_nombre")%></td>
<%end if%>
<%rs1.movenext
loop%>
</tr>
<%'do while not rs1.eof%>
<tr>
<td><%'=rs1("c_nombre")%></td>
</tr>
<%'rs1.movenext
'loop%>
<tr>
<td><input type="submit" name="btnpermisos" value="Permitir" class="input"/></td>
</tr>
</table>
</form>
<%end if%>
</td>
<td rowspan="3" class="blancos" colspan="2"></td>
</tr>
<tr>
<td height="60" class="blancos" colspan="2"></td>
<td class="blancos" ></td>
<td class="blancos" colspan="6"></td>
</tr>
<tr>
<td rowspan="2" class="blancos"></td>
<td rowspan="2" class="blancos"></td>
<td rowspan="2" class="blancos"></td>
<td class="blancos"></td>
</tr>
<tr>
<td class="blancos" colspan="4" ></td>
<td class="dibujo" valign="bottom"></td>
<td colspan="2" class="blancos" width="1" height="179"></td>
</tr>
<!--#include file="include/pieweb.asp"-->