Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » FoxPro/Visual FoxPro » Conectar Tabla VFP con ASP

FoxPro/Visual FoxPro - Conectar Tabla VFP con ASP

Volver
Nuevo Tema
<<>>
 
Vista:

Conectar Tabla VFP con ASP

Publicado por Cesar Fuenzalida (52 intervenciones) el 09/12/2003 15:29:01
Hola amigos, me gustaría si me pueden ayudar con esto...

Tengo un Sistema en VFP, pero mi jefe quiere que se pueda trabajar en Internet (yo pense en ASP), pero el detalle es que NO SE conectar la tabla con asp.

Si me pudieran ayudar con un pequeño ejemplo, se los agradecere.

Gracias
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:Conectar Tabla VFP con ASP

Publicado por wences (57 intervenciones) el 30/12/2003 22:35:21
asi conectas la tabla:

oConn.Open "Provider=vfpoledb;" & _
"Data Source=C:\vfp7\Samples\Data\myVFPDB.dbc;" & _
"Mode=ReadWrite|Share Deny None;" & _
"Collating Sequence=MACHINE;" & _
"Password=''"

a partir de ese punto todo es puro asp , te recomiendo que busques informacion en internet de asp ..

<%
DataPath = "YOUR DIRECTORY PATH\SAMPLEDBC.DBC"

SET oConn = CREATEOBJECT("ADODB.Connection")
SET oRS = CREATEOBJECT("ADODB.RECORDSET")
oConn.OPEN("PROVIDER=VFPOLEDB.1;Data Source=" & DataPath)
oConn.Execute("Insert into Table1 (FName, Lname) VALUES ('Test','Guy')")

oRS.OPEN "SELECT * FROM TABLE1", oConn
%>

<HTML>
<BODY>
<P>
<TABLE BORDER=1>
<TR>
<% For i = 0 to oRS.Fields.Count - 1 %>
<TD><B><% = UCASE(oRS(i).Name) %></B></TD>
<% Next %>
</TR>
<% Do While Not oRS.EOF %>
<TR>
<% For i = 0 to oRS.Fields.Count - 1 %>
<TD VALIGN=TOP><% = oRS(i) %></TD>
<% Next %>
</TR>
<%
oRS.MoveNext
Loop

oRS.Close
oConn.Close
SET oRS = nothing
SET oConn = NOTHING
%>
</TABLE>
</BODY>
</HTML>

Espero te sirva...
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