URGENTE!!!!!! Referencia GetRef o similar

07/11/2003 - 18:41 por oscarledesma | Informe spam
Hola amigos les ruego una ayuda por que ya no se mas como
probar, les explico lo que estoy haciendo, en vbscript
estoy creando una tabla dinamica, y necesito que en el
evento onclick de la fila (TR) llame a una funcion, hasta
ahi no hay mayor inconveniente ya que lo he logrado usando
tr.onclick=getref("NombreDeLaFuncion") es problema sucede
ya que yo necesito pasarle parametros a esa funcion que
llama el onclick de la fila, ej
tr.onclick=getref("NombreDeLaFuncion(param1,param2)")
es aqui donde me da el error.
TAMBIEN PROBE
tr.onclick="NombreDeLaFuncion(param1,param2)"
pero no funciona, es decir no me da ningun error pero
tampoco el evento dispara la funcion "NombreDeLaFuncion
(param1,param2)" , y en el debuger coloque (? tr.onclick)
y me devuelve "NombreDeLaFuncion", la verdad que no se por
que sucede esto.
codigo:
set tbody = Document.createElement("TBODY")
set tr=document.createElement("TR")
set td=document.createElement("TD")
tr.id=i
'Parametro="pasaAdoc.asp?
arch=Archivo&Nsys000019&Exte=txt"
'tr.onclick="AbreDoc()" (ERRORR!!!!!!!!)
'tr.onclick=getref("AbreDoc(parametro)")(ERRORR!!!!!!!!)
tr.onclick = getref("hola")(ERRORR!!!!!!!!)
codigo1 = "Texto"
set text=document.createTextNode(codigo1)
td.insertbefore text,null
tr.insertbefore td,null
tbody.insertBefore tr, null
document.all.item("documentos").insertbefore tbody,null
set td=document.createElement("TD")
codigo1 = "Texto"
set text=document.createTextNode(codigo1)
td.insertbefore text,null
tr.insertbefore td,null
tbody.insertBefore tr, null
document.all.item("documentos").insertbefore tbody,null
set td=document.createElement("TD")
codigo1 = "Texto"
set text=document.createTextNode(codigo1)
td.insertbefore text,null
tr.insertbefore td,null
tbody.insertBefore tr, null
document.all.item("documentos").insertbefore tbody,null

Preguntas similare

Leer las respuestas

#6 Sashka
09/11/2003 - 01:55 | Informe spam
La curiosidad me mata... asi que me pusiste a investigar el asunto... :))

Efectivamente, no puedes pasar un puntero a una función con argumentos...
pero como siempre hay un truco para todo a ver que te parece esto... En
el id del TR pones la ruta que quieres... pero como siempre haces click en
un td y no en un tr... llamas al id del parentelement así...

Sub AbreDoc()
document.location.href=window.event.srcElement.parentElement.id
End Sub


Para atachar el evento:

tr.attachEvent "onclick", GetRef("AbreDoc")


Sashka



"oscarledesma" escribió en el mensaje
news:01fe01c3a63e$c9822a80$
gracias, lo voy a probar, una consulta con eso que
posteaste, es del lado del cliente o del servirdor, por
que yo estoy creando la tabla dinamica desde el lado del
cliente.??????

Lo primero Oscar, sigue el hilo !!!! no hace falta que


vayas haciendo nuevos
hilos con la misma pregunta.

Por otro lado, no se si me he enterado muy bien de lo que


quieres hacer,
pero si lo que
quieres es crear una tabla donde salgan listados por


filas los anlaces que
hay en una BBDD, y que cada enlace coja los parámetros de


la misma BBDD, y
que a su vez, el link lo ejecute la fila (TR), y no un


enlace convencional,
aquí te dejo un ejemplo (te adjunto el archivo


listado.asp para entender
mejor el código)

LISTADO.ASP




<%@LANGUAGE="VBSCRIPT"%>
<%Option Explicit%>
<%
Dim Conn, Rs, SQL
Set Conn = Server.CreateObject("ADODB.Connection")
set Rs = CreateObject("ADODB.Recordset")
Conn.open = "Driver={Microsoft Access Driver


(*.mdb)};DBQ=" &
Server.MapPath("BBDD.mdb")
SQL = "Select * from Tabla"
Rs.open SQL, Conn, 2,3
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01


Transitional//EN">
<html>
<head>
<title></title>
<script language="JavaScript" type="text/JavaScript">
function encima(src,fondo) {
if (!src.contains(event.fromElement)) {
src.style.cursor = 'hand';
src.bgColor = fondo;
}
}
function fuera(src,fondo) {
if (!src.contains(event.toElement)) {
src.style.cursor = 'default';
src.bgColor = fondo;
}
}
</script>
<meta http-equiv="Content-Type" content="text/html;
</head>

<body>
<table width="200" border="1" align="center"


cellpadding="0"
cellspacing="0">

<% While NOT rs.EOF %>
<tr>
<td onmouseover="encima(this,'#FFE7B0')"
onmouseout="fuera(this,'#FFFFFF')"
onClick="self.location='pasaAdoc.asp?arch=Archivo&Nsys=<%


= rs("Nsys")
%>&Exte=<%= rs("Exte") %>';"><%= rs("Nombre") %></td>
</tr>
<% rs.MoveNext()
Wend %>

</table>
</body>
</html>

<%
Rs.close
Set Rs = Nothing
Conn.close
Set Conn = Nothing
%>



BBDD.mdb
==>
Una tabla llamada TABLA, con 3 campos en ella:

Nombre: El nombre del archivo, o lo que quieras que salga


en la fila de la
tabla (TR)
Nsys: el valor que quieras
Exte: el valor que quieras


Espero que te sirva ;)
Jaime Pons









"Sashka" escribió en el


mensaje
news:
Eso me queda claro :)) sin embargo tu dices que cuando




le pones el nombre
de
la función sencillamente no hace nada eso es lo que




trataba de
averiguar...porqué no lo ejecuta

Sashka

"oscarledesma"




escribió en el
mensaje
news:0d6601c3a55b$714dd8c0$
mira con abredoc solo quiero decir que lo probe de dos
maneras y que ninguna de las dos funcionó
>Un poco enredado tu código... pero mi conclusión es que
estás tratando de
>ejecutar asp desde el cliente???? Eso es lo que




significa
ésto???
>
>set td=document.createElement("TD")
>tr.id=i
>'Parametro="pasaAdoc.asp?
>arch=Archivo&Nsys000019&Exte=txt"
>'tr.onclick="AbreDoc()" (ERRORR!!!!!!!!)
>'tr.onclick=getref("AbreDoc(parametro)")




(ERRORR!!!!!!!!)
>tr.onclick = getref("hola")(ERRORR!!!!!!!!)
>
>O lo que pretendes es abrir una ventana en el
navegador. que hace
>AbreDoc?????
>
>Sashka
>
>"oscarledesma"
escribió en el mensaje
>news:008401c3a556$657e6aa0$
>> Hola amigos les ruego una ayuda por que ya no se mas
como
>> probar, les explico lo que estoy haciendo, en




vbscript
>> estoy creando una tabla dinamica, y necesito que en




el
>> evento onclick de la fila (TR) llame a una funcion,
hasta
>> ahi no hay mayor inconveniente ya que lo he logrado
usando
>> tr.onclick=getref("NombreDeLaFuncion") es problema
sucede
>> ya que yo necesito pasarle parametros a esa funcion




que
>> llama el onclick de la fila, ej
>> tr.onclick=getref("NombreDeLaFuncion(param1,param2)")
>> es aqui donde me da el error.
>> TAMBIEN PROBE
>> tr.onclick="NombreDeLaFuncion(param1,param2)"
>> pero no funciona, es decir no me da ningun error pero
>> tampoco el evento dispara la




funcion "NombreDeLaFuncion
>> (param1,param2)" , y en el debuger coloque (?
tr.onclick)
>> y me devuelve "NombreDeLaFuncion", la verdad que no




