>>Hi Larry...
>>
>>Try this:
>>
>>

>>cFormName="frmPosition"   && The Name property of the form
>>lInUse=.F.                && Flag to see if open
>>FOR i = 1 TO _SCREEN.FormCount
>>   IF _SCREEN.Forms(i).Name = cFormName  && Found it
>>      _SCREEN.Forms(i).Show()
>>      lInUse=.T.
>>   ENDIF
>>ENDFOR
>>IF !lInUse
>>   DO FORM frmPosition
>>ENDIF
>>

>
>Hi,
>
> doesnt work they create the form again...
>
>Thanks

Larry, I think John K. may be correct about you not having the form name correct. WEXIST with a correct form name DOES work...