Hola a todos... soy nueva en programacion con ASP, en realida me lo impusieron en el trabajo y no se que estoy haciendo mal con una pagina que tengo, alguien podria fijarse y decirme en que me equivoque? Mil Gracias!!
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<!--#include file="../Connections/Cancelacion_P7.asp" -->
<%
var as__vares = "%";
if ( String(Request.QueryString('TIPO_CTA')) != "undefined" &&
String(Request.QueryString('TIPO_CTA')) != "") {
as__vares = String(Request.QueryString('TIPO_CTA'));
}
%>
<%
var as__varcom = "%";
if (String(Request.QueryString('ZONA')) != "undefined" &&
String(Request.QueryString('ZONA')) != "") {
as__varcom = String(Request.QueryString('ZONA'));
}
%>
<%
var as__varciclo = "%";
if (String(Request.QueryString('CICLO')) != "undefined" &&
String(Request.QueryString('CICLO')) != "") {
as__varciclo = String(Request.QueryString('CICLO'));
}
%>
<%
var as__varprov = "%";
if (String(Request.QueryString('FECHA_PREV_CAIDA')) != "undefined" &&
String(Request.QueryString('FECHA_PREV_CAIDA')) != "") {
as__varprov = String(Request.QueryString('FECHA_PREV_CAIDA'));
}
%>
<%
var as_cmd = Server.CreateObject ("ADODB.Command");
as_cmd.ActiveConnection = MM_Cancelacion_P7_STRING;
as_cmd.CommandText = "SELECT * FROM [10-AR-De Gral Accion] WHERE FECHA_PREV_CAIDA LIKE '"+ as__varprov.replace(/'/g, "''") + "' AND CICLO LIKE '"+ as__varciclo.replace(/'/g, "''") + "' AND ZONA LIKE '"+ as__varcom.replace(/'/g, "''") + "' AND TIPO_CTA LIKE '"+ as__vares.replace(/'/g, "''") + "'";
as_cmd.Prepared = true;
var as = as_cmd.Execute();
var as_numRows = 0;
%>
<%
var estudio = Server.CreateObject("ADODB.Recordset");
estudio.ActiveConnection = MM_Cancelacion_P7_STRING;
estudio.Source = "SELECT distinct TIPO_CTA FROM [10-AR-De Gral Accion] ORDER BY TIPO_CTA ASC";
estudio.CursorType = 0;
estudio.CursorLocation = 2;
estudio.LockType = 1;
estudio.Open();
var estudio_numRows = 0;
%>
<%
var COMPANY = Server.CreateObject("ADODB.Recordset");
COMPANY.ActiveConnection = MM_Cancelacion_P7_STRING;
COMPANY.Source = "SELECT distinct ZONA FROM [10-AR-De Gral Accion] ORDER BY ZONA";
COMPANY.CursorType = 0;
COMPANY.CursorLocation = 2;
COMPANY.LockType = 1;
COMPANY.Open();
var COMPANY_numRows = 0;
%>
<%
var CICLO = Server.CreateObject("ADODB.Recordset");
CICLO.ActiveConnection = MM_Cancelacion_P7_STRING;
CICLO.Source = "SELECT DISTINCT CICLO FROM [10-AR-De Gral Accion] ORDER BY CICLO";
CICLO.CursorType = 0;
CICLO.CursorLocation = 2;
CICLO.LockType = 1;
CICLO.Open();
var CICLO_numRows = 0;
%>
<%
var Recordset1_cmd = Server.CreateObject ("ADODB.Command");
Recordset1_cmd.ActiveConnection = MM_Cancelacion_P7_STRING;
Recordset1_cmd.CommandText = "SELECT distinct FECHA_PREV_CAIDA FROM [10-AR-De Gral Accion] ORDER BY FECHA_PREV_CAIDA ASC";
Recordset1_cmd.Prepared = true;
var Recordset1 = Recordset1_cmd.Execute();
var Recordset1_numRows = 0;
%>
<%
var Repeat1__numRows = -1;
var Repeat1__index = 0;
as_numRows += Repeat1__numRows;
%>
<!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>Asignación Estudios Periodo</title>
<link href="../Soper/sopercss.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.Estilo5 {color: #990000}
.Estilo6 {color: #003366}
.Estilo8 {color: #333399}
-->
</style>
</head>
<body >
<table width="100%" height="115" border="0" cellpadding="1" cellspacing="0">
<tr align="left" bgcolor="#666666">
<td height="21" colspan="2"><table width="778" border="0" cellspacing="1" cellpadding="1">
<tr>
<td width="398" align="center"><span class="ENCABEZADO">Cancelaciones P7 </span></td>
<td width="95" align="center" bgcolor="#CCCCCC">Aca iba la actualizacion---</td>
</tr>
</table> </td>
</tr>
<tr>
<td width="17%" height="32"><form name="form1" method="get" action="Cancelaciones_P7_por_mes_Argentina.asp">
<table width="550" border="0" cellpadding="1" cellspacing="1">
<tr>
<td><select name="TIPO_CTA" class="select" id="TIPO_CTA">
<option value="%" <%=(("%" == Request.QueryString('TIPO_CTA'))?"SELECTED":"")%>> Tipo de Cuenta</option>
<%
while (!estudio.EOF) {
%>
<option value="<%=(estudio.Fields.Item("TIPO_CTA").Value)% >" <%=((estudio.Fields.Item("TIPO_CTA").Value == Request.QueryString('TIPO_CTA'))?"SELECTED":"")%> ><%=(estudio.Fields.Item("TIPO_CTA").Value)%></option>
<%
estudio.MoveNext();
}
if (estudio.CursorType > 0) {
if (!estudio.BOF) estudio.MoveFirst();
} else {
estudio.Requery();
}
%>
</select></td>
<td><select name="ZONA" id="ZONA" class="select">
<option value="%" <%=(("%" == Request.QueryString('ZONA'))?"SELECTED":"")%>>ZONA </option>
<%
while (!COMPANY.EOF) {
%>
<option value="<%=(COMPANY.Fields.Item("ZONA").Value)%>" <%=((COMPANY.Fields.Item("ZONA").Value == Request.QueryString('ZONA'))?"SELECTED":"")%> ><%=(COMPANY.Fields.Item("ZONA").Value)%></option>
<%
COMPANY.MoveNext();
}
if (COMPANY.CursorType > 0) {
if (!COMPANY.BOF) COMPANY.MoveFirst();
} else {
COMPANY.Requery();
}
%>
</select></td>
<td><select name="FECHA_PREV_CAIDA" class="select" id="FECHA_PREV_CAIDA">
<option value="%" <%=(("%" == Request.QueryString('FECHA_PREV_CAIDA'))?"selected =\"selected\"":"")%>>FECHA_PREV_CAIDA</option>
<%
while (!Recordset1.EOF) {
%><option value="<%=(Recordset1.Fields.Item("FECHA_PREV_CAID A").Value)%>" <%=((Recordset1.Fields.Item("FECHA_PREV_CAIDA").Va lue == Request.QueryString('FECHA_PREV_CAIDA'))?"selected =\"selected\"":"")%> ><%=(Recordset1.Fields.Item("FECHA_PREV_CAIDA").Va lue)%></option>
<%
Recordset1.MoveNext();
}
if (Recordset1.CursorType > 0) {
if (!Recordset1.BOF) Recordset1.MoveFirst();
} else {
Recordset1.Requery();
}
%>
</select>
</td>
<td><select name="CICLO" id="CICLO" class="select">
<option value="%" <%=(("%" == Request.QueryString('CICLO'))?"SELECTED":"")%>>CIC LO</option>
<%
while (!CICLO.EOF) {
%>
<option value="<%=(CICLO.Fields.Item("CICLO").Value)%>" <%=((CICLO.Fields.Item("CICLO").Value == Request.QueryString('CICLO'))?"SELECTED":"")%> ><%=(CICLO.Fields.Item("CICLO").Value)%></option>
<%
CICLO.MoveNext();
}
if (CICLO.CursorType > 0) {
if (!CICLO.BOF) CICLO.MoveFirst();
} else {
CICLO.Requery();
}
%>
</select> </td>
<td><input type="submit" name="Submit" value="Aceptar"></td>
</tr>
</table>
</form></td>
<td width="83%">iba la fecha</td>
</tr>
<tr>
<td bgcolor="#F0FAFF">
<span class="select">Tipo_Cuenta:<span class="Estilo5"><%= Request.QueryString('TIPO_CTA') %></span> ZONA: <span class="Estilo5"><%= Request.QueryString('ZONA')%> </span></span><span class="select">FECHA_PREV_CAIDA</span><span class="select"><span class="Estilo5">: <%= Request.QueryString('FECHA_PREV_CAIDA') %> </span>CICLO:</span><span class="select"><span class="Estilo5"><%= Request.QueryString('CICLO') %></span></span><span class="select"> (%= TODOS)</span> </td>
<td> </td>
</tr>
<tr>
<td height="31" colspan="2"><table width="100%" border="0" cellpadding="0" cellspacing="1" class="TablaCebra">
<tr align="center" class="href">
<td bgcolor="#D5DBEC"><div align="center" class="Estilo6">Cant_Ctas</div></td>
<td bgcolor="#D5DBEC"><div align="center" class="Estilo6">Cant_Celu</div></td>
<td bgcolor="#D5DBEC"><div align="center" class="Estilo6">Tipo_Cta</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Ciclo</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Zona</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Acción</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Fecha_Prev_Caida</div></td>
<td bgcolor="#DFDFDF"><div align="center" class="Estilo6">Fecha_Caida</div></td>
<td bgcolor="#DFDFDF"><div align="center" class="Estilo6">Way</div></td>
</tr>
<% while ((Repeat1__numRows-- != 0) && (!as.EOF)) { %>
<tr align="center" class="sopercss">
<td bgcolor="#D5DBEC"><div align="center"><%=(as.Fields.Item("CANT_CTAS").Val ue)%></div></td>
<td bgcolor="#D5DBEC"><div align="center"><%=(as.Fields.Item("CANT_CELU").Val ue)%></div></td>
<td bgcolor="#D5DBEC"><div align="center"><%=(as.Fields.Item("TIPO_CTA").Valu e)%></div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("CICLO").Value)% ></div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("ZONA").Value)%> </div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("ACCION").Value) %></div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("FECHA_PREV_CAID A").Value)%></div></td>
<td bgcolor="#DFDFDF"><div align="center"><%=(as.Fields.Item("FECHA_CAIDA").V alue)%></div></td>
<td bgcolor="#DFDFDF"><div align="center"><%=(as.Fields.Item("WAY").Value)%></div></td>
</tr>
<%
Repeat1__index++;
as.MoveNext();
}
%>
</table></td>
</tr>
</table>
<center><a href="http://ayuda.cti/ICP/index.php?option=com_content&task=view&id=12&Itemi d=42"> <<<-Volver </a></center>
</body>
</html>
<%
as.Close();
%>
<%
estudio.Close();
%>
<%
COMPANY.Close();
%>
<%
CICLO.Close();
%>
<%
Recordset1.Close();
%>