utf-8 was causing strange characters in CMS, should make a param

This commit is contained in:
Trowbridge 2020-01-13 17:26:32 -05:00
parent 35f5b04a1d
commit 79e3c24a37

View File

@ -1668,7 +1668,8 @@ Function FILEp_CreateCSV(ByRef path As String, ByRef recs() As String) As Boolea
tsf.Type = 2 tsf.Type = 2
tsf.Charset = "utf-8" 'tsf.Charset = "utf-8"
tsf.Charset = "Windows-1252"
tsf.Open tsf.Open
'Set ts = f.OpenTextFile(path, ForReading, False, TristateUseDefault) 'Set ts = f.OpenTextFile(path, ForReading, False, TristateUseDefault)