>*Form.init >use (your_table) >this.AddProperty("my_fields(1)",.f.) >this.addproperty("select_file", ALIAS()) >=AFIELDS(ThisForm.my_fields,JUSTSTEM(ThisForm.select_file)) >>
>>IF NOT EMPTY(ThisForm.select_file) >> USE (ThisForm.select_file) >> AFIELDS(ThisForm.my_fields,JUSTSTEM(ThisForm.select_file))&& error at this line >> ThisForm.combo1.RowSourceType = 5 >> ThisForm.combo1.RowSource = [ThisForm.my_fields] >> ThisForm.combo1.Value = ThisForm.my_fields[1] >> ThisForm.Combo1.Interactivechange() >> ThisForm.text3.value = JUSTSTEM(ThisForm.select_file) >>ENDIF >>>>thanks,