Foros del Web » Programando para Internet » ASP Clásico »

Problemas con 2 paginas asp

Estas en el tema de Problemas con 2 paginas asp en el foro de ASP Clásico en Foros del Web. Por favor necesito de la ayuda de alguien. He construido un sitio web en Dreamweaber, donde tengo 2 paginas asp. Una de ellas permiete ingresar ...
  #1 (permalink)  
Antiguo 19/03/2008, 07:13
 
Fecha de Ingreso: marzo-2008
Ubicación: Posadas Misiones Argentina
Mensajes: 480
Antigüedad: 16 años, 2 meses
Puntos: 1
Problemas con 2 paginas asp

Por favor necesito de la ayuda de alguien.

He construido un sitio web en Dreamweaber, donde tengo 2 paginas asp.
Una de ellas permiete ingresar registros, y la otra consultar dichos registros.

Lo he publicado gratis en www.brinkster.com, pero tengo problemas.

1_ En la pagina de ingresos de registros: me aparece un mensaje de error, que en las primeros lineas me dice esto:

La página que está buscando se pudo haber eliminado, su nombre ha cambiado, o está temporalmente fuera de servicio.

Tampoco me graba los registros en la base de datos. Tengo una boton llamado enviar(que es un comportamiento de servidor, llamadoa asi en Dreamweaber) que al hacer clic se tiene que grabar los registros en la base de datos, pero no ocurre asi.


2_ En la pagina de consulta: Solo me muestra los 10 primeros registros que yo grabe en la base de datos en Access en mi computadora personal(No en mi pagina asp) y luego cuando hago clic en un vinculo siguiente(que es un comportamiento del Servidor, asi llamado en Dreamweaber) , no me aparece los demas registros de la base de datos , y ademas me aparece el mismo mensaje de error de la pagina de ingresos de registros.


Tanto las paginas como la base de datos, lo he cargado bien, y la conexion lo hice bien porque respeta la ruta que me indica www.brinkster.com.


Por favor si alguien sabe lo que esta pasando en mi sitio, le agradeceria que me pueda ayudar.
  #2 (permalink)  
Antiguo 19/03/2008, 08:19
Avatar de mc_quake  
Fecha de Ingreso: enero-2006
Ubicación: www.ecocargo.cl
Mensajes: 683
Antigüedad: 18 años, 4 meses
Puntos: 8
Re: Problemas con 2 paginas asp

puedes poner el codigo de las paginas par a poder ayudarte mejor

y por lo que veo hay estas escribiendo el nombre de una pagina de mala forma por eso dice que la pagina no existe o que no se encuentra pon tu codigo y veremos
__________________
Mc_Quake

Para ayudar en lo que se pueda:Zzz:
  #3 (permalink)  
Antiguo 19/03/2008, 09:02
Avatar de ZeroLino  
Fecha de Ingreso: abril-2007
Mensajes: 91
Antigüedad: 17 años, 1 mes
Puntos: 2
Re: Problemas con 2 paginas asp

en verdad.. sin el codigo no se te puede ayudar mucho

pero es entendible lo que esta ocurriendo...

de partida, parece ser que no estas escribiendo bien el nombre de la pag. porque no te la reconoce. lo segundo. es que puede ser que tengas hecha mal la consulta sql.. por lo cual no te esta mostrando los datos

y en la segunda pag, estas rescatando los valores de la primera con request??

bueno esperamos tu codigo para poder prestar nuestra ayuda

saludos

ZeroLino
  #4 (permalink)  
Antiguo 24/03/2008, 08:46
 
Fecha de Ingreso: marzo-2008
Ubicación: Posadas Misiones Argentina
Mensajes: 480
Antigüedad: 16 años, 2 meses
Puntos: 1
Re: Problemas con 2 paginas asp

Hola a todos otra vez y gracias por vuestra ayuda.

A continuacion le muestro el codigo, pero le repito que en computadora personal todo anda bien . Las 2 paginas asp andan correctamente.
El problema es cuando yo publico en www.brinkster.com . Ahi no me anda las 2 paginas. La ruta que me indica brinkster. com para la conexion con la base de datos la respeto.

Bueno ahi va el codigo de la conexion y de la pagina de comentarios(una parte) . Como es largo, luego envio , la otra parte del codigo de la pagina de comentarios y el codigo de la pagina de consulta. Este codigo lo hizo , el generador de codigo Dreamweaber mx.



