no funciona el enlace con la base de datos
Hola:
mi problema es el siguiente : tengo una base de datos en Oracle y para acceder a ella y leer un campo de una tabla hice lo siguiente :
<%
Set conexion=Server.CreateObject("ADODB.Connection")
Set result=Server.CreateObject("ADODB.RecordSet")
conexion.Open "telev","telev2","unodos"
result.Open "select peliculas.titulo from peliculas where id_pelicula=1",conexion,2,3
Do Until result.EOF
Response.Write(result("titulo") & "<br>")
result.MoveNext
Loop
result.Close
conexion.Close
%>
pero no saca ningún texto.¿Alguien puede ayudarme?
Gracias y saludos.
mi problema es el siguiente : tengo una base de datos en Oracle y para acceder a ella y leer un campo de una tabla hice lo siguiente :
<%
Set conexion=Server.CreateObject("ADODB.Connection")
Set result=Server.CreateObject("ADODB.RecordSet")
conexion.Open "telev","telev2","unodos"
result.Open "select peliculas.titulo from peliculas where id_pelicula=1",conexion,2,3
Do Until result.EOF
Response.Write(result("titulo") & "<br>")
result.MoveNext
Loop
result.Close
conexion.Close
%>
pero no saca ningún texto.¿Alguien puede ayudarme?
Gracias y saludos.
Nunca he accesado a oracle con asp pero al hacerlo access para hacer referencia a un campo utilizarias algo asi como
Result.field("campo")
Espero te sea de ayuda...
Result.field("campo")
Espero te sea de ayuda...
La cadena de conexión no está bien, o al menos eso creo yo, debería ser algo así:
con.Open = "Provider=MSDAORA.1;SERVER=SERVIDOR;database=BD; UID=admin; PWD=contraseña; Timeout=60"
Suerte.
con.Open = "Provider=MSDAORA.1;SERVER=SERVIDOR;database=BD; UID=admin; PWD=contraseña; Timeout=60"
Suerte.
mira veo que te han intentado ayudar pero solo tienes que hacer lo siguiente :
<%
Set conexion=Server.CreateObject("ADODB.Connection")
Set result=Server.CreateObject("ADODB.RecordSet")
conexion.Open "telev","telev2","unodos"
result.Open "select peliculas.titulo from peliculas where id_pelicula=1",conexion,2,3
Do Until result.EOF %>
<table>
<tr>
<td> <%=result.fields("titulo")%>
</tr>
<%result.MoveNext %>
<%Loop %>
<%result.Close
conexion.Close
%>
<%
Set conexion=Server.CreateObject("ADODB.Connection")
Set result=Server.CreateObject("ADODB.RecordSet")
conexion.Open "telev","telev2","unodos"
result.Open "select peliculas.titulo from peliculas where id_pelicula=1",conexion,2,3
Do Until result.EOF %>
<table>
<tr>
<td> <%=result.fields("titulo")%>
</tr>
<%result.MoveNext %>
<%Loop %>
<%result.Close
conexion.Close
%>
jijijijiji se me olvido cerrar el <td>
nota es muy importante que lleve el signo de = antes de result "viste chamin"
<%
Set conexion=Server.CreateObject("ADODB.Connection")
Set result=Server.CreateObject("ADODB.RecordSet")
conexion.Open "telev","telev2","unodos"
result.Open "select peliculas.titulo from peliculas where id_pelicula=1",conexion,2,3
Do Until result.EOF %>
<table>
<tr>
<td> <%=result.fields("titulo")%> </td>
</tr>
<%result.MoveNext %>
<%Loop %>
<%result.Close
conexion.Close
%>
nota es muy importante que lleve el signo de = antes de result "viste chamin"
<%
Set conexion=Server.CreateObject("ADODB.Connection")
Set result=Server.CreateObject("ADODB.RecordSet")
conexion.Open "telev","telev2","unodos"
result.Open "select peliculas.titulo from peliculas where id_pelicula=1",conexion,2,3
Do Until result.EOF %>
<table>
<tr>
<td> <%=result.fields("titulo")%> </td>
</tr>
<%result.MoveNext %>
<%Loop %>
<%result.Close
conexion.Close
%>