Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Keywords: OLE MIMSXServer
gobjMIMS = ObjectOpen("MIMSX.MIMSXServer") gobjMIMS.initialise gobjMIMS.connect() apiv = gobjMIMS.MIMSAPIVersion apih = gobjMIMS.MIMSAPIHandle rc = gobjMIMS.Blocks rc1 = rc.New("Employees") rc2 = rc1.Requests rc2.New("Request") rc5 = rc1.Requests("Request") rc6 = rc5.Instances rc6.New("Instance") rc8 = rc5.Instances("Instance") rc5.AddFieldNameValue("_Service", "EMPLOYEE.Retrieve") rc5.AddFieldNameValue("_ReplyList", "Employee,FirstName,LastName,Paygroup,Position,EmailAddress") rc8.AddFieldNameValue("SearchStatus", "A") Reply = rc1.Send ;need to substitute variables for the (1)'s below: rp1 = Reply.Requests(1) rp2 = rp1.Instances(1) rp3 = rp2.Fields(1) rp4 = rp3.Value Message("Employee", StrTrim(rp4)) exit
Article ID: W15234
File Created: 2002:09:05:13:50:46
Last Updated: 2002:09:05:13:50:46