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

Ke pasa?

Estas en el tema de Ke pasa? en el foro de ASP Clásico en Foros del Web. Los fantasmas siguen volando aquí! Miren, la única forma como me corre la consulta es asi: gsConnect = " Driver={MySQL};SERVER=localhost;DATABASE=I;UID=ra; PASSWORD=b" Set GobjConnect = server.createobject("ADODB.Connection") ...
  #1 (permalink)  
Antiguo 26/02/2003, 17:56
 
Fecha de Ingreso: enero-2002
Ubicación: Perez Zeledon Costa Rica
Mensajes: 1.009
Antigüedad: 22 años, 5 meses
Puntos: 11
Los fantasmas siguen volando aquí!

Miren, la única forma como me corre la consulta es asi:
gsConnect = " Driver={MySQL};SERVER=localhost;DATABASE=I;UID=ra; PASSWORD=b"


Set GobjConnect = server.createobject("ADODB.Connection")
GobjConnect.open gsConnect

Set objPagingRS = Server.CreateObject("ADODB.Recordset")
gsSQL = "SELECT * FROM Auctions"
objPagingRS.Open gsSQL,GobjConnect,3,3
'set objPagingRS= gsConnect.execute(gsSQL)

if not objPagingRS.eof and objPagingRS.bof then
response.write objPagingRS("Province")
end if


Cuando activo:
set objPagingRS= gsConnect.execute(gsSQL)
y comento:
objPagingRS.Open gsSQL,GobjConnect,3,3
me da este error:
Microsoft VBScript runtime error '800a01a8'

Object required: ' Driver={MySQL};SERV'

/real-estate/basura/prueba1.asp, line 21

la linea 21 es set objPagingRS= gsConnect.execute(gsSQL)

Ahora, si lo dejo tal como está arriba, al principio, me corre la consulta pero no me arroja ningún resultado, siendo que la tabla está llena!.

Por ke esto?

ya estoy
  #2 (permalink)  
Antiguo 26/02/2003, 22:28
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 22 años, 5 meses
Puntos: 1
no no no.

Tu pon tal cual esto:

gsConnect = " Driver={MySQL};SERVER=localhost;DATABASE=I;UID=ra;
PASSWORD=b"


Set GobjConnect = server.createobject("ADODB.Connection")
GobjConnect.open gsConnect
gsSQL = "SELECT * FROM Auctions"
set objPagingRS= gsConnect.execute(gsSQL)

if not objPagingRS.eof and not objPagingRS.bof then
response.write objPagingRS("Province")
end if

o esto

gsConnect = " Driver={MySQL};SERVER=localhost;DATABASE=I;UID=ra;
PASSWORD=b"


Set GobjConnect = server.createobject("ADODB.Connection")
GobjConnect.open gsConnect

Set objPagingRS = Server.CreateObject("ADODB.Recordset")
gsSQL = "SELECT * FROM Auctions"
objPagingRS.Open gsSQL,GobjConnect,3,3

if not objPagingRS.eof and not objPagingRS.bof then
response.write objPagingRS("Province")
end if


Tu codigo anterior SOLO TE VA A REGRESAR UN REGISTRO pues no tienes un ciclo que recorra los registros.

No modifiques nada has xopy & paste, por que cuando lo intentas modificar te falta modificar algo o le pones algo de mas
  #3 (permalink)  
Antiguo 26/02/2003, 22:58
 
Fecha de Ingreso: enero-2002
Ubicación: Perez Zeledon Costa Rica
Mensajes: 1.009
Antigüedad: 22 años, 5 meses
Puntos: 11
Jose.
La primera opcion:
gsConnect = " Driver={MySQL};SERVER=localhost;DATABASE=I;UID=ra; PASSWORD=b"

Set GobjConnect = server.createobject("ADODB.Connection")
GobjConnect.open gsConnect
gsSQL = "SELECT * FROM Auctions"
set objPagingRS= gsConnect.execute(gsSQL)

if not objPagingRS.eof and not objPagingRS.bof then
response.write objPagingRS("Province")
end if

Me marca este error:
Microsoft VBScript runtime error '800a01a8'

Object required: ' Driver={MySQL};SERV'

/basura/prueba1.asp, line 17
esa linea es
set objPagingRS= gsConnect.execute(gsSQL)


La segunda opcion:
gsConnect = " Driver={MySQL};SERVER=localhost;DATABASE=I;UID=ra; PASSWORD=b"

Set GobjConnect = server.createobject("ADODB.Connection")
GobjConnect.open gsConnect

Set objPagingRS = Server.CreateObject("ADODB.Recordset")
gsSQL = "SELECT * FROM Auctions"
objPagingRS.Open gsSQL,GobjConnect,3,3

if not objPagingRS.eof and not objPagingRS.bof then
response.write objPagingRS("Province")
response.write objPagingRS("ItemID")

end if


Siiii corre y hala un dato, nada mas uno, el primero de la tabla.
Heredia20

Ahora, mi pregunta es.
Por que esta corre y la anterior no?
Por ke esta hala la info y otras opciones no halan nada?


Ahhh, y muchas gracias Jose y Baka por la ayuda!
  #4 (permalink)  
Antiguo 26/02/2003, 23:09
Avatar de urjose  
Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 22 años, 5 meses
Puntos: 1
Duh, es que la primera debia ser asi


gsConnect = " Driver={MySQL};SERVER=localhost;DATABASE=I;UID=ra;

PASSWORD=b"


Set GobjConnect = server.createobject("ADODB.Connection")
GobjConnect.open gsConnect
gsSQL = "SELECT * FROM Auctions"
set objPagingRS= GobjConnect.execute(gsSQL)

if not objPagingRS.eof and not objPagingRS.bof then
response.write objPagingRS("Province")
end if
  #5 (permalink)  
Antiguo 27/02/2003, 09:40
 
Fecha de Ingreso: enero-2002
Ubicación: Perez Zeledon Costa Rica
Mensajes: 1.009
Antigüedad: 22 años, 5 meses
Puntos: 11
Gracias Jose, realmente me ayudaste a encontrar el problema en mi codigo, y explico por si acaso a alguien mas le pasa:
Todas mis consultas las hice con esta estructura:
CountSQL = CountSQL & " SELECT COUNT(*) AS total FROM Auctions WHERE "
CountSQL = CountSQL & " AvailDate <= " & SQLDate(NOW)
CountSQL = CountSQL & " And Ended = false "
CountSQL = CountSQL & " And CategoryID = " & SQLVal(ID)



Y creo que este servidor no lee este tipo de consulta, solo consultas en una sola linea como:
CountSQL = CountSQL & " SELECT COUNT(*) AS total FROM Auctions WHERE Ended = 0 And CategoryID = " & SQLVal(ID)


Pues con ese unico cambio ya me corre y me arroja resultados.

Pero realmente sera correcta mi suposición de que es debido al servidor? lo que me extraña en que localmente me corre bien cuanquiler estructura es arriba donde no.

Que opinan los expertos?


Muchisimas gracias.
Ahh, estoy pidiendo al proveedor que me cambie de servidor!

y se merecen un
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 00:40.