I would like to use VFP as a frontend to reach in and pull data from our company's ADP server. I know the addressing ( IP and port ) used by the ADP client software and have administrative access on the User level ( I'm the sys admin), but am unsure where to begin. I do see a Reflection for Unix and Digital OLE control listed... is this related The goal is to be able to automate the execution of ADP english statement scripts to extract data from the server to populate databases inside of my VFP app. Any help getting pointed in the right direction to establish the VFP-ADP communications link would be great. Thanks!

Questions regarding connecting to an ADP server
Paul Chis
pattormey
this._webBrowser4.navigate2("www.google.com")
IbanezRox
I prefer using winhttp over IE and it seems like your project would be a candidate for this approach.
local loHttp as winhttp.winhttprequest.5.1
loHttp = createobject("WinHttp.WinHttpRequest.5.1")
* Timeouts in milliseconds: nResolveTimeout, nConnectTimeout, nSendTimeout, nReceiveTimeout
loHttp.SetTimeouts( 2*1000, 5*1000, 5*1000, 60*1000 )
loHttp.Open( "get", "http://www.google.com", .f. ) && method, url, asynchronous
loHttp.Send()
If loHttp.status == 200
"Successfull"
"Response was: " + loHttp.ResponseText
endif
This is just scratching the surface. You will have to determine the login method of the server you are trying to get data from - if there is no login, you are lucky =). There are different ways to login - using form variables or more integrated ways that are more low level. You also need to determine how to send your information to the website - either as urlencoded, mime or url query string (you can look these up). WinHttp will always return the server response in the ResponseText property so reading the data later is pretty easy.
I also recommend you use regular expressions in parsing the responses - I've learned to love them as I do lots of html parsing:
loRegEx = CreateObject("VBScript.RegExp")
loRegEx.pattern = "<.* >" && finds all HTML tags - see http://www.dotnetcoders.com/web/Learning/Regex/syntax.aspx for good reference
loRegEx.ignoreCase = .t.
loRegEx.global = .t.
loMatches = loRegEx.execute( loHttp.ResponseText )
for i = 1 to loMatches.count
loMatch[i, 1]
endfor
HTH..
Rayven01
Don, your brother's work looks really good! I'm pleased to report I've made some additional headway, mostly by researching the Fox tools a bit more. Via the Data Explorer I was able to locate the ADP SQL server. My issue now is that my local ADP login credentials ( I have full access to everything possible on the user-level) are insufficent for me to be able to get a table listing from the server. ( AAARRGGG ! ) I'm not really surprised, as I can understand why they would not want a User in there poking around. so, I have called ADP support and will see if they grant me access or can help me out.
Now, here's the curious thing: We have a collection of third party vendors that routinely dial in to the system and extract data. Where they can go is limited by their local user profile, but they can do what I can't: Get in past the front door. I really only want access to things I already have, and somehow they manage to do it. I am debating calling them up for a chat to see if they'd let me see what they do to authenticate themselves on the way in... If anyone has ideas, please share :) Thanks again
klotz
TheNewcomer
sdanil
I bet you are struggling. It can be tough to get info out of these systems.
We do the same thing for Reynolds and Reynolds. We use their query designer and write extensive code for it. We design dealership reporting tools also, plus Leasing and Financing front ends for R&R. This is my brothers specialty. Take a look at what he does at www.1on1co.com
Good luck, let me know how you make out. I don't have many dealers around us that use ADP, but they have a pretty big install base, and we have been asked to do something similar for these dealers also.
Ravi Thapliyal
LPARAMETERS
url, flags, targetframename, postdata, headersCould someone give me an example Maybe pointing to google Thanks!
minidea