Export emailadresses to textfile

[pbfmp]

I have a file with 600 records apprx. one of the fields is "emailadress". I want to export these into a textfile, type csv and get it without tab and the "" if the field is empty. I also want a , after each adress (to separate them) so I can just paste it into the mailclient. If ist possible can I just get the "found records" on this export. I have tried to do a script for this but I have failed.

Is it possible?

A thousand thank you if someone could help me out

peter

[sbg2]

Enter Find Mode

Set Field [emailaddress; ">"""]

Perform Find[]

Loop

GoTo Record [First]

If[Get(CurrentRecord) < Get(FoundCount)]

--Set Field[g_MyGlobalField; g_MyGlobalField & Quote(emailaddress) & ","]

Else

--Set Field[g_MyGlobalField; g_MyglobalField & Quote(emailaddress)]

-End If

GoTo Record [Next] ~ check the exit after last box

End Loop

Export Field Contents[g_MyGlobalField]