OpenSTAAD V8i

GetShortJobInfo

Retrieves the short job information of the currently open .STD file.

Where:

JobName

A string variable that will hold the Job Name for the current .STD file.

JobClient

A string variable that will hold the Job Client for the current .STD file.

EngName

A string variable that will hold the Engineer’s Name for the current .STD file.

Dim objOpenSTAAD As Object
Dim strJobName as String
Dim strJobClient as String
Dim strEnggName as String
'Get the application object
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Get Job Info
objOpenSTAAD.GetShortJobInfo strJobName, strJobClient, strEngName