se
por
>> que sucede esto.
>> codigo:
>> set tbody = Document.createElement("TBODY")
>> set tr=document.createElement("TR")
>> set td=document.createElement("TD")
>> tr.id=i
>> 'Parametro="pasaAdoc.asp?
>> arch=Archivo&Nsys000019&Exte=txt"
>> 'tr.onclick="AbreDoc()" (ERRORR!!!!!!!!)
>> 'tr.onclick=getref("AbreDoc(parametro)")




(ERRORR!!!!!!!!)
>> tr.onclick = getref("hola")(ERRORR!!!!!!!!)
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>> set td=document.createElement("TD")
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>> set td=document.createElement("TD")
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>
>
>.
>






.

Respuesta Responder a este mensaje
#7 Jaime Pons
09/11/2003 - 18:10 | Informe spam
Evidentemente, el archivo LISTADO.ASP se ejecuta en el lado del servidor, y
es éste elq ue le devuelve al cliente una archivo HTML.

Recuerda que para que te funcione, al menos debe de existir en la misma
carpeta donde está listado.asp una Base de Datos, con una tabla llamada
"Tabla", y los tres campos que te detallé.




"oscarledesma" escribió en el mensaje
news:01fe01c3a63e$c9822a80$
gracias, lo voy a probar, una consulta con eso que
posteaste, es del lado del cliente o del servirdor, por
que yo estoy creando la tabla dinamica desde el lado del
cliente.??????

Lo primero Oscar, sigue el hilo !!!! no hace falta que


vayas haciendo nuevos
hilos con la misma pregunta.

Por otro lado, no se si me he enterado muy bien de lo que


quieres hacer,
pero si lo que
quieres es crear una tabla donde salgan listados por


filas los anlaces que
hay en una BBDD, y que cada enlace coja los parámetros de


la misma BBDD, y
que a su vez, el link lo ejecute la fila (TR), y no un


enlace convencional,
aquí te dejo un ejemplo (te adjunto el archivo


listado.asp para entender
mejor el código)

LISTADO.ASP




<%@LANGUAGE="VBSCRIPT"%>
<%Option Explicit%>
<%
Dim Conn, Rs, SQL
Set Conn = Server.CreateObject("ADODB.Connection")
set Rs = CreateObject("ADODB.Recordset")
Conn.open = "Driver={Microsoft Access Driver


(*.mdb)};DBQ=" &
Server.MapPath("BBDD.mdb")
SQL = "Select * from Tabla"
Rs.open SQL, Conn, 2,3
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01


Transitional//EN">
<html>
<head>
<title></title>
<script language="JavaScript" type="text/JavaScript">
function encima(src,fondo) {
if (!src.contains(event.fromElement)) {
src.style.cursor = 'hand';
src.bgColor = fondo;
}
}
function fuera(src,fondo) {
if (!src.contains(event.toElement)) {
src.style.cursor = 'default';
src.bgColor = fondo;
}
}
</script>
<meta http-equiv="Content-Type" content="text/html;
</head>

<body>
<table width="200" border="1" align="center"


cellpadding="0"
cellspacing="0">

<% While NOT rs.EOF %>
<tr>
<td onmouseover="encima(this,'#FFE7B0')"
onmouseout="fuera(this,'#FFFFFF')"
onClick="self.location='pasaAdoc.asp?arch=Archivo&Nsys=<%


= rs("Nsys")
%>&Exte=<%= rs("Exte") %>';"><%= rs("Nombre") %></td>
</tr>
<% rs.MoveNext()
Wend %>

</table>
</body>
</html>

<%
Rs.close
Set Rs = Nothing
Conn.close
Set Conn = Nothing
%>



BBDD.mdb
==>
Una tabla llamada TABLA, con 3 campos en ella:

Nombre: El nombre del archivo, o lo que quieras que salga


en la fila de la
tabla (TR)
Nsys: el valor que quieras
Exte: el valor que quieras


Espero que te sirva ;)
Jaime Pons









"Sashka" escribió en el


mensaje
news:
Eso me queda claro :)) sin embargo tu dices que cuando




le pones el nombre
de
la función sencillamente no hace nada eso es lo que




trataba de
averiguar...porqué no lo ejecuta

