Programación Web y Scripting > ASP

 Leer Campo En Db Colgada En Servidor

(1/1)

Sagutxo:
Salu2, Ya se lo que voy a pedir no está bien pero no se me ocurre que mas hacer.

Tengo la DB en un FTP, imaginemos ftp.ya.com en el path raiz
La DB se llama Clientes y es un MDB de Access 97.

¿Qué tendría que hacer para leer el Campo Nombre de una Tabla llamada ejemplo sita en la DB Clientes?

Con que me muestre el campo en medio del internet explorer me vale.

Por favor, hacerme esta cosita estoy verdaderamente perdido :(

 :comp:  :comp:

giomar:
Mira si esto te sirve:

Set Conexion=Server.CreateObject("ADODB.CONNECTION")
   
Conexion.Open "Provider=Microsoft.Jet.OLEDB.3.51; Data Source=Clientes"

Set rsConsulta=Server.CreateObject("ADODB.RECORDSET")

SentenciaSQL="SELECT Nombre FROM ejemplo ORDER BY 1"

rsConsulta.Open SentenciaSQL,Conexion

If rsConsulta.Recount > 0 Then
   While NOT rsConsulta.EOF
      Response.Write(rsConsulta("Nombre ") & "<br>")   
      rsConsulta.MoveNext
   wend
Else
   Response.Write("No hay datos ha mostrar.")
End If

Sagutxo:
Gracias por tu interes.
Te digo lo que he hecho:

Creado un .asp con esto. Se llama ejemplo.asp
La DB se llama ejemplos.mdb

Tanto el .asp como el .mdb estan en la misma carpeta en el FTP.

La tabla de la DB se llama ejemplo y solo tiene un campo que se llama nombre


--- Código: Text ---&#60;%@LANGUAGE=&#34;VBSCRIPT&#34; CODEPAGE=&#34;1252&#34;%&#62;&#60;!DOCTYPE html PUBLIC &#34;-//W3C//DTD XHTML 1.0 Transitional//EN&#34; &#34;http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd&#34;&#62;&#60;html xmlns=&#34;http://www.w3.org/1999/xhtml&#34;&#62;&#60;head&#62;&#60;meta http-equiv=&#34;Content-Type&#34; content=&#34;text/html; charset=iso-8859-1&#34; /&#62;&#60;title&#62;Documento sin t&iacute;tulo&#60;/title&#62;&#60;/head&#62; &#60;body&#62;      &#60;%      Dim Conexion,  rsConsulta, SentenciaSQL       Set Conexion=Server.CreateObject(&#34;ADODB.CONNECTION&#34;)       Conexion.Open &#34;Provider=Microsoft.Jet.OLEDB.3.51; Data Source=ejemplos.mdb&#34;        Set rsConsulta=Server.CreateObject(&#34;ADODB.RECORDSET&#34;)       SentenciaSQL=&#34;SELECT nombre FROM ejemplo&#34;       rsConsulta.Open SentenciaSQL,Conexion         If rsConsulta.Recount &#62; 0 Then          While NOT rsConsulta.EOF          Response.Write(rsConsulta(&#34;nombre &#34;) & &#34;&#60;br&#62;&#34;)           rsConsulta.MoveNext          wend        Else        Response.Write(&#34;No hay datos ha mostrar.&#34;)        End If                   registros.Close      Set registros = Nothing      conexion.Close      Set conexion = Nothing       %&#62;  &#60;/body&#62;&#60;/html&#62; 
El internet explorer no me muestra nada, ni el mensaje de error :(

Podrias seguier ayudandome, estoy a cero en ideas. Muchgas gracias.

 :smartass:  :smartass:

Sagutxo:
Salu2, bueno ya he conseguido que me funcione en mi pc con el IIS, pero el mismo prog no me funciona en ewl FTP os dejo el codigo de conexion a ver si alguien puede ayudarme. Muchas gracias
NO soy capaz de que lea de la Db en el FTP.

--- Código: Text --- &#60;% strsql=&#34;SELECT * FROM Operacion ORDER BY idoperacion&#34;Set oConn=server.Createobject(&#34;ADODB.Connection&#34;)Set ValRs=server.CreateObject(&#34;ADODB.recordset&#34;)oConn.open &#34;Driver={Microsoft Access Driver (*.mdb)}; DBQ=&#34; & server.MapPath(&#34;access/bbdd.mdb&#34;)ValRs.open strsql, oConn 
Como es obvio sto continua y se cierra el code ASP.

Pos eso, que en el FTP no ve la DB y creo que es un error mio dado que en local akí si funciona.

 :comp:  :smartass:  :smartass:  :smartass:

Navegación

[0] Índice de Mensajes