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

ASP con Visual Fox 6.0

Estas en el tema de ASP con Visual Fox 6.0 en el foro de ASP Clásico en Foros del Web. Amigos quisiera si alguien me ayuda a realizar una conexion ASP con una base de datos en Visual Fox 6.0 Quiero realizar una consulta sobre ...
  #1 (permalink)  
Antiguo 26/08/2003, 14:27
 
Fecha de Ingreso: agosto-2003
Mensajes: 2
Antigüedad: 21 años, 7 meses
Puntos: 0
Exclamación ASP con Visual Fox 6.0

Amigos quisiera si alguien me ayuda a realizar una conexion ASP con una base de datos en Visual Fox 6.0
Quiero realizar una consulta sobre la base de datos, tengo la base y la pagina alojada en brinkster, pero me sale el siguiente mensaje
"The page cannot be displayed"

Esta es mi pagina ASP, no se que tengo mal.

<%@ LANGUAGE="VBSCRIPT"%>
<HTML>
<HEAD>
<TITLE>Chasey Duarte Home Page</TITLE>
</HEAD>
<BODY>
<CENTER>
<H1>Consulta sobre tablas</H1>
</CENTER>
<% ccedula=request.form("coda")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER=Microsoft Visual Foxpro Driver;SourceType=DBC;DBQ=" & Server.MapPath("\Base.dbc"))
Set cmdTemp=Server.CreateObject("ADODB.Command")
Set rs=Server.CreateObject("ADODB.Recordset")
SQLText="Select coda,detalle from Base!Articul where coda like '%"&ccedula&"%'"
cmdTemp.CommandText=SQLText
cmdTemp.CommandType=1
Set cmdTemp.ActiveConnection=Conn
rs.CacheSize=10
rs.Open cmdTemp,,adopenstatic
%>
<%if rs.eof then%>
<h3 align="center">
<font color="#FF0000">No hay datos que coincidan con su consulta</font></h3>
<%else%>
<table border="0" width="100%">
<tr>
<th width="30%" valign="middle" align="center" bgcolor="#008080">
<font color="#000000">Código</font></th>
<th width="70%" valign="middle" align="center" bgcolor="#008080">
<font color="#000000">Detalle</font></th>
</tr>
<%do while not rs.eof%>
<tr>
<td width="33%" valign="middle" align="center" bgcolor="#FFFFFF">
<font color="#000000"><%=rs("coda")%></font></td>
<td width="33%" valign="middle" align="center" bgcolor="#FFFFFF">
<font color="#000000"><%=rs("detalle")%></font></td>
</tr>
<%rs.movenext
loop
rs.close
end if%>
</table>
<p> </p>
<p align="center"><a href="F.html">Otra vez</a></p>
</body>
</html>
  #2 (permalink)  
Antiguo 26/08/2003, 14:43
Avatar de bakanzipp  
Fecha de Ingreso: noviembre-2001
Ubicación: santiago de shilli
Mensajes: 2.554
Antigüedad: 23 años, 5 meses
Puntos: 0
es problema de conexion o de configuracion de tu server?...

en tu browser anda a :

tools-->Internet options-->advanced

y deschequea
show friendly http error messages...

y ve si arroja el error
  #3 (permalink)  
Antiguo 26/08/2003, 15:42
 
Fecha de Ingreso: agosto-2003
Mensajes: 2
Antigüedad: 21 años, 7 meses
Puntos: 0
Exclamación

es problema de conexion no que esta mal en el codigo, ya hice lo que me dijiste y sigue saliendo lo mismo.
Gracias por tu ayuda.....
  #4 (permalink)  
Antiguo 26/08/2003, 15:54
Avatar de bakanzipp  
Fecha de Ingreso: noviembre-2001
Ubicación: santiago de shilli
Mensajes: 2.554
Antigüedad: 23 años, 5 meses
Puntos: 0
nunca he usado fox pro...prueba tocando el codigo para ver si ese es el problema

[php]
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER=Microsoft Visual Foxpro Driver;SourceType=DBC;DBQ=" & Server.MapPath("\Base.dbc"))
Set cmdTemp=Server.CreateObject("ADODB.Command")
Set rs=Server.CreateObject("ADODB.Recordset")
SQLText="Select coda,detalle from Base!Articul";
set rs = Conn.execute(SQLText);
if not rs.eof then
...
else
response.write "no hay datos"
end if
[\php]

asi se llama tu tabla?
Base!Articul
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 15:07.