ASP - ASP y Access

 
Vista:

ASP y Access

Publicado por Gabo (2 intervenciones) el 09/06/2008 22:57:55
Hola a todos...
Tengo un pequeño inconveniente que se ha convertido en una gran espina...
Lo que pasa es que tengo un script de una consulta a una bd Access, pero al
parecer conecta pero no me refleja información, pensé que depronto era la
conexion y lo intenté con DSN y sin éste pero de ninguna forma me da
resultados, he intentado con diferentes formas y tampoco, tal vez me puedan
ayudar... la bd se llama jubilables, la tabla expertos y los campos son
nombre y proceso... (fácil no?)... Esta es la muestra de dos cód que tengo...

-------------------------------------------------------------------------
<%@LANGUAGE="VBSCRIPT" %>
<%
Dim BDD ' variable que se encarga de la base de datos
Dim TABLA ' variable que se encarga de la tabla
'creo los objetos que manejan la base de datos y la tabla
Set BDD = Server.CreateObject("ADODB.Connection")
Set TABLA = Server.CreateObject("ADODB.Recordset")
'abro la base de datos
BDD.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" +
Server.MapPath("jubilables.mdb"))
'abro la tabla
TABLA.Open "relevos", BDD ' indico el nombre de la tabla y la base de datos
'ahora recorro toda la tabla y muestro los datos
While NOT TABLA.EOF 'recorre la tabla hasta que EOF sea verdadero
Response.Write "Nombre:" & TABLA.fields("nombre") & "<br>"
Response.Write "C de A:" & TABLA.fields("cda") & "<br>"
Wend
'cierro todo y libero los objetos
TABLA.Close
BDD.Close
Set BDD = Nothing
Set TABLA = Nothing
%>

--------------------------------------------------------
Este es otro:

<%
Set BDD = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
BDD.Open "Access10","user","1234"

Do while NOT Rs.EOF
Rs.Open " select * from expertos ",cnx
Response.Write "Nombre:" & Rs("Nombre") & " "
Response.Write "Proceso:" & Rs("Proceso") & " "
Rs.moveNext
loop
Rs.Close
BDD.Close
Set BDD = Nothing
Set Rs = Nothing
%>

------------------------------------------------------------------
He aqui el ultimo...
<%@LANGUAGE="VBSCRIPT" %>
<%
dim txt
dbfile=Server.MapPath("jubilables.mdb")
set cnx= Server.CreateObject("ADODB.Connection")
cnx.Open "DRIVER={Microsoft Access Driver (*.mdb)};dbq="&dbfile
set rs=server.CreateObject("ADODB.recordset")
rs.Open " select * from expertos ,cnx
%>
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:ASP y Access

Publicado por Santos Pairazamán (415 intervenciones) el 10/06/2008 17:49:23
Puedes indicarnos cual es el error q t da en cada uno de los modos de conexión

talvez la base datos no esta en la raiz y esta dentro de una carpeta por ejm

"Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("db/menu.mdb")

donde db es el nombre de la carpeta dond se encuentra la base datos.

a la hora de conectarte tienes q tener en cuenta el tipo de cursor y bloqueo

'---- CursorTypeEnum Values ----
Const adOpenForwardOnly = 0
Const adOpenKeyset = 1
Const adOpenDynamic = 2
Const adOpenStatic = 3

'---- LockTypeEnum Values ----
Const adLockReadOnly = 1
Const adLockPessimistic = 2
Const adLockOptimistic = 3
Const adLockBatchOptimistic = 4

ejm

rs.open ssql,oconn,3,3 ' indica cursor estático y bloqueo Optimista

para + info busca en IE sobre las constantes q t menciono

Hasta Pronto
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar