Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
VFP COM on ASP
Message
De
09/08/2001 09:32:22
 
 
À
08/08/2001 22:45:48
Victor Lapid
Phil. Long Distance Tel. Co.
Manila, Philippines
Information générale
Forum:
Visual FoxPro
Catégorie:
Applications Internet
Titre:
Divers
Thread ID:
00541653
Message ID:
00541736
Vues:
46
>Hi to All,
>
> Any example or source code that can be used in creating VFP COM (insert,delete,update a VFP table) on ASP? I've seen one example in WestWIND, but I need more resources.
>
> TIA.

Vick,

Make sure you compile your VFP project as a single threaded COM server.

Here is an example from one of my ASP's:

LEvalFromDate = trim(LFromMonth) & '/01/' & trim(LFromYear)
LEvalToDate = trim(LToMonth) & '/01/' & trim(LToYear)

' Getting the path of DmReport.Dbc from the WebServer
LcDbcPath = Server.MapPath('/dmsreport/dmreport.dbc')
LcDbcPath = trim(lcDbcPath)

' Working with COM component
Set oServer1 = Server.CreateObject('ServiceAging.ServiceAgingClass')
Set oCursor1 = oServer1.ServiceAgingFunction(LcDbcPath,LPartnerName,LEvalFromDate,LEvalToDate)

IF oCursor1.Eof then
Response.write('
No records found which match your search criteria
')
lresults = False
Set oServer1 = nothing
Set oCursor1 = nothing
Response.End
End IF

Do While Not oCursor1.Eof
'
(HTML code here for displaying results)
'
oCursor1.MoveNext
Loop

Set oCursor1 = Nothing
Set oServer1 = Nothing
'

Good luck!

-JT
Jeff Trockman, MCP
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform