OpenSTAAD V8i
Retrieves only the path of the current .STD file.
Where:
A string variable that will hold the path name of folder where the currently open .STD file resides. It will not write the name of the .STD file into the variable.
Dim objOpenSTAAD As Object
Dim strFileFolder As String
'Get the application object
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Get the file folder
objOpenSTAAD.GetSTAADFileFolder strFileFolder