if eval('Thisform.p_ivr.SocketWrench' + transform(i) + '.Connected')
     lcDummy = 'Thisform.p_ivr.SocketWrench' + transform(i) + '.Disconnect'
     & lcDummy
   endif

>Hi Gang!
>
>I have a question in my code below...
>
>I am wanting the loop at the bottom to shut down the SocketWrech's that are connected.... but when I run it, I get a Syntax error... command contains unrecognized phrase/keyword. Any idea what I did wrong? Thanks!
>
>lnLastSocket is global and is equal to 18
>
>

>LOCAL i
>i = 0
>
>IF VARTYPE(Thisform.p_ivr.SocketWrench0) <> 'U'	&& We have an object
>	IF Thisform.p_ivr.SocketWrench0.Listening
>		Thisform.p_ivr.SocketWrench0.Disconnect
>	ENDIF 
>	
>	FOR i = 1 TO lnLastSocket
>		IF Thisform.p_ivr.SocketWrench&i..Connected
>			Thisform.p_ivr.SocketWrench&i..Disconnect
>		ENDIF 
>	ENDFOR 
>ENDIF
>

>
>The error occurs on the "IF Thisform.p_ivr.SocketWrench&i..Connected" line.
>
>Thanks!