Sashka

"oscarledesma"




escribió en el
mensaje
news:0d6601c3a55b$714dd8c0$
mira con abredoc solo quiero decir que lo probe de dos
maneras y que ninguna de las dos funcionó
>Un poco enredado tu código... pero mi conclusión es que
estás tratando de
>ejecutar asp desde el cliente???? Eso es lo que




significa
ésto???
>
>set td=document.createElement("TD")
>tr.id=i
>'Parametro="pasaAdoc.asp?
>arch=Archivo&Nsys000019&Exte=txt"
>'tr.onclick="AbreDoc()" (ERRORR!!!!!!!!)
>'tr.onclick=getref("AbreDoc(parametro)")




(ERRORR!!!!!!!!)
>tr.onclick = getref("hola")(ERRORR!!!!!!!!)
>
>O lo que pretendes es abrir una ventana en el
navegador. que hace
>AbreDoc?????
>
>Sashka
>
>"oscarledesma"
escribió en el mensaje
>news:008401c3a556$657e6aa0$
>> Hola amigos les ruego una ayuda por que ya no se mas
como
>> probar, les explico lo que estoy haciendo, en




vbscript
>> estoy creando una tabla dinamica, y necesito que en




el
>> evento onclick de la fila (TR) llame a una funcion,
hasta
>> ahi no hay mayor inconveniente ya que lo he logrado
usando
>> tr.onclick=getref("NombreDeLaFuncion") es problema
sucede
>> ya que yo necesito pasarle parametros a esa funcion




que
>> llama el onclick de la fila, ej
>> tr.onclick=getref("NombreDeLaFuncion(param1,param2)")
>> es aqui donde me da el error.
>> TAMBIEN PROBE
>> tr.onclick="NombreDeLaFuncion(param1,param2)"
>> pero no funciona, es decir no me da ningun error pero
>> tampoco el evento dispara la




funcion "NombreDeLaFuncion
>> (param1,param2)" , y en el debuger coloque (?
tr.onclick)
>> y me devuelve "NombreDeLaFuncion", la verdad que no




se
por
>> que sucede esto.
>> codigo:
>> set tbody = Document.createElement("TBODY")
>> set tr=document.createElement("TR")
>> set td=document.createElement("TD")
>> tr.id=i
>> 'Parametro="pasaAdoc.asp?
>> arch=Archivo&Nsys000019&Exte=txt"
>> 'tr.onclick="AbreDoc()" (ERRORR!!!!!!!!)
>> 'tr.onclick=getref("AbreDoc(parametro)")




(ERRORR!!!!!!!!)
>> tr.onclick = getref("hola")(ERRORR!!!!!!!!)
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>> set td=document.createElement("TD")
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>> set td=document.createElement("TD")
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>
>
>.
>






.

Respuesta Responder a este mensaje
#8 OscarLedesma
10/11/2003 - 11:45 | Informe spam
PERFECTO, lo probe y anda de maravillas, Gracias SaShka.
La curiosidad me mata... asi que me pusiste a investigar


el asunto... :))

Efectivamente, no puedes pasar un puntero a una función


con argumentos...
pero como siempre hay un truco para todo a ver que te


parece esto... En
el id del TR pones la ruta que quieres... pero como


siempre haces click en
un td y no en un tr... llamas al id del parentelement


así...

Sub AbreDoc()
document.location.href=window.event.srcElement.parentEleme


nt.id
End Sub


Para atachar el evento:

tr.attachEvent "onclick", GetRef("AbreDoc")


Sashka



"oscarledesma"


escribió en el mensaje
news:01fe01c3a63e$c9822a80$
gracias, lo voy a probar, una consulta con eso que
posteaste, es del lado del cliente o del servirdor, por
que yo estoy creando la tabla dinamica desde el lado del
cliente.??????

Lo primero Oscar, sigue el hilo !!!! no hace falta que


vayas haciendo nuevos
hilos con la misma pregunta.

Por otro lado, no se si me he enterado muy bien de lo que


quieres hacer,
pero si lo que
quieres es crear una tabla donde salgan listados por


