VBA Excel open Subversion (SVN) file -
i have excel vba macro opens files in multiple subdirectories 1 @ time, parses them, , extracts information display in excel sheet. saves subdirectory names in array use elsewhere in macro.
currently runs local files, however, run on tortoisesvn repository, rather local files.
here directory navigation code works projectpath = "d:\mydirectory"
' variables gathering folder names dim filesysobj object dim folder object dim subfolders object dim count integer ' initialize count. used index folder names array count = 0 ' create file system object , extract folders within set filesysobj = createobject("scripting.filesystemobject") set folder = filesysobj.getfolder(projectpath) set subfolders = folder.subfolders ' number of programs number of folders in directory numprograms = subfolders.count ' loop through , program names each subfolders in folder.subfolders ' resize folder names array accomodate additional folders redim preserve programsarray(count) ' fill folder names array programsarray(count) = subfolders.name count = count + 1 next subfolders i tried using projectpath = "svn://repository", throws error 76 'path not found' @ call to
set folder = filesysobj.getfolder(projectpath) is there low-overhead way parse data in file on svn without having checkout file?
Comments
Post a Comment