procedure thisform.refresh cwemployee = allt(thisform.text1.value) && place for employee code cwpicfile = forcepath(cwemployee + ".jpg", "d:\tal\images\") thisform.imgemployee.picture = iif(file(cwpicfile), cwpicfile, "") thisform.imgemployee.visible = file(cwpicfile) endproc>>thank you for reply,
>procedure thisform.refresh >cwemployee = allt(thisform.text1.value) && place for employee code > >cwpicfile = forcepath(cwemployee + ".jpg", "d:\tal\images\") > >thisform.imgemployee.picture = iif(file(cwpicfile), cwpicfile, "") >thisform.imgemployee.visible = file(cwpicfile) >endproc >>