filas los anlaces que
hay en una BBDD, y que cada enlace coja los parámetros de


la misma BBDD, y
que a su vez, el link lo ejecute la fila (TR), y no un


enlace convencional,
aquí te dejo un ejemplo (te adjunto el archivo


listado.asp para entender
mejor el código)

LISTADO.ASP






<%@LANGUAGE="VBSCRIPT"%>
<%Option Explicit%>
<%
Dim Conn, Rs, SQL
Set Conn = Server.CreateObject("ADODB.Connection")
set Rs = CreateObject("ADODB.Recordset")
Conn.open = "Driver={Microsoft Access Driver


(*.mdb)};DBQ=" &
Server.MapPath("BBDD.mdb")
SQL = "Select * from Tabla"
Rs.open SQL, Conn, 2,3
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01


Transitional//EN">
<html>
<head>
<title></title>
<script language="JavaScript" type="text/JavaScript">
function encima(src,fondo) {
if (!src.contains(event.fromElement)) {
src.style.cursor = 'hand';
src.bgColor = fondo;
}
}
function fuera(src,fondo) {
if (!src.contains(event.toElement)) {
src.style.cursor = 'default';
src.bgColor = fondo;
}
}
</script>
<meta http-equiv="Content-Type" content="text/html;
</head>

<body>
<table width="200" border="1" align="center"


cellpadding="0"
cellspacing="0">

<% While NOT rs.EOF %>
<tr>
<td onmouseover="encima(this,'#FFE7B0')"
onmouseout="fuera(this,'#FFFFFF')"
onClick="self.location='pasaAdoc.asp?arch=Archivo&Nsys=<%


= rs("Nsys")
%>&Exte=<%= rs("Exte") %>';"><%= rs("Nombre") %></td>
</tr>
<% rs.MoveNext()
Wend %>

</table>
</body>
</html>

<%
Rs.close
Set Rs = Nothing
Conn.close
Set Conn = Nothing
%>



BBDD.mdb
==>>
Una tabla llamada TABLA, con 3 campos en ella:

Nombre: El nombre del archivo, o lo que quieras que salga


en la fila de la
tabla (TR)
Nsys: el valor que quieras
Exte: el valor que quieras


Espero que te sirva ;)
Jaime Pons









"Sashka" escribió en el


mensaje
news:
Eso me queda claro :)) sin embargo tu dices que cuando




le pones el nombre
de
la función sencillamente no hace nada eso es lo que




trataba de
averiguar...porqué no lo ejecuta

Sashka

"oscarledesma"




escribió en el
mensaje
news:0d6601c3a55b$714dd8c0$
mira con abredoc solo quiero decir que lo probe de dos
maneras y que ninguna de las dos funcionó
>Un poco enredado tu código... pero mi conclusión es






que
estás tratando de
>ejecutar asp desde el cliente???? Eso es lo que




significa
ésto???
>
>set td=document.createElement("TD")
>tr.id=i
>'Parametro="pasaAdoc.asp?
>arch=Archivo&Nsys000019&Exte=txt"
>'tr.onclick="AbreDoc()" (ERRORR!!!!!!!!)
>'tr.onclick=getref("AbreDoc(parametro)")




(ERRORR!!!!!!!!)
>tr.onclick = getref("hola")(ERRORR!!!!!!!!)
>
>O lo que pretendes es abrir una ventana en el
navegador. que hace
>AbreDoc?????
>
>Sashka
>
>"oscarledesma"
escribió en el mensaje
>news:008401c3a556$657e6aa0$
>> Hola amigos les ruego una ayuda por que ya no se mas
como
>> probar, les explico lo que estoy haciendo, en




vbscript
>> estoy creando una tabla dinamica, y necesito que en




el
>> evento onclick de la fila (TR) llame a una funcion,
hasta
>> ahi no hay mayor inconveniente ya que lo he logrado
usando
>> tr.onclick=getref("NombreDeLaFuncion") es problema
sucede
>> ya que yo necesito pasarle parametros a esa funcion




