recordsert con informix

26/11/2003 - 14:26 por Roberto | Informe spam

Amigos
Estoy conectandome a una base de datos informix.La
conexión se realiza sin problemas, el recordset también se
crea bien, pero cuando intento desplegar el recordset la
página queda como colgada. No se que puede pasar es la
primera vez que intento conectarme a una bd informix.
Envio el código que ejecuto para ver si el problema no
está por ahí.
Desde ya muchas gracias

<%
set conn=Server.CreateObject("ADODB.Connection")
conn.ConnectionString = "Driver={INFORMIX 3.30 32 BIT};"& _
"Host2.168.0.64;" & _
"Server=baseprod;" & _
"Service26;" & _
"Protocol=olsoctcp;" & _
"Database=prueba;" & _
"UID=informix;" & _
"PWD345"
conn.Open

sql= "Select *"
sql=sql & " FROM productos "
sql=sql & " WHERE prodid0"

Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql, conn,0

if not rs.EOF then
Response.write rs("prodid")
end if
%>

Siga el debate

7 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#6 Manuel Etcheto

26/11/2003 - 20:33 | Informe spam

Bueno, si pasas el código completo quizá podamos ayudarte
a encontrarle el problema
Suerte
Manuel

Mostrar la cita

Responder a este mensaje

#7 Roberto

26/11/2003 - 21:06 | Informe spam

ACa te va el código que intento ejecutar

<%

dim conn_Informix
set conn_Informix=Server.CreateObject("ADODB.Connection")
'////////////////////////////////////////////////////
'Conn_Informix.Open "Dsn='';" & _
'//si colo esta linea da el siguiente error:
'Microsoft OLE DB Provider for ODBC Drivers
error '80004005'
'[Microsoft][Administrador de controladores ODBC]
'No se encuentra el nombre del origen de datos y no se
'especificó ningún controlador predeterminado
'por lo cual solo hago:

Conn_Informix.Open "Driver={INFORMIX 3.30 32 BIT};" & _
"Host2.168.0.64;" & _
"Server=ol_prod;" & _
"Service26;" & _
"Protocol=olsoctcp;" & _
"Database=poli;" & _
"UID=informix;" & _
"PWD=prueba"

Set rs= Server.CreateObject("ADODB.Recordset")
sql= "Select *"
sql=sql & " FROM productos "
sql=sql & " WHERE prodid0"

rs.open sql, Conn_Informix,0

if not rs.EOF then '//!!!!! en esta línea revienta,
Response.Write rs("prodid")
end if
%>
Gracias por la ayuda

Mostrar la cita
select
Mostrar la cita
El
Mostrar la cita
crea
Mostrar la cita

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

1 2

Busqueda sugerida