El codigo de la conexion es el siguiente:

<%
// FileName="Connection_ado_conn_string.htm"
// Type="ADO"
// DesigntimeType="ADO"
// HTTP="false"
// Catalog=""
// Schema=""
var MM_pabloalmada_STRING = "Driver={Microsoft Access Driver (*.mdb)};DBQ= c:\\sites\\content\\p\\a\\b\\pabje\\db\\Pablo Almada.mdb"
%>


__________________________________________________ __________________________________________________ ________________________
El codigo de la pagina de comentarios es este:

<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/pabloalmada.asp" -->
<%
// *** Edit Operations: declare variables

// set the form action variable
var MM_editAction = Request.ServerVariables("SCRIPT_NAME");
if (Request.QueryString) {
MM_editAction += "?" + Request.QueryString;
}

// boolean to abort record edit
var MM_abortEdit = false;

// query string to execute
var MM_editQuery = "";
%>
<%
// *** Insert Record: set variables

if (String(Request("MM_insert")) == "form1") {

var MM_editConnection = MM_pabloalmada_STRING;
var MM_editTable = "Comentarios";
var MM_editRedirectUrl = "mensaje.htm";
var MM_fieldsStr = "comentario|value";
var MM_columnsStr = "pal_com|',none,''";

// create the MM_fields and MM_columns arrays
var MM_fields = MM_fieldsStr.split("|");
var MM_columns = MM_columnsStr.split("|");

// set the form values
for (var i=0; i+1 < MM_fields.length; i+=2) {
MM_fields[i+1] = String(Request.Form(MM_fields[i]));
}

// append the query string to the redirect URL
if (MM_editRedirectUrl && Request.QueryString && Request.QueryString.Count > 0) {
MM_editRedirectUrl += ((MM_editRedirectUrl.indexOf('?') == -1)?"?":"&") + Request.QueryString;
}
}
%>
<%
// *** Insert Record: construct a sql insert statement and execute it

if (String(Request("MM_insert")) != "undefined") {

// create the sql insert statement
var MM_tableValues = "", MM_dbValues = "";
for (var i=0; i+1 < MM_fields.length; i+=2) {
var formVal = MM_fields[i+1];
var MM_typesArray = MM_columns[i+1].split(",");
var delim = (MM_typesArray[0] != "none") ? MM_typesArray[0] : "";
var altVal = (MM_typesArray[1] != "none") ? MM_typesArray[1] : "";
var emptyVal = (MM_typesArray[2] != "none") ? MM_typesArray[2] : "";
if (formVal == "" || formVal == "undefined") {
formVal = emptyVal;
} else {
if (altVal != "") {
formVal = altVal;
} else if (delim == "'") { // escape quotes
formVal = "'" + formVal.replace(/'/g,"''") + "'";
} else {
formVal = delim + formVal + delim;
}
}
MM_tableValues += ((i != 0) ? "," : "") + MM_columns[i];
MM_dbValues += ((i != 0) ? "," : "") + formVal;
}
MM_editQuery = "insert into " + MM_editTable + " (" + MM_tableValues + ") values (" + MM_dbValues + ")";

if (!MM_abortEdit) {
// execute the insert
var MM_editCmd = Server.CreateObject('ADODB.Command');
MM_editCmd.ActiveConnection = MM_editConnection;
MM_editCmd.CommandText = MM_editQuery;
MM_editCmd.Execute();
MM_editCmd.ActiveConnection.Close();

if (MM_editRedirectUrl) {
Response.Redirect(MM_editRedirectUrl);
}
}

}
%>
<html>
<head>
<title>Documento sin t&iacute;tulo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_timelinePlay(tmLnName, myID) { //v1.2
//Copyright 1997, 2000 Macromedia, Inc. All rights reserved.
var i,j,tmLn,props,keyFrm,sprite,numKeyFr,firstKeyFr,p ropNum,theObj,firstTime=false;
if (document.MM_Time == null) MM_initTimelines(); //if *very* 1st time
tmLn = document.MM_Time[tmLnName];
if (myID == null) { myID = ++tmLn.ID; firstTime=true;}//if new call, incr ID
if (myID == tmLn.ID) { //if Im newest
setTimeout('MM_timelinePlay("'+tmLnName+'",'+myID+ ')',tmLn.delay);
fNew = ++tmLn.curFrame;
for (i=0; i<tmLn.length; i++) {
sprite = tmLn[i];
if (sprite.charAt(0) == 's') {
if (sprite.obj) {
numKeyFr = sprite.keyFrames.length; firstKeyFr = sprite.keyFrames[0];
if (fNew >= firstKeyFr && fNew <= sprite.keyFrames[numKeyFr-1]) {//in range
keyFrm=1;
for (j=0; j<sprite.values.length; j++) {
props = sprite.values[j];
if (numKeyFr != props.length) {
if (props.prop2 == null) sprite.obj[props.prop] = props[fNew-firstKeyFr];
else sprite.obj[props.prop2][props.prop] = props[fNew-firstKeyFr];
} else {
while (keyFrm<numKeyFr && fNew>=sprite.keyFrames[keyFrm]) keyFrm++;
if (firstTime || fNew==sprite.keyFrames[keyFrm-1]) {
if (props.prop2 == null) sprite.obj[props.prop] = props[keyFrm-1];
else sprite.obj[props.prop2][props.prop] = props[keyFrm-1];
} } } } }
} else if (sprite.charAt(0)=='b' && fNew == sprite.frame) eval(sprite.value);
if (fNew > tmLn.lastFrame) tmLn.ID = 0;
} }
}

function MM_initTimelines() { //v4.0
//MM_initTimelines() Copyright 1997 Macromedia, Inc. All rights reserved.
var ns = navigator.appName == "Netscape";
var ns4 = (ns && parseInt(navigator.appVersion) == 4);
var ns5 = (ns && parseInt(navigator.appVersion) > 4);
document.MM_Time = new Array(1);
document.MM_Time[0] = new Array(2);
document.MM_Time["Timeline1"] = document.MM_Time[0];
document.MM_Time[0].MM_Name = "Timeline1";
document.MM_Time[0].fps = 15;
document.MM_Time[0][0] = new String("sprite");
document.MM_Time[0][0].slot = 1;
if (ns4)
document.MM_Time[0][0].obj = document["cuaderno"];
else if (ns5)
document.MM_Time[0][0].obj = document.getElementById("cuaderno");
else
document.MM_Time[0][0].obj = document.all ? document.all["cuaderno"] : null;
document.MM_Time[0][0].keyFrames = new Array(1, 15);
document.MM_Time[0][0].values = new Array(2);
if (ns5)
document.MM_Time[0][0].values[0] = new Array("320px", "326px", "333px", "339px", "345px", "351px", "358px", "364px", "370px", "377px", "383px", "389px", "395px", "402px", "408px");
else
document.MM_Time[0][0].values[0] = new Array(320,326,333,339,345,351,358,364,370,377,383, 389,395,402,408);
document.MM_Time[0][0].values[0].prop = "left";
if (ns5)
document.MM_Time[0][0].values[1] = new Array("201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px");
else
document.MM_Time[0][0].values[1] = new Array(201,201,201,201,201,201,201,201,201,201,201, 201,201,201,201);
document.MM_Time[0][0].values[1].prop = "top";
if (!ns4) {
document.MM_Time[0][0].values[0].prop2 = "style";
document.MM_Time[0][0].values[1].prop2 = "style";
}
document.MM_Time[0][1] = new String("sprite");
document.MM_Time[0][1].slot = 2;
if (ns4)
document.MM_Time[0][1].obj = document["lapiz"];
else if (ns5)
document.MM_Time[0][1].obj = document.getElementById("lapiz");
else
document.MM_Time[0][1].obj = document.all ? document.all["lapiz"] : null;
document.MM_Time[0][1].keyFrames = new Array(15, 19, 29);
document.MM_Time[0][1].values = new Array(2);
if (ns5)
document.MM_Time[0][1].values[0] = new Array("598px", "590px", "582px", "573px", "561px", "554px", "546px", "537px", "528px", "519px", "509px", "498px", "488px", "478px", "468px");
else
document.MM_Time[0][1].values[0] = new Array(598,590,582,573,561,554,546,537,528,519,509, 498,488,478,468);
document.MM_Time[0][1].values[0].prop = "left";
if (ns5)
document.MM_Time[0][1].values[1] = new Array("201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px", "201px");
else
document.MM_Time[0][1].values[1] = new Array(201,201,201,201,201,201,201,201,201,201,201, 201,201,201,201);
document.MM_Time[0][1].values[1].prop = "top";
if (!ns4) {
document.MM_Time[0][1].values[0].prop2 = "style";
document.MM_Time[0][1].values[1].prop2 = "style";
}
document.MM_Time[0].lastFrame = 29;
for (i=0; i<document.MM_Time.length; i++) {
document.MM_Time[i].ID = null;
document.MM_Time[i].curFrame = 0;
document.MM_Time[i].delay = 1000/document.MM_Time[i].fps;
}
}
//-->
</script>
</head>

__________________________________________________ ______________________________
  #5 (permalink)  
Antiguo 24/03/2008, 09:05
Avatar de pcarvajal  
Fecha de Ingreso: enero-2002
Mensajes: 701
Antigüedad: 22 años, 5 meses
Puntos: 8
Re: Problemas con 2 paginas asp

en el codigo que colocaste el path de tu db es la local
Cita:
var MM_pabloalmada_STRING = "Driver={Microsoft Access Driver (*.mdb)};DBQ= c:\\sites\\content\\p\\a\\b\\pabje\\db\\Pablo Almada.mdb"
no se supone deberias cambiarla en la paguina de conexion que subiste a brinkster por la que usa brinkster para que te tome los datos de la base que tienes alojada allí?

Cita:
var MM_pabloalmada_STRING = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\UserName\db\dbname.mdb")

lo otro que alcanzo a ver en tu codigo es que haces referencia a una pagina htm, te aseguraste de haberla subido a brinkster?
Cita:
var MM_editRedirectUrl = "mensaje.htm";

Saludos!
  #6 (permalink)  
Antiguo 24/03/2008, 12:15
 
Fecha de Ingreso: marzo-2008
Ubicación: Posadas Misiones Argentina
Mensajes: 480
Antigüedad: 16 años, 2 meses
Puntos: 1
Re: Problemas con 2 paginas asp

Hola otra vez

Te quiero hacer otra pregunta, porque no se casi nada de codigo asp.
Cuando hice el sitio, lo hice en un generador de codigo llamado Dreamweaber mx.
Pero en el foro cuando entre a editores del Web , no me puedieron resolver mi problema, por eso me fui a este foro(asp).
Trate de ajustar la conexion , adaptandolo al servidor remoto con lo que me dijiste :


var MM_pabloalmada_STRING = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\UserName\db\dbname.mdb")

Con la ruta que me indica www.brinkster.com, entonces el codigo de arriba queda de la siguiente manera:

var MM_pabloalmada_STRING = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("c:\sites\content\p\a\b\pabje\db\Pa blo Almada.mdb

pabje es el nombre de mi dominio y Pablo Almada.mdb es el nombre de la base de datos.


Pero me tira este mensaje de error:

Cita:
Server.MapPath () error 'ASP 0172: 80004005'

Ruta no válida

/ P / a / b / pabje / Conexiones / pabloalmada.asp, línea 8

La Ruta de parámetro para el método MapPath debe ser un camino virtual. Un camino físico se utilizó.



La ayuda de www.brinkster.com me dice lo siguiente:


Cita:
¿Qué debo hacer para conectarse a una base de datos con ASP?
** Información adicional con respecto a los siguientes ejemplos de código. **

Todas las referencias a "Nombre de Usuario" deben ser reemplazados con su actual nombre de usuario Brinkster.
Todas las referencias a "Contraseña" deben ser sustituidas por su actual Brinkster Contraseña.
Todas las referencias al servidor de nombres de host no son específicas. Por favor entre en su cuenta, seleccionar la configuración del sitio web, y utilizar el nombre de host se muestra allí.


Acceso a bases de datos:
Información adicional con respecto a la base de datos de código de acceso muestra.

La siguiente ruta de acceso de referencia no es específico: C: \ sitios \ Única?
Por favor entre en su cuenta, seleccione Configuración de sitios web, y utilizar la ruta absoluta al archivo de su estructura.




Dim oConn, sConnection



Set oConn = Server.CreateObject("ADODB.Connection")

sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _

"Data Source=C:\sites\Single??\UserName\database\data.md b;" & _

"Persist Security Info=False"

oConn.Open(sConnection)



oConn.Close

Set oConn = nothing



[/B]

Bueno , solo te pediria que me ayudaras a ajustarlo, porque trate de hacerlo respetando la ruta , y tratandolo de adaptar el codigo anterior , pero no me salio.
  #7 (permalink)  
Antiguo 24/03/2008, 15:36
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 20 años, 7 meses
Puntos: 27
Re: Problemas con 2 paginas asp

el error es en la ruta donde esta la base de datos

pcarvajal dijo usaras:
Cita:
var MM_pabloalmada_STRING = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\UserName\db\dbname.mdb")
esa es la ruta donde exactamente esta tu base de datos????

suerte
__________________
JuanRa Pérez
San Salvador, El Salvador
  #8 (permalink)  
Antiguo 24/03/2008, 16:26
 
Fecha de Ingreso: marzo-2008
Ubicación: Posadas Misiones Argentina
Mensajes: 480
Antigüedad: 16 años, 2 meses
Puntos: 1
Re: Problemas con 2 paginas asp

Estoy seguro que esa es la ruta, pero igual me dice este mensaje:


Server.MapPath () error 'ASP 0172: 80004005'

Ruta no válida

/ P / a / b / pabje / Conexiones / pabloalmada.asp, línea 8

La Ruta de parámetro para el método MapPath debe ser un camino virtual. Un camino físico se utilizó.
  #9 (permalink)  
Antiguo 24/03/2008, 20:39
Avatar de pcarvajal  
Fecha de Ingreso: enero-2002
Mensajes: 701
Antigüedad: 22 años, 5 meses
Puntos: 8
Re: Problemas con 2 paginas asp

Cita:
La Ruta de parámetro para el método MapPath debe ser un camino virtual. Un camino físico se utilizó.
mira, esta es tu ruta fisica:

Cita:
var MM_pabloalmada_STRING = "Driver={Microsoft Access Driver (*.mdb)};DBQ= c:\\sites\\content\\p\\a\\b\\pabje\\db\\Pablo Almada.mdb"

para que te funcione, DEBES cambiarla por la ruta virtual:
Cita:
var MM_pabloalmada_STRING = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\pabje\db\Pablo Almada.mdb")
hazlo y nos cuentas como te fué. ;)
Saludos!
  #10 (permalink)  
Antiguo 25/03/2008, 15:07
 
Fecha de Ingreso: marzo-2008
Ubicación: Posadas Misiones Argentina
Mensajes: 480
Antigüedad: 16 años, 2 meses
Puntos: 1
Re: Problemas con 2 paginas asp

Hola otra vez

Hice lo que me dijiste.

La pagina de ingresos de comentarios aparece , pero cuando quiero grabar el comentario en la base de datos , me sigue apareciendo el mensaje de error

Cita:
The page cannot be found
The page you are looking for might have been removed, had its name changed, or is temporarily unavailable.

No se porque dice que la pagina mensaje.htm no se encuentra. Yo lo carge en brinkster.com , y estoy seguro , entonces no se porque me aparece ese mensaje.


En cuanto a la pagina de consulta de comentarios, esta pagina no me aparece , y lo que me aparece en su lugar es este mensaje.


Cita:
El sitio web no puede mostrar la página
HTTP 500
Causas más probables:
El sitio web está en mantenimiento.
El sitio web tiene un error de programación.

Puede intentar lo siguiente:
Actualice la página.

Regresar a la página anterior.

Más información

Este error (HTTP 500 Error interno del servidor) significa que el sitio web al que está conectado tiene un problema con el servidor que impide que se muestre la página web.

Para obtener más información sobre errores HTTP, consulte la Ayuda.
Bueno estoy un poco cansado de buscar el error y no encontrarlo,y no se lo que pueda ser.

Estoy pensando en cambiar de sitio. y publicarlo en www.domaindlx.com .

Bueno no se lo que piensan chicos, pero me podrian guiar en esto.
  #11 (permalink)  
Antiguo 25/03/2008, 16:19
Avatar de pcarvajal  
Fecha de Ingreso: enero-2002
Mensajes: 701
Antigüedad: 22 años, 5 meses
Puntos: 8
Re: Problemas con 2 paginas asp

Hola,
Cita:
The page cannot be found
The page you are looking for might have been removed, had its name changed, or is temporarily unavailable.
Si estas seguro de que has subido todas tus paginas a brinkster, el primer mensaje te aparece porque estas llamando a una pagina que probablemente no se encuentra en el mismo directorio que el resto de las paginas. Revisa bien los "action" de tus formularios, quizas haya alguna parte que aun no has cambiado en donde estes apuntando a un diorectorio de tu maquina.

El segundo error quizás sea igual que el primero, solo algo de redireccionamiento. Asi que mejor postea los codigos de las paginas que has subido, eso si, depuralas, quitale los estilos y el javascript que tienes para poder seguirla más facilmente y así podemos hecharte una manito más rápido.

Ah!, no te cambies a domaindlx, porque si en brinkster no logras verlas bien, en domaindlx menos.

Y pregunta cuantas veces quieras, que esa es la idea, ayudar en lo que se pueda ;)

