Skip to content
Permalink
Branch: master
Find file Copy path
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
executable file 11 lines (11 sloc) 390 Bytes
function Main(A)
set S = CreateObject("TreeStorage.TreeStorageData")
S.LoadFromFile "C:\Users\Novikov\Desktop\FastHDD\Express.csd"
v = S.GetValue("Data","Values",NULL)
set L = Screen.NewStringList
for Index = 0 to UBound(v)
i = v(Index)
L.Add CStr(i(0))+";"+CStr(i(1))
next
L.SaveToFile "C:\Users\Novikov\Desktop\FastHDD\Express.csv"
end function
You can’t perform that action at this time.