HOla! tengo un problema al cargar este codigo en ASP, el error que vota es un error interno del servidor pero no me dice que linea es, utilizo Visual Interdev pero no detecto el problema alli, aqui esta el codigo...
el script del del head es para un combo, no se si por eso es que se debe la falla...
Alli tienen:
<head>
<title>INTRANET DOE RUN PERU</title>
<meta NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<link href="stylox.css" type="text/css" rel="stylesheet">
<script type='text/javascript'>
<%
'Consulta para obtener manual
Dim obj,rst, strCadenaConexion
strCadenaConexion=Application("conexion" )
set obj = CreateObject("COMMBDAT.ManualBD")
set rs = obj.ConsultaManual(strCadenaConexion,"%" )
x=0
%>
//funcion de combo box combinado
function sublist(inform,selecteditem){
inform.subcatagory.length=0
<%
count=0
y=0
Do while not rs.eof
%>
x = <%=trim(y)%>;
subcat = new Array();
subcatagorys = "<%=(rs("descripcion"))&&quo t; "(rs("descripcion"))%>;
subcatagoryof = "<%=(rs("id_modulo"))%>" ;
subcatagoryid = "<%=(rs("descripcion"))%>;
subcat[x,0) = subcatagorys;
subcat[x,1) = subcatagoryof;
subcat[x,2) = subcatagoryid;
if(subcat[x,1) = selecteditem){
var option<%trim(count)%>=new Option (subcat[x,0],subcat[x,2]);
inform.subcatagory.options[inform.subcatagory.length]=option<%=trim(count)%>
}
<%
count = count + 1
y = y + 1
rs.movenext
loop
%>
}
</script>
</head>
<body>
<p>
<font face="Arial, Helvetica, sans-serif" size="4" color="#7A070A">MODIFICAR DOCUMENTACION</font>
<td width="300" valign="top">
<div align="right"><font face="Arial, Helvetica, sans-serif" size="2"><i><a href="ManModulos.asp" target="_self"><img src="images/pagina_ant.gif" width="120" height="45" border="0"></a></i></font></div>
</td>
<font face="Arial, Helvetica, sans-serif" size="4">
Gracias por su ayuda!