What is the value of ThisForm.My_fields(1)?

Are you aware that AFIELDS() creates a two dimensional array? Perhaps you need to use ThisForm.my_fields(1,1).

What is the value of the ControlSource property for the combobox?

What is the value of ThisForm.Combo1.Value after the code runs?

What is the BoundColumn property setting for the combobox?

>hi,
>thank you for reply and new code,
>but still i see field (numaric type) at combo1
>
>
>>How about something like this;
>>
>>

>>WITH ThisForm
>>  .text1.Value = GETFILE('dbf')
>>  .select_file = .Text1.Value
>>*  IF NOT EMPTY(.select_file) && This line does not guarantee that the file exists
>>  IF FILE(.select_file) && This checks for the file to exist
>>      USE (.select_file)
>>      AFIELDS( .my_fields, JUSTSTEM(.select_file) )
>>      WITH .Combo1
>>        .RowSourceType = 5
>>        .RowSource = [ThisForm.my_fields]
>>        .Value     = ThisForm.my_fields[1]
>>        .Requery() && Needed to reload the combo's list with the values in the array
>>        .Interactivechange() && Don't know why this line is in your code
>>      ENDWITH
>>* Th next line is redundant as this value is already set in this control
>>*      .text1.value = (ThisForm.select_file)
>>       .text1.Visible  = .t.
>>  ENDIF
>>ENDWITH
>>