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

Desesperadamente Desesperado !!!!

Estas en el tema de Desesperadamente Desesperado !!!! en el foro de ASP Clásico en Foros del Web. Por favor necesito vuestra ayuda, soy un completo novato en esto del ASP y las conexiones a BD. Aver el problema es el siguiente: Me ...
  #1 (permalink)  
Antiguo 06/03/2002, 13:40
 
Fecha de Ingreso: marzo-2002
Mensajes: 18
Antigüedad: 23 años, 2 meses
Puntos: 0
Desesperadamente Desesperado !!!!

Por favor necesito vuestra ayuda, soy un completo novato en esto del ASP y las conexiones a BD. Aver el problema es el siguiente: Me baje de Desarrolloweb.com un ejemplo de lectura de una tabla, me instale el PWS en mi W98, y localmente, me funciona correctamente. Pero trabajo en un hospital en el cual tenemos un servidor NT para gestionar la Intranet, cree un DSN con el nombre del ejemplo, y lo unico que consigo es que me muestre todo el texto pero ningun registro de la BD, no me da ningun tipo de error, solo que no me muestra ningun registro, aqui os adjunto el ejemplo por si veis donde esta el fallo, gracias anticipadas!!.

codigo :


<HTML>
<HEAD>
<TITLE>Lectura de registros de una tabla</TITLE>
</HEAD>
<BODY>
<h1><div align="center">Lectura de la tabla</div></h1>
<br>
<br>
<%
'Antes de nada hay que instanciar el objeto Connection
Set Conn = Server.CreateObject("ADODB.Connection")

'Una vez instanciado Connection lo podemos abrir y le asignamos la base de datos donde vamos a efectuar las operaciones
Conn.Open "inventar"

'Ahora creamos la sentencia SQL que nos servira para hablar a la BD
sSQL="Select * From averias Order By planta"

'Ejecutamos la orden
set RS = Conn.Execute(sSQL)

'Mostramos los registros%>
<table align="center">
<tr>
<th>planta</th>
<th>servicio</th>
<th>averia</th>
</tr>
<%
Do While Not RS.Eof
%>
<tr>
<td><%=RS("planta")%></td>
<td><%=RS("servicio")%>&l t;/td>
<td><%=RS("averia")%></td>
</tr>
<%
RS.MoveNext
Loop

'Cerramos el sistema de conexion
Conn.Close
%>

</table>

<div align="center">
<a href="insertar.html">Añadir un nuevo registro</a><br>
<a href="actualizar1.asp">Actualizar un registro existente</a><br>
<a href="borrar1.asp">Borrar un registro</a><br>
</div>

</BODY>
</HTML>
  #2 (permalink)  
Antiguo 06/03/2002, 13:50
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 23 años, 4 meses
Puntos: 1
Re: Desesperadamente Desesperado !!!!

Cita:
y lo unico que consigo es que me muestre todo el texto
1.- Ya tienes instalado en el servidor NT el internet Information Server?

2.- Metiste dentro de la carpeta predeterminada tu pagina .asp?

3.- Gurdaste tu pagina como .asp?

Saludos :)
  #3 (permalink)  
Antiguo 06/03/2002, 14:03
Avatar de RootK
Moderador
 
Fecha de Ingreso: febrero-2002
Ubicación: México D.F
Mensajes: 8.004
Antigüedad: 23 años, 2 meses
Puntos: 50
Re: Desesperadamente Desesperado !!!!

Hola, si estas trabajando con DSN puedes hacer lo siguiente aparte de lo que dice Urjose..

sqltext ="Select * from averia"
Set miBase = Server.CreateObject
("ADODB.Connection")
set rs = Server.CreateObject
("ADODB.Recordset")
rs.miBase sqltext,"DSN=Ejemplo"
ó puedes hacer lo siguiente para la conexion

Set miBase = Server.CreateObject
("ADODB.Connection")
miBase.Open("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("Base.mdb")
set rs = Server.CreateObject
("ADODB.Recordset")
rs.open sqltext, miBAse
'depues de éstó puede hacer referencia a tus recordsets..!!

Espero haya sido de tu ayuda..cualquier cosa seguiremos en contacto..!!

Saludos













<html><center><embed src="http://www.angelfire.com/on/cobainss/Movie1.swf" height=80 width=200><BR></embed></center></html>
  #4 (permalink)  
Antiguo 06/03/2002, 14:05
 
Fecha de Ingreso: marzo-2002
Mensajes: 18
Antigüedad: 23 años, 2 meses
Puntos: 0
Re: Desesperadamente Desesperado !!!!

Perdon, cuando digo que solo me muestra el texto me refiero a los literales, no a todo el codigo!, osea que se ejecuta bien, muestra los textos en pantalla pero no muestra ningun registro.

1.- El administrador del server dice que si, que el IIS esta instalado.

2.- Si, esta en el Inetpub\wwwroot

3.- Si, esta guardado como &quot;lectura.asp&quot;

Gracias por contestar tan rapido !!
  #5 (permalink)  
Antiguo 06/03/2002, 14:11
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 23 años, 4 meses
Puntos: 1
Re: Desesperadamente Desesperado !!!!

si no te muestra ningun registro lo mas seguro es que el SQL no traiga ningun registro, ademas de que dices que no te manda error...

Prueba lo siguiente

sSQL=&quot;Select Count(*) as Counter From averias Order By planta&quot;


y despues Response.Write sSQL

para ver cuantos registros trae tu sql

saludos :)
  #6 (permalink)  
Antiguo 06/03/2002, 14:18
Avatar de RootK
Moderador
 
Fecha de Ingreso: febrero-2002
Ubicación: México D.F
Mensajes: 8.004
Antigüedad: 23 años, 2 meses
Puntos: 50
Re: Desesperadamente Desesperado !!!!

SI tu código es que está en pantalla, donde estas haciendo referencia a tu BD.

Tienes
Set Conn = .......
Conn.OPen &quot;inventar&quot; ???? pero donde hace referncia a los DSN, o al driver de Access ?
para poder abrir la base ??

Checa esa parte..!!

Saludos

<html><center><embed src="http://www.angelfire.com/on/cobainss/Movie1.swf" height=80 width=200><BR></embed></center></html>
  #7 (permalink)  
Antiguo 06/03/2002, 14:26
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 23 años, 4 meses
Puntos: 1
Re: Desesperadamente Desesperado !!!!

oops! rectifico

despues de la sSQL

pones algo asi

Set Rs=Conn.Execute(SQL)

y despues algo asi

response.write Rs(&quot;counter&quot;)

saludos :)
  #8 (permalink)  
Antiguo 06/03/2002, 14:59
 
Fecha de Ingreso: marzo-2002
Mensajes: 18
Antigüedad: 23 años, 2 meses
Puntos: 0
Re: Desesperadamente Desesperado !!!!

Si, efectivamente me retorna 3 que son los registros que hay en la BD (esto en el ordenador de casa, con PWS y Win98), pero el problema sigue siendo que porque en el trabajo con un NT creando el mismo DSN, la misma BD, los mismos scripts, osea todo identico al de casa, y no me muestra nada de nada . Es posible que sea culpa del Servidor NT ???
  #9 (permalink)  
Antiguo 06/03/2002, 15:06
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 23 años, 4 meses
Puntos: 1
Re: Desesperadamente Desesperado !!!!

esta raro, por que dices que no te retorna ningun error...

:(
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 12:50.