Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. sponsors. rss.
 From: Raju S
  Where is Raju S?
 Mumbai
 India
 Raju S
 To: Ken Murphy
  Where is Ken Murphy?
 Springhill
 Canada
 Ken Murphy
 Tags
Subject: RE: Sharing out a program between towns
Thread ID: 134225 Message ID: 137921 # Views: 37 # Ratings: 0
Version: Visual FoxPro 6 Category: Install & Config. issues
Date: Tuesday, July 10, 2007 1:06:49 PM         
   


Hi Ken,

Sorry for the delay.
I had tried this and it worked well but that was in Jan 2005. But I never implemented it. Now I don't remember how to register the com component, you may be knowing that.

I have it in 2 parts.
---------------------------------------
1. Create a multi-threaded com server dll.
DEFINE CLASS Executor AS Session OLEPUBLIC
	PROCEDURE SqlCommand( tcCommand as String ) as String
	   local lcReturn
	   lcReturn = ""
	   Close Databases all
	   Set Path To c:\mserver
	   
	   &tcCommand
	   
	   If Empty( Alias() ) or Reccount() = 0
	   Else
SELECT * FROM C:\TEMP1 WHERE RECNO()=1 INTO CURSOR abcd
USE IN TEMP1
	      CursorToXML( Alias(), "lcReturn", 1, 1 + 8, 0, "1" )
USE IN abcd
	   endif
	   Return lcReturn
	ENDPROC
ENDDEFINE


This DLL will be registered on Server.
------------------------------------------------------
2. This code will run at clients machine.
Close Databases all
Clear

Local loServer as MServer
Local lcXml as string, lcFilter as String

	loServer = CreateObject( "mServer.Executor" )
lcFilter = InputBox( "Filter", "Enter the first letter to search", "B" )

lcXml = loServer.SqlCommand( "select * from MYFILE where NAME like '" ;
 + Alltrim( lcFilter ) +"%'" + "into table c:\mserver\temp1")

If Empty( lcXml )
   * Noting to do
Else
**	XMLToCursor( lcXml, "Results" )
	USE C:\MSERVER\TEMP1
	Browse last
endif


-----------------------------------------------------
I am sure this will help. I have not found the original article.







> > Ken,
> >
> > I last tried it in Jan 2005.
> > I have searched my computer, but I have not yet found it. But I am sure I have it on my old hard disk. I also have the code with which I implemented it. I will find it as soon as possible.
> >
> >
> >
>
> If you can find it, I would be most grateful.
>
> Ken
> You shall know the truth - and the truth shall set you free. (John 8:33)



COMPLETE THREAD
Sharing out a program between towns Posted by Elijah Kihuga @ 6/8/2007 9:55:15 AM
RE: Sharing out a program between towns Posted by Eric den Doop @ 6/8/2007 10:16:41 AM
RE: Sharing out a program between towns Posted by Elijah Kihuga @ 6/8/2007 10:57:57 AM
RE: Sharing out a program between towns Posted by Ken Murphy @ 6/8/2007 1:02:24 PM
RE: Sharing out a program between towns Posted by Raju S @ 6/10/2007 12:28:44 PM
RE: Sharing out a program between towns Posted by Ken Murphy @ 6/10/2007 1:16:59 PM
RE: Sharing out a program between towns Posted by Raju S @ 6/11/2007 5:45:24 AM
RE: Sharing out a program between towns Posted by tushar @ 6/11/2007 7:25:52 AM
RE: Sharing out a program between towns Posted by Raju S @ 6/11/2007 7:34:47 AM
RE: Sharing out a program between towns Posted by Eric den Doop @ 6/11/2007 7:38:56 AM
RE: Sharing out a program between towns Posted by Raju S @ 6/11/2007 8:30:10 AM
RE: Sharing out a program between towns Posted by Elijah Kihuga @ 6/12/2007 12:23:20 PM
RE: Sharing out a program between towns Posted by Duffy Weber @ 6/11/2007 2:08:11 AM
RE: Sharing out a program between towns Posted by Ken Murphy @ 6/11/2007 2:43:05 AM
RE: Sharing out a program between towns Posted by Duffy Weber @ 6/11/2007 2:23:25 PM
RE: Sharing out a program between towns Posted by Ken Murphy @ 6/11/2007 3:00:08 PM
RE: Sharing out a program between towns Posted by Duffy Weber @ 6/11/2007 3:08:53 PM
RE: Sharing out a program between towns Posted by Elijah Kihuga @ 6/12/2007 2:25:55 PM
RE: Sharing out a program between towns Posted by Ken Murphy @ 6/12/2007 2:39:09 PM
RE: Sharing out a program between towns Posted by Raju S @ 6/13/2007 8:03:07 PM
RE: Sharing out a program between towns Posted by Ken Murphy @ 6/13/2007 8:05:53 PM
RE: Sharing out a program between towns Posted by Raju S @ 6/13/2007 8:23:43 PM
RE: Sharing out a program between towns Posted by Ken Murphy @ 6/13/2007 8:37:39 PM
RE: Sharing out a program between towns Posted by Raju S @ 7/10/2007 1:06:49 PM
RE: Sharing out a program between towns Posted by mk sharma @ 7/16/2007 12:09:54 PM