oWord=GETOBJECT(,"Word.Application") FOR ia=1 TO oWord.documents.Count IF LOWER(oWord.documents(ia).name)="web_vfp1.doc" oDOc=oWord.documents(ia) exit ENDIF ENDFOR IF TYPE("oDOc")#"O" or ISNULL(oDoc) oWord=null RETURN ELSE *continue with oDoc ?oDOc.name endif ....>Hello everyone,