Thanks for repsonse.

If I use you code I still get only one line and nothing after selection it? Any suggestions?

>Hi...
>
>

>**************************************
>=SQLEXEC(thisform.pconx,"select * from MyTable","cMyCursor")
>
>thisform.AddProperty('myArray('+STR(RECCOUNT())+',1)') && Dimension for my array
>
>COPY TO ARRAY thisform.myArray FIELDS "name"        && Copy my sql Results to the array
>
>thisform.combo1.RowSourcetype= 5                                 && Type 5, Array
>thisform.combo1.RowSource="thisform.myArray"	
>************************************************************
>

>I hope this help...