Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Using ADO with vfpoledb
Message
De
12/08/2004 12:51:17
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
 
 
À
28/07/2004 02:21:46
Maltin Lacsina
Angeles Electric Corporation
Angeles, Philippines
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00927527
Message ID:
00932809
Vues:
26
This message has been marked as the solution to the initial question of the thread.
>Does set deleted off work in creating recordset?

Sure it does. Check series of set commands support by VFPOLEDB driver. Below is a sample asp code :
<%
    cSQLSelect = "select cust_id,company,contact," & _
                 "iif(deleted(),'Deleted',space(len('Deleted'))) as DelStat from customer"

    dbpath = Server.MapPath("data")
    set oConnection = Server.CreateObject( "adodb.connection" ) 
    with oConnection
       .ConnectionString = "Provider=VFPOLEDB.1;data source=" & dbpath & "\testdata.dbc"
       .Open
       .Errors.Clear	
       .Execute( "set deleted off" )
       Set rs = .Execute( cSQLSelect )
    end with
    ' Check results
    Response.Write("<TABLE border='1'><TR><TD>Cust Id</TD><TD>Company</TD><TD>Contact</TD><TD>Status</TD></TR>" )
    while not rs.eof
            Response.Write("<TR>")
            Response.Write("<TD>" & rs.Fields("cust_id").value & "</TD>")
            Response.Write("<TD>" & rs.Fields("company").value & "</TD>")
            Response.Write("<TD>" & rs.Fields("contact").value & "</TD>")
            Response.Write("<TD>" & rs.Fields("DelStat").value & "</TD>")
            Response.Write("</TR>")
            rs.MoveNext
    wend
    Response.Write("</TABLE><BR/>")
	
    oConnection.Close
    set oConnection = nothing
%>
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform