Returns the directory path of the open project.
UI Command:	None.
Syntax:	obj.GetProjectDirectory()
Parameters:	None.
Return Value:	BSTR directory path
VB Example:	obj.GetProjectDirectory()
IPY Example:	oApp.GetProjectDirectory()