Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
VFP, ADO and internet
Message
General information
Forum:
Visual FoxPro
Category:
Internet applications
Miscellaneous
Thread ID:
00330812
Message ID:
00339388
Views:
16
Rick,

Thanks, I study that. At first glance it looks like exactly what I need.


>Look at the distributed examples in Web Connction 3.0. You can use the wwHTTPData class (or a manual implementation thereof), to send and update data on teh server. There's a sample of VFP client application online at:
>
>http://www.west-wind.com/wconnect/enterprise.htm
>
>Look for the 'VFP CLient Demos' and then select the HTTP Query example.
>
>Queries can pull data in pure VFP cursor format, XML, or as ADO recordsets. It works pretty much like SQL Passthrough. It's really straight forward (client code):
>
>
>o=CREATE('wwHTTPData')
>
>o.cServername = 'www.west-wind.com'
>o.cHTTPLink = '/wc.wc?wwHTTPData~Execute'
>
>*** Get this from the user
>o.cUserName = TRIM(THISFORM.txtUserName.value)
>o.cPassWord = TRIM(THISFORM.txtPassword.value)
>
>o.lSecure = THISFORM.chkHTTPS.Value
>
>o.nResultMode = 0    && 0 - Cursor  2 - XML  4 - ADO XML
>IF THISFORM.chkXML.value
>   o.nResultMode = 2  && XML
>ENDIF
>
>o.cSQLCursor = TRIM(THISFORM.txtSQLCursor.Value)
>
>lnSecs = SECONDS()  && Capture timing
>
>*** Run the request!
>o.Execute(THISFORM.edtSQL.Value)
>
>IF o.lError
>   MessageBox(o.cErrorMsg,48,THISFORM.Caption)
>ELSE
>   IF o.nResultMode = 0
>     *** Cursor was created for you
>     SELE (THISFORM.txtSQLCursor.value)
>     BROWSE
>   ELSE
>     *** Just display the XML returned in Notepad
>     ShowText( o.cXMLResult)
>
>     *** COnvert the XML into a cursor
>     oXML = CREATE('wwXML')
>     oXML.XMLToCursor(o.cXMLResult,"TQuery")
>     SELE TQuery
>     BROWSE
>   ENDIF
>ENDIF
>
>
>Of course this doesn't deal with data synchronization issues, just SQL commands over the wire, but you can use this to directly update data on the server by using SQL commands like INSERT and UPDATE from the client side.
>
>
>+++ Rick ---
>
Bud Wheeler
Vision Data Solutions, Inc.
Microsoft Partner

http://www.visionpace.com
Http://www.BudWheeler.com
Previous
Reply
Map
View

Click here to load this message in the networking platform