No sé cuál es el gestor de contenidos, aunque sí que está escrito en asp.
alguno de los includes que se señalan en el comienzo de este archivo. Abre
se debe.
Post by LuiseteOk Lucas, pego el código a continuación, no lo puse porque lo veo
demasiado extenso, pero bueno a ver si podéis ayudarme.
<!--#include file="../includes/autorizado.asp" -->
<!--#include file="../includes/NoCache.asp" -->
<!--#include file="../includes/bd_ctes.asp"-->
<!--#include file="../includes/carga_valores.asp"-->
<!--#include file="../includes/funciones.asp"-->
<%
set conexion1 = Server.CreateObject("ADODB.Connection")
conexion1.open conexion_bd & Server.MapPath(bd_general)
conexionnot.open conexion_bd & Server.MapPath(bd_noticias)
idnoticia = 0
idproyecto = 1
idprioridad = 2
idestado = 3
nombre = 4
set bdp = conexion1.execute("select p.*,u.* from permisos p,usuarios u
where p.idusuario=u.idusuario and p.idusuario=" &
request.cookies("idusuario"))
'************** ORDENACION DE REGISTROS
if request("orden")<>"" then
session("ordenpro") = request("orden")
end if
if session("ordenpro") = "" then session("ordenpro") = "fecha_alta desc"
SQL = "select * from noticias order by "& session("ordenpro")
'************** PAGINACION DE REGISTROS
if request.QueryString("paginaactual")<>"" then
mostrarpagina = request.QueryString("paginaactual")
else
mostrarpagina =1
end if
Set bd = Server.CreateObject("ADODB.Recordset")
bd.cachesize = 60
bd.open SQL,conexionnot,3,3
if not bd.eof then
resultado ="OK"
bd.pagesize = registrosporpagina
totalpaginas = cint(bd.pagecount)
totalregistros = cint(bd.recordcount)
bd.absolutepage = mostrarpagina
contreg=0
if int(mostrarpagina)<>int(totalpaginas) then
hasta = mostrarpagina * registrosporpagina
desde = hasta - (registrosporpagina-1)
else
hasta = totalregistros
desde = (totalpaginas * registrosporpagina)-(registrosporpagina-1)
end if
else
resultado ="error"
end if
%>
<html>
<head>
<title>Administración</title>
<meta http-equiv = "Content-Type" content="text/html; charset=iso-8859-1">
<META HTTP-EQUIV = "Expires" CONTENT="0">
<META HTTP-EQUIV = "Pragma" CONTENT="no-cache">
<META HTTP-EQUIV = "Cache-Control" CONTENT="no-cache">
<link href="../estilos/estilo.css" rel="stylesheet" type="text/css">
<script language="JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
function comprobar(id) {
//if(confirm("¿ Está seguro de eliminar TODA la información relativa al
año "+<%=tmp_anyo%>+" ?")) {
if(confirm("¿Está seguro de borrar la noticia?")) {
location.href=id
}
}
function ac_over(img)
{
if (img == "acceso")
document.images[img].src = accesoOver.src;
else
document.images[img].src = granOver.src;
document.ac_image = img;
}
function ac_out()
{
if (document.ac_image)
document.images[document.ac_image].src = granOut.src;
document.ac_image = granOut.src;
}
function ac_courseOver(row)
{
row.style.backgroundColor = "#F8F8F8" /*"#FFE1BF"*/
var theLink = findLinkNode(row,0);
if (theLink)
window.status = (theLink);
}
function ac_courseOut(row)
{
row.style.backgroundColor = "#FFFFFF"
window.status = "";
}
function ac_courseClick(row)
{
var theLink = findLinkNode(row,0);
if (theLink)
window.location = (theLink);
}
function findLinkNode(obj,depth)
{
var retVal = null;
if (obj.nodeName == "A")
{
return obj.href;
}
else
{
for (var x=0; x < obj.children.length; x++)
{
retVal = findLinkNode(obj.children[x],depth+1)
if (retVal != null)
return retVal;
}
}
return retVal;
}
function debug(obj)
{
var x=""; for (var y in obj) x += y + ":" + obj[y] + " ---- ";
alert(x);
}
function MM_goToURL() { //v3.0
var i, args=MM_goToURL.arguments; document.MM_returnValue = false;
for (i=0; i<(args.length-1); i+=2)
eval(args[i]+".location='"+args[i+1]+"'");
}
//-->
</script>
</head>
<body bgcolor="#FFFFFF" text="#000000" link="#000000"
onLoad="MM_goToURL('parent.descrip','noticias_detalle.asp');return
document.MM_returnValue">
<%
if resultado ="OK" then '*********** MUESTRA CLIENTES SI HAY *******
%>
<table width="100%" border="0" align="right" cellpadding="0"
cellspacing="0">
<tr height="5"><td></td></tr>
<tr>
<td>
<table width="100%" height="50" border="0" cellpadding="0" cellspacing="0"
bordercolor="#000000" class="colorcorporativo_linea">
<tr class="tit_listado colorcorporativo" height="20">
<td width="67" ><font color="#FFFFFF"> Circuito</font></td>
<td width="111" >
<A href="noticias_ver_listado.asp?orden=idnivel_3%20desc"><img
src="../images/orden_arriba.gif" alt="ordena ascendentemente" width="10"
height="10" hspace="2" border="0"></a><A
href="noticias_ver_listado.asp?orden=idnivel_3%20asc"><img
src="../images/orden_abajo.gif" alt="ordena descendentemente"
border="0"></a> </td>
<td width="72" ><font color="#FFFFFF">Titulo</font>
<td width="90" >
<A href="noticias_ver_listado.asp?orden=titulo%20asc"><img
src="../images/orden_arriba.gif" alt="ordena ascendentemente" width="10"
height="10" border="0"></a><A
href="noticias_ver_listado.asp?orden=titulo%20desc"><img
src="../images/orden_abajo.gif" alt="ordena descendentemente" width="10"
height="10" hspace="2" border="0"></a>
<td width="61" ><font color="#FFFFFF">Activo</font>
<td width="47" >
<div align="right"><A
href="noticias_ver_listado.asp?orden=idestado%20asc"><img
src="../images/orden_arriba.gif" alt="ordena ascendentemente" width="10"
height="10" border="0"></a><A
href="noticias_ver_listado.asp?orden=idestado%20desc"><img
src="../images/orden_abajo.gif" alt="ordena descendentemente" width="10"
height="10" hspace="2" border="0"></a>
<%
if bdp("producto_modificar") or bdp("producto_borrar") then %>
</div>
<td width="69" > </td>
<% end if %>
</tr>
<%
while (Not bd.eof And i < registrosporpagina)
%>
<tr onMouseOver="ac_courseOver(this)"
onMouseOut="ac_courseOut(this)" height="27">
<td colspan="2" class="txt"><a
href="noticias_detalle.asp?registro=<%=bd("idnoticia")%>" target="descrip"
class="txt">
<div
align="left"> <%=niveles_3_sp.Item(cint(bd("idnivel_3")))%></div></a></td>
<td colspan="2" class="txt"><a
href="noticias_detalle.asp?registro=<%=bd("idnoticia")%>"
target="descrip">
<div align="center"> <font color="#000000">
</font></div>
</a><a href="noticias_detalle.asp?registro=<%=bd("idnoticia")%>"
target="descrip" class="txt"><%=bd("titulo")%></a></td>
<td colspan="2" class="txt"><div align="center"><a
href="noticias_detalle.asp?registro=<%=bd("idnoticia")%>" target="descrip"
class="txt">
<%if bd("activo") then %>
<img src="../images/icono_okey.jpg" width="13" height="13" border="0">
<%else%>
<img src="../images/icono_no.jpg" width="13" height="13" border="0">
<%end if%>
</a></div></td>
<%
'pintamos los iconos de modificar y/o borrar verificando si dispone de
permisos
if bdp("producto_modificar") or bdp("producto_borrar") then %>
<td valign="middle" class="txt" style="cursor:hand">
<% if bdp("producto_modificar") then %>
<a
href="noticias_modificar.asp?registro=<%=bd("idnoticia")%>&tipo=general"><img
src="../images/icono_modificar.gif" alt="Modificar" width="15" height="15"
border="0"></a>
<% end if
if bdp("producto_borrar") then %>
<img src="../images/icono_borrar.gif" alt="Borrar" hspace="5" border="0"
onClick="comprobar('noticias_borrar.asp?registro=<%=bd("idnoticia")%>')">
<% end if %></td>
<% end if %>
</tr>
<tr bgcolor="#E9E9E9" height="1">
<td colspan="7"></td>
</tr>
<%
bd.MoveNext
i=i+1
wend %>
</table></td>
</tr>
<tr height="10"><td></td></tr>
<tr>
<td>
<%
response.write "<center>"
response.write ("<font class=""txt"">"& desde & " a "& hasta &" mostradas
de "& totalregistros &" noticias.</font><br>")
if int(mostrarpagina)<>1 then
cadena="<a
href=noticias_ver_listado.asp?paginaactual="&mostrarpagina-1&"&orden="&Server.URLEncode(orden)
cadena=cadena&" class='txtmenu'>[ < Anterior ]</a> "
end if
if int(mostrarpagina)<>int(totalpaginas) then
cadena = cadena & " <a
href=noticias_ver_listado.asp?paginaactual="&mostrarpagina+1&"&orden="&Server.URLEncode(orden)
cadena = cadena &" class='txtmenu'>[ Siguiente > ]</a>"
end if
response.write cadena
response.write "</center>"
%>
</td>
</tr>
</table>
<p align="center"> </p>
<%
else
%>
<br>
<br>
<p align="center" class="txt">No dispone de noticias.</p>
<% end if
conexionnot.close
%>
</body>
</html>
*** FIN DEL CÓDIGO ***
Gracias de antemano
Un saludo
Lui7
Post by Lucas SevillaLuisete, pasamos el código fuente, sin eso no podemos hacer nada.
Post by LuiseteBuenas tardes a todos, hacía ya tiempo que no pasaba por aquí, no porque
no quiera sino pq voy bastante de culo y para colmo me ha salido un
problemón, os cuento a ver si os ha pasado o sabéis que puede ser la
- Tengo un gestor de noticias mediante el cual mi cliente sube noticias
a su web. Hasta ahí todo bien, pero de la noche a la mañana, a la hora
-
No_se_encontró_el_elemento_en_la_colección_que_corresponde_con_el_nombre_o_el_ordinal_pedido
Las noticias las muestra correctamente en la web, se pueden añadir
nuevas noticias, etc y las graba a la base de datos, pero cuando
pulsamos al boton listar noticias sale ese dichoso error que antes no
salía. Además hemos subido una copia de seguridad y ocurre lo mismo!!
cuando esto siempre ha funcionado! .....
Ya no se que hacer!! ¿Le ha pasado a alguien un caso parecido????
¿Podéis ayudarme???
Gracias por todo!!!
Un saludo
Lui7