io ho scritto anche così ma nessun ris....
while (!$rsimg->EOF && (!file_exists($i_srv . "\simg\small\\".trim(substr($rsimg->fields['procod']->value,0,8)).".jpg") ))
{

$worksheet1->write_string($r,1,$rsimg->fields["PROSFM"]->value ,$fItalic);
$worksheet1->write_string($r,2,$rsimg->fields["PROCOD"]->value ,$fItalic);
$worksheet1->write_string($r,3,$rsimg->fields["PROFOR"]->value ,$fItalic);
$worksheet1->write_string($r,4,$rsimg->fields["PRODES"]->value ,$fItalic);
$worksheet1->write_string($r,5,"S",$fItalic);
$worksheet1->write_string($r,6,"1",$fItalic);
$worksheet1->write_string($r,7,"2",$fItalic);
$worksheet1->write_string($r,8,$rsimg->fields["PROFOR"]->value ,$fItalic);
$worksheet1->write_string($r,9,"WEBREF",$fItalic);
$worksheet1->write_string($r,10,$rsimg->fields["CLIRSO"]->value ,$fItalic);
$r=$r+1;
$rsimg->movenext();
}