Saludos!
  #12 (permalink)  
Antiguo 31/03/2008, 15:30
 
Fecha de Ingreso: marzo-2008
Ubicación: Posadas Misiones Argentina
Mensajes: 480
Antigüedad: 16 años, 2 meses
Puntos: 1
Re: Problemas con 2 paginas asp

Hola a todos
Le recuerdo mi problemas: Eran 2 paginas asp que andaban bien en mi PC, pero al publicar en www.brinkster.com no andan bien.


Estos son los 2 codigos depurados de las 2 paginas :
En negrita esta donde mas o menos puede estar el error.
No se casi nada(o nada) de ASP. Me interes es aprender Dreamweaber,
Le pido entonces su gran ayuda para encontrar el error en los codigos.

La ruta raiz que me dio brinkster.com (en donde estan guardadas las paginas) es:
c:\sites\content\p\a\b\pabje.




Aqui van los codigos:

codigo de la pagina de ingreso de comentario


<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/pabloalmada.asp" -->

// set the form action variable
var MM_editAction = Request.ServerVariables("SCRIPT_NAME");
if (Request.QueryString) {
MM_editAction += "?" + Request.QueryString;
}

// boolean to abort record edit
var MM_abortEdit = false;

// query string to execute
var MM_editQuery = "";
%>
<%
// *** Insert Record: set variables

