Anyone know a way to make this function create coma delimited text?

script:
========================================================
Set txtfile = filesys.CreateTextFile("d:\home\webzone\Orders\Orders" & Year(Now) & Month(Now) & Day(Now) & Hour(Now) & Minute(Now) & Second(Now) & ".txt",True,FALSE)
=======================================================