CreateTextFile - skapa som ascii / text

[Petter.L]

Hej!

 

Håller på att skapa en dynamisk maillista mha en sk .procmailrc-fil. Denna fil är tydligen väldigt känslig beträffande hur den skapas / laddas upp på servern. FTP:ar jag upp filen i något annat format än ascii / text så fungerar den helt enkelt inte.

 

Den fungerar inte heller när jag skapar den mha CreateTextFile trots att filen ser helt korrekt ut.

 

Frågan är alltså hur man skapar en renodlad textfil med CreateTextFile.

 

Min nuvarande kod:

 

Dim C, O
Set C = CreateObject("Scripting.FileSystemObject")
Set O = C.CreateTextFile("/home/xxx/.procmailrc", True, True)

O.WriteLine "#LOGFILE=$HOME/.procmail.log"
O.WriteLine "VERBOSE='NO'"
O.WriteLine "LOGABSTRACT='all'"

O.WriteLine ":0"
O.WriteLine "*^TO_alla@xxx.se"
O.WriteLine "! x1@x.se, x2@x.se"

O.WriteLine "# Placeras langst ner - alla mail gar aven hit"
O.WriteLine "#:0"
O.WriteLine "#! x@x.se"
O.Close