if (String(Request("MM_insert")) == "form1") {

var MM_editConnection = MM_pabloalmada_STRING;
var MM_editTable = "Comentarios";
var MM_editRedirectUrl = "mensaje.htm";
var MM_fieldsStr = "comentario|value";
var MM_columnsStr = "pal_com|',none,''";

// create the MM_fields and MM_columns arrays
var MM_fields = MM_fieldsStr.split("|");
var MM_columns = MM_columnsStr.split("|");

// set the form values
for (var i=0; i+1 < MM_fields.length; i+=2) {
MM_fields[i+1] = String(Request.Form(MM_fields[i]));
}

// append the query string to the redirect URL
if (MM_editRedirectUrl && Request.QueryString && Request.QueryString.Count > 0) {
MM_editRedirectUrl += ((MM_editRedirectUrl.indexOf('?') == -1)?"?":"&") + Request.QueryString;

}
}
%>
<%






// *** Insert Record: construct a sql insert statement and execute it
// create the sql insert statement
var MM_tableValues = "", MM_dbValues = "";
for (var i=0; i+1 < MM_fields.length; i+=2) {
var formVal = MM_fields[i+1];
var MM_typesArray = MM_columns[i+1].split(",");
var delim = (MM_typesArray[0] != "none") ? MM_typesArray[0] : "";
var altVal = (MM_typesArray[1] != "none") ? MM_typesArray[1] : "";
var emptyVal = (MM_typesArray[2] != "none") ? MM_typesArray[2] : "";
if (formVal == "" || formVal == "undefined") {
formVal = emptyVal;
} else {
if (altVal != "") {
formVal = altVal;
} else if (delim == "'") { // escape quotes
formVal = "'" + formVal.replace(/'/g,"''") + "'";
} else {
formVal = delim + formVal + delim;
}
}
MM_tableValues += ((i != 0) ? "," : "") + MM_columns[i];
MM_dbValues += ((i != 0) ? "," : "") + formVal;
}
MM_editQuery = "insert into " + MM_editTable + " (" + MM_tableValues + ") values (" + MM_dbValues + ")";

if (!MM_abortEdit) {
// execute the insert
var MM_editCmd = Server.CreateObject('ADODB.Command');
MM_editCmd.ActiveConnection = MM_editConnection;
MM_editCmd.CommandText = MM_editQuery;
MM_editCmd.Execute();
MM_editCmd.ActiveConnection.Close();

if (MM_editRedirectUrl) {
Response.Redirect(MM_editRedirectUrl);
}
}
}