que
>> llama el onclick de la fila, ej
>> tr.onclick=getref("NombreDeLaFuncion






(param1,param2)")
>> es aqui donde me da el error.
>> TAMBIEN PROBE
>> tr.onclick="NombreDeLaFuncion(param1,param2)"
>> pero no funciona, es decir no me da ningun error






pero
>> tampoco el evento dispara la




funcion "NombreDeLaFuncion
>> (param1,param2)" , y en el debuger coloque (?
tr.onclick)
>> y me devuelve "NombreDeLaFuncion", la verdad que no




se
por
>> que sucede esto.
>> codigo:
>> set tbody = Document.createElement("TBODY")
>> set tr=document.createElement("TR")
>> set td=document.createElement("TD")
>> tr.id=i
>> 'Parametro="pasaAdoc.asp?
>> arch=Archivo&Nsys000019&Exte=txt"
>> 'tr.onclick="AbreDoc()" (ERRORR!!!!!!!!)
>> 'tr.onclick=getref("AbreDoc(parametro)")




(ERRORR!!!!!!!!)
>> tr.onclick = getref("hola")(ERRORR!!!!!!!!)
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>> set td=document.createElement("TD")
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>> set td=document.createElement("TD")
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>
>
>.
>






.





.

Respuesta Responder a este mensaje
#9 Sashka
10/11/2003 - 18:21 | Informe spam
:)) que bueno!!

Sashka

"OscarLedesma" escribió en el mensaje
news:062e01c3a777$d2e2eda0$
PERFECTO, lo probe y anda de maravillas, Gracias SaShka.
La curiosidad me mata... asi que me pusiste a investigar


el asunto... :))

Efectivamente, no puedes pasar un puntero a una función


con argumentos...
pero como siempre hay un truco para todo a ver que te


parece esto... En
el id del TR pones la ruta que quieres... pero como


siempre haces click en
un td y no en un tr... llamas al id del parentelement


así...

Sub AbreDoc()
document.location.href=window.event.srcElement.parentEleme


nt.id
End Sub


Para atachar el evento:

tr.attachEvent "onclick", GetRef("AbreDoc")


Sashka



"oscarledesma"


escribió en el mensaje
news:01fe01c3a63e$c9822a80$
gracias, lo voy a probar, una consulta con eso que
posteaste, es del lado del cliente o del servirdor, por
que yo estoy creando la tabla dinamica desde el lado del
cliente.??????

Lo primero Oscar, sigue el hilo !!!! no hace falta que


vayas haciendo nuevos
hilos con la misma pregunta.

Por otro lado, no se si me he enterado muy bien de lo que


quieres hacer,
pero si lo que
quieres es crear una tabla donde salgan listados por


filas los anlaces que
hay en una BBDD, y que cada enlace coja los parámetros de


la misma BBDD, y
que a su vez, el link lo ejecute la fila (TR), y no un


enlace convencional,
aquí te dejo un ejemplo (te adjunto el archivo


listado.asp para entender
mejor el código)

LISTADO.ASP






<%@LANGUAGE="VBSCRIPT"%>
<%Option Explicit%>
<%
Dim Conn, Rs, SQL
Set Conn = Server.CreateObject("ADODB.Connection")
set Rs = CreateObject("ADODB.Recordset")
Conn.open = "Driver={Microsoft Access Driver


(*.mdb)};DBQ=" &
Server.MapPath("BBDD.mdb")
SQL = "Select * from Tabla"
Rs.open SQL, Conn, 2,3
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01


Transitional//EN">
<html>
<head>
<title></title>
<script language="JavaScript" type="text/JavaScript">
function encima(src,fondo) {
if (!src.contains(event.fromElement)) {
src.style.cursor = 'hand';
src.bgColor = fondo;
}
}
function fuera(src,fondo) {
if (!src.contains(event.toElement)) {
src.style.cursor = 'default';
src.bgColor = fondo;
}
}
</script>
<meta http-equiv="Content-Type" content="text/html;
</head>

<body>
<table width="200" border="1" align="center"


cellpadding="0"
cellspacing="0">

