Nick Rechten x1alpha76
x1alpha76
/ ReadCSV.vbs
Created
July 2, 2015 09:57
Visual Basic Script function for reading CSV strings
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| 'Does not support multiline | |
| ' | |
| 'Example usage | |
| 'Const ForReading = 1 | |
| 'Set objFSO = CreateObject("Scripting.FileSystemObject") | |
| 'Set objFile = objFSO.OpenTextFile("test.csv", ForReading) | |
| 'Do Until objFile.AtEndOfStream | |
| ' fields = ReadCSV(objFile.ReadLine) | |
| ' WScript.Echo fields(0) | |
| 'Loop |