<form ACTION="<%=MM_editAction%>" METHOD="POST" name="form1">
.
.
.
.
<input type="reset" name="Submit2" value="Restablecer">
<input type="submit" name="Submit" value="Enviar">
<input type="hidden" name="MM_insert" value="form1">
</form>




codigo de la pagina de consulta de comentario


<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/pabloalmada.asp" -->
<%
var rsconeccion = Server.CreateObject("ADODB.Recordset");
rsconeccion.ActiveConnection = MM_pabloalmada_STRING;
rsconeccion.Source = "SELECT * FROM Comentarios";
rsconeccion.CursorType = 0;
rsconeccion.CursorLocation = 2;
rsconeccion.LockType = 1;
rsconeccion.Open();
var rsconeccion_numRows = 0;
%>
<%
var Repeat1__numRows = 10;
var Repeat1__index = 0;
rsconeccion_numRows += Repeat1__numRows;
%>


/ create the list of parameters which should not be maintained
var MM_removeList = "&index=";
if (MM_paramName != "") MM_removeList += "&" + MM_paramName.toLowerCase() + "=";
var MM_keepURL="",MM_keepForm="",MM_keepBoth="",MM_kee pNone="";

// add the URL parameters to the MM_keepURL string
for (var items=new Enumerator(Request.QueryString); !items.atEnd(); items.moveNext()) {
var nextItem = "&" + items.item().toLowerCase() + "=";
if (MM_removeList.indexOf(nextItem) == -1) {
MM_keepURL += "&" + items.item() + "=" + Server.URLencode(Request.QueryString(items.item()) );
}
}