<% While NOT rs.EOF %>
<tr>
<td onmouseover="encima(this,'#FFE7B0')"
onmouseout="fuera(this,'#FFFFFF')"
onClick="self.location='pasaAdoc.asp?arch=Archivo&Nsys=<%


= rs("Nsys")
%>&Exte=<%= rs("Exte") %>';"><%= rs("Nombre") %></td>
</tr>
<% rs.MoveNext()
Wend %>

</table>
</body>
</html>

<%
Rs.close
Set Rs = Nothing
Conn.close
Set Conn = Nothing
%>



BBDD.mdb
==>>
Una tabla llamada TABLA, con 3 campos en ella:

Nombre: El nombre del archivo, o lo que quieras que salga


en la fila de la
tabla (TR)
Nsys: el valor que quieras
Exte: el valor que quieras


Espero que te sirva ;)
Jaime Pons









"Sashka" escribió en el


mensaje
news:
Eso me queda claro :)) sin embargo tu dices que cuando




le pones el nombre
de
la función sencillamente no hace nada eso es lo que




trataba de
averiguar...porqué no lo ejecuta

Sashka

"oscarledesma"




escribió en el
mensaje
news:0d6601c3a55b$714dd8c0$
mira con abredoc solo quiero decir que lo probe de dos
maneras y que ninguna de las dos funcionó
>Un poco enredado tu código... pero mi conclusión es






que
estás tratando de
>ejecutar asp desde el cliente???? Eso es lo que




significa
ésto???
>
>set td=document.createElement("TD")
>tr.id=i
>'Parametro="pasaAdoc.asp?
>arch=Archivo&Nsys000019&Exte=txt"
>'tr.onclick="AbreDoc()" (ERRORR!!!!!!!!)
>'tr.onclick=getref("AbreDoc(parametro)")




(ERRORR!!!!!!!!)
>tr.onclick = getref("hola")(ERRORR!!!!!!!!)
>
>O lo que pretendes es abrir una ventana en el
navegador. que hace
>AbreDoc?????
>
>Sashka
>
>"oscarledesma"
escribió en el mensaje
>news:008401c3a556$657e6aa0$
>> Hola amigos les ruego una ayuda por que ya no se mas
como
>> probar, les explico lo que estoy haciendo, en




vbscript
>> estoy creando una tabla dinamica, y necesito que en




el
>> evento onclick de la fila (TR) llame a una funcion,
hasta
>> ahi no hay mayor inconveniente ya que lo he logrado
usando
>> tr.onclick=getref("NombreDeLaFuncion") es problema
sucede
>> ya que yo necesito pasarle parametros a esa funcion




que
>> llama el onclick de la fila, ej
>> tr.onclick=getref("NombreDeLaFuncion






(param1,param2)")
>> es aqui donde me da el error.
>> TAMBIEN PROBE
>> tr.onclick="NombreDeLaFuncion(param1,param2)"
>> pero no funciona, es decir no me da ningun error






pero
>> tampoco el evento dispara la




funcion "NombreDeLaFuncion
>> (param1,param2)" , y en el debuger coloque (?
tr.onclick)
>> y me devuelve "NombreDeLaFuncion", la verdad que no




se
por
>> que sucede esto.
>> codigo:
>> set tbody = Document.createElement("TBODY")
>> set tr=document.createElement("TR")
>> set td=document.createElement("TD")
>> tr.id=i
>> 'Parametro="pasaAdoc.asp?
>> arch=Archivo&Nsys000019&Exte=txt"
>> 'tr.onclick="AbreDoc()" (ERRORR!!!!!!!!)
>> 'tr.onclick=getref("AbreDoc(parametro)")




(ERRORR!!!!!!!!)
>> tr.onclick = getref("hola")(ERRORR!!!!!!!!)
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>> set td=document.createElement("TD")
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>> set td=document.createElement("TD")
>> codigo1 = "Texto"
>> set text=document.createTextNode(codigo1)
>> td.insertbefore text,null
>> tr.insertbefore td,null
>> tbody.insertBefore tr, null
>> document.all.item("documentos").insertbefore




tbody,null
>
>
>.
>






.





.

email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida