Los Foros de ASPTutor.com
Home | Perfil | Registrarse | Temas Activos | Miembros | Buscar | FAQ
Usuario:
Password:
 Todos los Foros
 ADO
 DHTML y JAVASCRIPT
 Foro Bloqueado  Tema Bloqueado


Autor Temas
paloma
Starting Member

España
23 Posts
Mensajes - 13 Jun 2002 :  11:08:38  Ver Perfil  Enviar Email
Hola,

Tengo que insertar una base de datos en asp dentro de un html que contiene a su vez un array de javascript. Segun selecciono lo que quiero ver se muestra o no la capa que llama al dato dentro del array.

Podría alguien ayudarme o explicarme como puedo hacer para insertar como dato del array la base de datos en asp?

mil gracias de antemano.

paloma

paloma

buho_nero
Moderator

España
1316 Posts
Posted - 13 Jun 2002 :  11:44:36  Ver perfil  Enviar e-mail
Tienes que explicarte mejor.
Cuando hablas de una base de datos, ¿te refieres a una consulta, a su nombre ...?
Lo que creo entender es que pretendes almacenar en cliente TODO el resultado de una consulta. Me parece una exageración. Plantea lo que quieres conseguir en la página, quizá haya soluciones más acertadas.

Edited by - buho_nero on 13 Jun 2002 11:45:08Inicio Pagina

paloma
Starting Member

España
23 Posts
Posted - 13 Jun 2002 :  11:55:38  Ver perfil  Enviar e-mail
Hola,

gracias por responder...es una consulta a una base de datos sql realizada en asp. El documento basico que tengo es en frames, y en frames y sin javascript me funciona bien, pero lo que hice fue insertar en el content del array el siguiente codigo (puesto seguido y separando las instrucciones del asp para que lo pille el javascript):


<html>
<head>
<!--#include file="ADOJAVAS.INC"-->


<%

control = Request("qidaño")

%>

<title>paloma asp solo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body bgcolor="#FFFFFF" text="#000000">

<!--AQUI EMPIEZA LO QUE QUIERO QUE ME MUESTRE LA CAPA, ES DECIR EL CONTENIDO QUE TIENE EL ARRAY EN JAVASCRIPT-->


<table width="525" border="1" cellspacing="0" cellpadding="0" class="grisoscurobig"><tr></tr><tr><td colspan="2" align="right" width="1" height="10">

<!--Inicio MENU-->
<%
Set cnCon = Server.CreateObject("ADODB.Connection")
cnStCon = "driver={Microsoft Access Driver (*.mdb)};" &_
"dbq=" & Server.MapPath("paloma.mdb")
cnCon.Open cnStCon, "", ""

Set rsCon = Server.CreateObject("ADODB.Recordset")
sql = "SELECT idaño, categoria " &_
"FROM orden " &_
"WHERE categoria < 3 " &_
"ORDER BY idaño DESC "
rsCon.Open sql, cnCon, adOpenForwardOnly, adLockReadOnly

Do While Not rsCon.EOF
Response.Write "<td>"
Response.Write "<a href=" &_
Chr(34) &_
"contenido.asp?" &_
"qidaño=" & rsCon("idaño") &_
Chr(34) & " target=contenido>" &_
"<font color=#000000 face=Verdana, Arial, Helvetica, sans-serif size=2>" &_
rsCon("idaño") &"&nbsp;&nbsp;" &_
"</font></a>" &_
"</td>" & vbCrLf
rsCon.MoveNext
Loop
rsCon.Close
Set rsCon = Nothing
cnCon.Close
Set cnCon = Nothing
%>
<!--Fin MENU-->

</td></tr><tr><td colspan="2" valign="top"><img src="img/fets1.gif" width="189" height="45"><br>

<!--Año seleccionado-->

<%=control%>

</td></tr><tr><td colspan="2">

<!--Inicio CONTENIDO -->

<%
Set cnCon = Server.CreateObject("ADODB.Connection")
cnStCon = "driver={Microsoft Access Driver (*.mdb)};" &_
"dbq=" & Server.MapPath("paloma.mdb")
cnCon.Open cnStCon, "", ""

Set rsCon = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * " &_
"FROM congresos " &_
"WHERE (idaño=" & control & ") " &_
"AND categoria < 3 " &_
"ORDER BY idcongreso "
rsCon.Open sql, cnCon, adOpenStatic, adLockReadOnly

On Error Resume Next
rsCon.MoveLast
Do While Not rsCon.BOF

Response.Write "<tr>" & vbCrLf
Response.Write "<td width=115></td>" & vbCrLf
Response.Write "<td colspan=2 width=370 align=top>" & vbCrLf

Response.Write "<b><br>" &_
rsCon("titulo") &_
"</b>" & vbCrLf
Response.Write "<br>" &_
rsCon("ciudad") &", "

If Not IsNull (rsCon("dias")) Then
If rsCon("dias") <> "" Then
If rsCon("dias") <> "0" Then
Response.Write "<a href=#.htm></a>" &_
rsCon("dias") &" de" & vbCrLf
End If
End If
End If
Response.Write "<a href=#.htm></a>" &_
rsCon("mes") &" de " &_
rsCon("idaño") & vbCrLf
Response.Write "<br>" &_
rsCon("espacio") & vbCrLf

If Not IsNull (rsCon("participantes")) Then
If rsCon("participantes") <> "" Then
Response.Write "<br>" &_
rsCon("participantes") &" participantes" & vbCrLf
End If
End If

Response.Write "<br>" & vbCrLf

Response.Write "</td>" & vbCrLf
Response.Write "<td width=15></td>" & vbCrLf

If Not IsNull (rsCon("logo")) Then
If rsCon("logo") <> "" Then
Response.Write "<td width=75 bgcolor=#000000 align=center>" &_
"<img src=logos/" &_
rsCon("logo") &_
" border=0>" & vbCrLf
Else
Response.Write "<td width=75 bgcolor=#000000 align=center>"
End If
Else
Response.Write "<td width=75 bgcolor=#000000 align=center>"
End If

Response.Write "</td>" & vbCrLf

rsCon.MovePrevious
Loop

rsCon.Close
Set rsCon = Nothing
cnCon.Close
Set cnCon = Nothing
%>


<!--Fin CONTENIDO -->

</td></tr></table>
</body>
</html>

muchas gracias de nuevo

Paloma

palomaInicio Pagina

buho_nero
Moderator

España
1316 Posts
Posted - 13 Jun 2002 :  18:08:36  Ver perfil  Enviar e-mail
No se a que te refieres con:
... insertar en el content del array ...

ni conozco:
<!--#include file="ADOJAVAS.INC"-->

me interesaría ver ese código.
Pero a lo que vamos, si lo que quieres es mostrar una página ASP, que eso es el código que me mandas, ¿por qué te complicas tanto la vida?. Hay muchas formas de mostrar páginas dentro de otras. Descríbeme el efecto que quieres conseguir.

Inicio Pagina

paloma
Starting Member

España
23 Posts
Posted - 14 Jun 2002 :  09:49:01  Ver perfil  Enviar e-mail
Hola de nuevo

Quiero conseguir el efecto de frames sin que tales frames existan. Es decir, tengo un menú de opciones de contenidos situado a la izquierda y cada vez que clicas pues en el centro de la pagina se muestra la informacion (mediante capas en javascript). Quiero conseguir poder ver la base de datos tambien de la misma manera: al hacer click en el menu de la izquierda que en el centro desaparezca la informacion anterior y aparezca la pagina asp (que es la que me permite hacer la consulta )...no sé si me explico...

Respecto al ADOJAVAS.INC es el include que se usa cuando se trabaja con javascript, se usa en vez de ADOVBS.INC.. si quieres te pego el codigo pero tiene que ser esta noche porque ahora no lo tengo aqui...

gracias!!

Paloma

palomaInicio Pagina

buho_nero
Moderator

España
1316 Posts
Posted - 14 Jun 2002 :  11:01:33  Ver perfil  Enviar e-mail
Yo también huyo de las frames cuando puedo, me parecen demasiado rígidas. Y casi siempre encuentro soluciones más dinámicas. Con las capas y con las iframes tengo lo que necesito, incluso metiendo includes en contenedores (me refiero a celdas de tablas, capas ...).
Si te basta distribuir el espacio en 2D, es decir, no necesitas superponer nada, puedes crear zonas con una tabla y las rellenas con lo que te parezca (si sólo programas para explorer yo usaría iframes, sino debes pasar a capas). Si necesitas la tercera dimensión o mover cosas en ejecución vete directamente a las capas.
A mi me merece la pena, sólo uso frames cuando se me imponen.

Inicio Pagina

paloma
Starting Member

España
23 Posts
Posted - 14 Jun 2002 :  11:26:28  Ver perfil  Enviar e-mail
Gracias!, tienes razón quizás deba meter dentro de la tabla que muestra el javascript y que pilla desde un array un include y no meter todo el codigo asp, probare asi...odio os frames...gracias de nuevo. Si necesitas el archivo ADOJAVAS.INC te lo envio.

un saludo

paloma

palomaInicio Pagina

futurama
Starting Member


20 Posts
Posted - 14 Jun 2002 :  22:01:19  Ver perfil  Enviar e-mail
hola chico,
No se te entiende muy bien. No parece que domines de ASP y JS intentas contruir una casa de 32 kilos por el tejado y si llueve se moja como todas las demas. Peo no deseperes entre tanta linea de codigo seguro que encuentras la respuesta.

Inicio Pagina

nicolas
New Member

España
74 Posts
Posted - 18 Jun 2002 :  17:34:29  Ver perfil  Enviar e-mail
Sólo un comentario sobre el codigo de Paloma y el archivo "adojavas.inc" del que hace un "include". Este archivo contiene todas las constantes de ADO, para utilizar desde ASP, ¡pero utilzando JavaScript como lenguaje de programación en servidor!. Veo que en el código se utiliza VBScript, así que se debería enlazar con el archivo "adovbs.inc" que contiene las mismas declaraciones pero en VB. Una cosa más: En tu ejemplo, creo que sólo utilizas 2 constantes: adOpenForwardOnly y adLockReadOnly, por lo que es un poco exagerado enlazar con estos archivos ".inc" que contienen + de 400 líneas (y que ocupan + de 14kb !).
Resumiendo, sustituye las constantes de ADO adOpenForwardOnly y adLockReadOnly por sus valores, que son 0 y 1 y ya no te hace falta la línea del 'include':

<!--#include file="ADOJAVAS.INC"-->

Nicolás Sánchez Ruiz
ESI Barcelona

Edited by - nicolas on 18 Jun 2002 17:56:25Inicio Pagina

   
 Foro Bloqueado  Tema Bloqueado
Ir a:
Los Foros de ASPTutor.com Los Foros de ASPTutor.com
Ir al principio de la Página

 Imprimir Tema
 

Descargas de manuales¦ Ejemplos de código ¦ Artículos mas visitados ¦ Envía tu articulo ¦ Foros ¦
  Libro de visitas ¦Crea un enlace con ASPTutor 
 

    © 2001-Hasta hoy  Pedro Rufo Martín  contactar