OpenSTAAD V8i
Retrieves the name of the current .STD file.
Where:
A string variable that will hold the name of the currently open .STD file (without the path name).
A Boolean variable which if true, will write the entire path name of the .STD file in the variable FileName.
Dim objOpenSTAAD As Object
Dim strFileName As String
Dim bIncludePath As Boolean
'Get the application object
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Retrieve the entire path
bIncludePath = true
objOpenSTAAD.GetSTAADFile strFileName, bIncludePath