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 ENDIFThe error occurs on the "IF Thisform.p_ivr.SocketWrench&i..Connected" line.