[VBS] Leggere tabella da file di testo

[SirKren]

Salve a tutti,

Come da titolo,

Se ho un file.txt costituito da:
- prima riga di commento
- 2 colonne (separate da spazio) di 3 valori

Es:

# val1 - val2
2 4
6 8
5 10

Come faccio in VBS a leggere tali valori e metterli in due array Val1[3], Val2[3] ?

Ho provato con una cosa del genere ma ovviamente non è giusto...

	
	dim objFSO
	dim objFile
	dim strLine
	dim strArr
	dim i
	dim v1(3)
	dim v2(3)
	
	
	file = "C:\file.txt"
	Set objFSO = CreateObject("Scripting.FileSystemObject")
	Set objFile = objFSO.OpenTextFile(file, 1)
	i=0
	
	Do Until objFile.AtEndOfStream
		strLine = objFile.Readline
		objFile.SkipLine
		
		strArr = Split(strLine,",")
		
		v1(i) = strArr(0)
		v2(i) = strArr(1)

		Msgbox(v1(i) & v2(i))
		
		i=i+1
		
	Loop

grazie a tutti!