// add the Form variables to the MM_keepForm string
for (var items=new Enumerator(Request.Form); !items.atEnd(); items.moveNext()) {
var nextItem = "&" + items.item().toLowerCase() + "=";
if (MM_removeList.indexOf(nextItem) == -1) {
MM_keepForm += "&" + items.item() + "=" + Server.URLencode(Request.Form(items.item()));
}
}
// create the Form + URL string and remove the intial '&' from each of the strings
MM_keepBoth = MM_keepURL + MM_keepForm;
if (MM_keepBoth.length > 0) MM_keepBoth = MM_keepBoth.substring(1);
if (MM_keepURL.length > 0) MM_keepURL = MM_keepURL.substring(1);
if (MM_keepForm.length > 0) MM_keepForm = MM_keepForm.substring(1);
%>
<%

<%
// *** Move To Record: set the strings for the first, last, next, and previous links

var MM_moveFirst="",MM_moveLast="",MM_moveNext="",MM_m ovePrev="";
var MM_keepMove = MM_keepBoth; // keep both Form and URL parameters for moves
var MM_moveParam = "index";

// if the page has a repeated region, remove 'offset' from the maintained parameters
if (MM_size > 1) {
MM_moveParam = "offset";
if (MM_keepMove.length > 0) {
params = MM_keepMove.split("&");
MM_keepMove = "";
for (var i=0; i < params.length; i++) {
var nextItem = params[i].substring(0,params[i].indexOf("="));
if (nextItem.toLowerCase() != MM_moveParam) {
MM_keepMove += "&" + params[i];
}
}
if (MM_keepMove.length > 0) MM_keepMove = MM_keepMove.substring(1);
}
}
// set the strings for the move to links
if (MM_keepMove.length > 0) MM_keepMove += "&";
var urlStr = Request.ServerVariables("URL") + "?" + MM_keepMove + MM_moveParam + "=";
MM_moveFirst = urlStr + "0";
MM_moveLast = urlStr + "-1";
MM_moveNext = urlStr + (MM_offset + MM_size);
MM_movePrev = urlStr + Math.max(MM_offset - MM_size,0);

%>
%
<td width="31%" align="center"> <% if (MM_offset != 0) { %>
<a href="<%=MM_movePrev%>">Anterior</a>
<% } // end MM_offset != 0 %>
</td>
<td width="23%" align="center">
<% if (!MM_atTotal) { %>
<a href="<%=MM_moveNext%>">Siguiente</a>
<% } // end !MM_atTotal %>
</td>
%
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 14:53.