FALLA CON TABLA
Publicado por hebam (1 intervención) el 22/08/2006 18:50:08
saludos a todos, espero qu aluien me pueda ayudar el programa que estoy desarrollando me genera el siguiente error
ADODB.Recordset error '800a0cc1'
No se encontró el elemento en la colección que corresponde con el nombre o el ordinal pedido.
/shoppers/qrycaptura.asp, línea 257
mi codigo es el siguiente., son valores que se van arrastrando, la idea esuq me muestre el numero del folio, y no lo hace, la tabla esta en sqlñ server 2000,
me tiene que arrojar folio, fecha ciuidad, sucursal y calificacion, (la fecha, sucursal y calificacion ya los arroja )
<html>
<script>
function modaso(){
document.mtoVNTeva.submit()
}
</script>
<head>
<title>Documento sin título</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" background="azul09.jpg">
<%
Set conexion = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")
conexion.OPEN = "driver={SQL Server};server=localhost; UID=jfconvenios; PWD=jfjalsol; database=shopper"
id_folio=Request.Form("Id_folio")
response.Write(Id_folio)
datebox = Request.Form("datebox")
campo2 = Request.Form("campo2")
fecha = Request.Form("fecha")
campo3 = Request.Form("campo3")
campo4 = Request.Form("campo4")
campo41 =Request.Form("campo41")
campo5 = Request.Form("campo5")
campo6 = Request.Form("campo6")
ask01eva = Request.Form("ask01eva")
ask02eva = Request.Form("ask02eva")
ask03eva = Request.Form("ask03eva")
ask04eva = Request.Form("ask04eva")
ask05eva = Request.Form("ask05eva")
ask06eva = Request.Form("ask06eva")
ask07eva = Request.Form("ask07eva")
ask08eva = Request.Form("ask08eva")
dcualeva = Request.Form("dcualeva")
ask09eva = Request.Form("ask09eva")
dcualeva1 = Request.Form("dcualeva1")
ask10eva = Request.Form("ask10eva")
dcualeva2 = Request.Form("dcualeva2")
ask11eva = Request.Form("ask11eva")
ask12eva = Request.Form("ask12eva")
ask13eva = Request.Form("ask13eva")
ask14eva = Request.Form("ask14eva")
ask15eva = Request.Form("ask15eva")
ask16eva = Request.Form("ask16eva")
ask17eva = Request.Form("ask17eva")
ask18eva = Request.Form("ask18eva")
ask19eva = Request.Form("ask19eva")
ask20eva = Request.Form("ask20eva")
ask21eva = Request.Form("ask21eva")
ask22eva = Request.Form("ask22eva")
ask23eva = Request.Form("ask23eva")
ask24eva = Request.Form("ask24eva")'
casilla1 = Request.Form("casilla1")
casilla2 = Request.Form("casilla2")
casilla3 = Request.Form("casilla3")
casilla4 = Request.Form("casilla4")'
ask25eva = Request.Form("ask25eva")
ask26eva = Request.Form("ask26eva")
ask27eva = Request.Form("ask27eva")
ask28eva = Request.Form("ask28eva")
ask29eva = Request.Form("ask29eva")
casilla5 = Request.Form("casilla5")
casilla6 = Request.Form("casilla6")'
ask30eva = Request.Form("ask30eva")
casilla7 = Request.Form("casilla7")
casilla8 = Request.Form("casilla8")
casilla9 = Request.Form("casilla9")
ask31eva = Request.Form("ask31eva")
ask32eva = Request.Form("ask32eva")
ask33eva = Request.Form("ask33eva")
dcualeva3= Request.form("dcualeva3")
casilla10 = Request.Form("casilla10")
casilla11 = Request.Form("casilla11")
casilla12 = Request.Form("casilla12")
ask34eva = Request.Form("ask34eva")
ask35eva = Request.Form("ask35eva")
casilla13 = Request.Form("casilla13")
casilla14 = Request.Form("casilla14")
casilla15 = Request.Form("casilla15")
casilla16 = Request.Form("casilla16")
ask36eva = Request.Form("ask36eva")'
casilla17 = Request.Form("casilla17")
casilla18 = Request.Form("casilla18")
casilla19 = Request.Form("casilla19")'
ask37eva = Request.Form("ask37eva")
casilla20 = Request.Form("casilla20")
casilla21 = Request.Form("casilla21")
casilla22 = Request.Form("casilla22")
casilla23 = Request.Form("casilla23")
casilla24 = Request.Form("casilla24")
casilla25 = Request.Form("casilla25")
asilla26 = Request.Form("casilla26")
casilla27 = Request.Form("casilla27")
ask38eva = Request.Form("ask38eva")
ask39eva = Request.Form("ask39eva")
ask40eva = Request.Form("ask40eva")
ask41eva = Request.Form("ask41eva")
ask42eva = Request.Form("ask42eva")
ask43eva = Request.Form("ask43eva")'
dcualeva6 = Request.Form("dcualeva6")
nomusua = Request.Form("nomusua")
empleado = Request.Form("empleado")
nomusua2 = Request.Form("nomusua2")
empleado2 = Request.Form("empleado2")
diag = Request.Form("diag")
datebox1 = Request.Form("datebox1")
campo22 = Request.Form("campo22")
entrada = Request.Form("entrada")
salida = Request.Form("salida")
ask46eva = Request.Form("ask46eva")
ask47eva = Request.Form("ask47eva")
ask48eva = Request.Form("ask48eva")
'sql = "SELECT MAX(id_folio), id_folio, fechacom, dia, distrito, ciudad, sucursal, evaluador FROM fisico WHERE (fechacapt = '"&fecha&"')"
'sql = "SELECT MAX(id_folio) AS folio ,id_folio, fechacom, dia,fechacapt, distrito, ciudad, sucursal, evaluador, region FROM fisico GROUP BY fechacapt, id_folio, fechacom, dia, distrito, ciudad, sucursal, evaluador, region HAVING (fechacapt = '"&fecha&"')"
sql = "SELECT MAX(id_folio) AS folio from fisico"
%>
<form name="mtoVNTeva" method="post" action="captura.asp">
<TABLE width="296" border=3 align=center cellpadding=10 cellspacing=0>
<TR>
<TD width="268">
<TABLE width="248" border=0 cellpadding=1 cellspacing=0>
<TR>
<TD colspan=2>
<BR><HR>
</TD>
</TR>
<tr>
<td colspan="2">
<BR>
</td>
</tr>
<tr valign=middle>
<td width="83">
Folio
</td>
<td width="161">
<input type="text" name="rfecha" value="<%=rs.Fields("id_folio")%>" disabled>
</td>
</tr>
<tr>
<td>
Fecha
</td>
<td>
<input type="text" name="rfecha" value="<%=fecha%>" disabled>
</td>
</tr>
<tr valign=middle>
<td>
Sucursal
</td>
<td>
<input type="text" name="rfecha" size="35" value="<%=campo5%>" disabled>
</td>
</tr>
<tr>
<td>
Ciudad
</td>
<td>
<input type="text" name="rfecha" value="<%=campo41%>" disabled>
</td>
</tr>
<tr >
<td>
Calificacion
</td>
<td>
<input type="text" name="total" disabled>
</td>
</tr>
<tr>
<td colspan="2">
<BR>
<HR>
</td>
</tr>
<tr>
<td colspan="2">
<CENTER>
<input name="enviar"type="submit"value="Continuar" onClick="modaso()">
</CENTER>
</td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
</table>
</form>
</body>
</html>
ADODB.Recordset error '800a0cc1'
No se encontró el elemento en la colección que corresponde con el nombre o el ordinal pedido.
/shoppers/qrycaptura.asp, línea 257
mi codigo es el siguiente., son valores que se van arrastrando, la idea esuq me muestre el numero del folio, y no lo hace, la tabla esta en sqlñ server 2000,
me tiene que arrojar folio, fecha ciuidad, sucursal y calificacion, (la fecha, sucursal y calificacion ya los arroja )
<html>
<script>
function modaso(){
document.mtoVNTeva.submit()
}
</script>
<head>
<title>Documento sin título</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" background="azul09.jpg">
<%
Set conexion = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")
conexion.OPEN = "driver={SQL Server};server=localhost; UID=jfconvenios; PWD=jfjalsol; database=shopper"
id_folio=Request.Form("Id_folio")
response.Write(Id_folio)
datebox = Request.Form("datebox")
campo2 = Request.Form("campo2")
fecha = Request.Form("fecha")
campo3 = Request.Form("campo3")
campo4 = Request.Form("campo4")
campo41 =Request.Form("campo41")
campo5 = Request.Form("campo5")
campo6 = Request.Form("campo6")
ask01eva = Request.Form("ask01eva")
ask02eva = Request.Form("ask02eva")
ask03eva = Request.Form("ask03eva")
ask04eva = Request.Form("ask04eva")
ask05eva = Request.Form("ask05eva")
ask06eva = Request.Form("ask06eva")
ask07eva = Request.Form("ask07eva")
ask08eva = Request.Form("ask08eva")
dcualeva = Request.Form("dcualeva")
ask09eva = Request.Form("ask09eva")
dcualeva1 = Request.Form("dcualeva1")
ask10eva = Request.Form("ask10eva")
dcualeva2 = Request.Form("dcualeva2")
ask11eva = Request.Form("ask11eva")
ask12eva = Request.Form("ask12eva")
ask13eva = Request.Form("ask13eva")
ask14eva = Request.Form("ask14eva")
ask15eva = Request.Form("ask15eva")
ask16eva = Request.Form("ask16eva")
ask17eva = Request.Form("ask17eva")
ask18eva = Request.Form("ask18eva")
ask19eva = Request.Form("ask19eva")
ask20eva = Request.Form("ask20eva")
ask21eva = Request.Form("ask21eva")
ask22eva = Request.Form("ask22eva")
ask23eva = Request.Form("ask23eva")
ask24eva = Request.Form("ask24eva")'
casilla1 = Request.Form("casilla1")
casilla2 = Request.Form("casilla2")
casilla3 = Request.Form("casilla3")
casilla4 = Request.Form("casilla4")'
ask25eva = Request.Form("ask25eva")
ask26eva = Request.Form("ask26eva")
ask27eva = Request.Form("ask27eva")
ask28eva = Request.Form("ask28eva")
ask29eva = Request.Form("ask29eva")
casilla5 = Request.Form("casilla5")
casilla6 = Request.Form("casilla6")'
ask30eva = Request.Form("ask30eva")
casilla7 = Request.Form("casilla7")
casilla8 = Request.Form("casilla8")
casilla9 = Request.Form("casilla9")
ask31eva = Request.Form("ask31eva")
ask32eva = Request.Form("ask32eva")
ask33eva = Request.Form("ask33eva")
dcualeva3= Request.form("dcualeva3")
casilla10 = Request.Form("casilla10")
casilla11 = Request.Form("casilla11")
casilla12 = Request.Form("casilla12")
ask34eva = Request.Form("ask34eva")
ask35eva = Request.Form("ask35eva")
casilla13 = Request.Form("casilla13")
casilla14 = Request.Form("casilla14")
casilla15 = Request.Form("casilla15")
casilla16 = Request.Form("casilla16")
ask36eva = Request.Form("ask36eva")'
casilla17 = Request.Form("casilla17")
casilla18 = Request.Form("casilla18")
casilla19 = Request.Form("casilla19")'
ask37eva = Request.Form("ask37eva")
casilla20 = Request.Form("casilla20")
casilla21 = Request.Form("casilla21")
casilla22 = Request.Form("casilla22")
casilla23 = Request.Form("casilla23")
casilla24 = Request.Form("casilla24")
casilla25 = Request.Form("casilla25")
asilla26 = Request.Form("casilla26")
casilla27 = Request.Form("casilla27")
ask38eva = Request.Form("ask38eva")
ask39eva = Request.Form("ask39eva")
ask40eva = Request.Form("ask40eva")
ask41eva = Request.Form("ask41eva")
ask42eva = Request.Form("ask42eva")
ask43eva = Request.Form("ask43eva")'
dcualeva6 = Request.Form("dcualeva6")
nomusua = Request.Form("nomusua")
empleado = Request.Form("empleado")
nomusua2 = Request.Form("nomusua2")
empleado2 = Request.Form("empleado2")
diag = Request.Form("diag")
datebox1 = Request.Form("datebox1")
campo22 = Request.Form("campo22")
entrada = Request.Form("entrada")
salida = Request.Form("salida")
ask46eva = Request.Form("ask46eva")
ask47eva = Request.Form("ask47eva")
ask48eva = Request.Form("ask48eva")
'sql = "SELECT MAX(id_folio), id_folio, fechacom, dia, distrito, ciudad, sucursal, evaluador FROM fisico WHERE (fechacapt = '"&fecha&"')"
'sql = "SELECT MAX(id_folio) AS folio ,id_folio, fechacom, dia,fechacapt, distrito, ciudad, sucursal, evaluador, region FROM fisico GROUP BY fechacapt, id_folio, fechacom, dia, distrito, ciudad, sucursal, evaluador, region HAVING (fechacapt = '"&fecha&"')"
sql = "SELECT MAX(id_folio) AS folio from fisico"
%>
<form name="mtoVNTeva" method="post" action="captura.asp">
<TABLE width="296" border=3 align=center cellpadding=10 cellspacing=0>
<TR>
<TD width="268">
<TABLE width="248" border=0 cellpadding=1 cellspacing=0>
<TR>
<TD colspan=2>
<BR><HR>
</TD>
</TR>
<tr>
<td colspan="2">
<BR>
</td>
</tr>
<tr valign=middle>
<td width="83">
Folio
</td>
<td width="161">
<input type="text" name="rfecha" value="<%=rs.Fields("id_folio")%>" disabled>
</td>
</tr>
<tr>
<td>
Fecha
</td>
<td>
<input type="text" name="rfecha" value="<%=fecha%>" disabled>
</td>
</tr>
<tr valign=middle>
<td>
Sucursal
</td>
<td>
<input type="text" name="rfecha" size="35" value="<%=campo5%>" disabled>
</td>
</tr>
<tr>
<td>
Ciudad
</td>
<td>
<input type="text" name="rfecha" value="<%=campo41%>" disabled>
</td>
</tr>
<tr >
<td>
Calificacion
</td>
<td>
<input type="text" name="total" disabled>
</td>
</tr>
<tr>
<td colspan="2">
<BR>
<HR>
</td>
</tr>
<tr>
<td colspan="2">
<CENTER>
<input name="enviar"type="submit"value="Continuar" onClick="modaso()">
</CENTER>
</td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
</table>
</form>
</body>
</html>
Valora esta pregunta
0