Hi, all,

I'm trying to pass one array by reference, from one form to another form, but it only pass the first column,

Form1
DIMENSION laFiles[nCopyNo]
lnFiles=ADIR(laFiles,oApp.cAppPath+"\Tmp\"+lcNameFile+"*.*")
DO FORM gc_sendmail WITH lcNameFileToPrint, .txtCodigo.Value, 1,laFiles

Form2
INIT:
LPARAMETERS tcNomeFicheiro,tcCodTer,tnTipoTer,taFiles
ThisForm.aFiles=taFiles

Thank's

João Batista