This property of the Project object tells you whether the project is under source code control, and if so, who the provider is.
Usage |
cProvider = prjProject.SCCProvider |
Example |
#DEFINE HKEY_LOCAL_MACHINE 0x80000002
lcProvider = oProject.SCCProvider
IF NOT EMPTY(lcProvider)
oRegistry = NewObject("Registry", ;
HOME() + "FFC\Registry.vcx")
cValue = space(255)
oRegistry.GetRegKey("SCCServerName ", @cValue, ;
lcProvider, HKEY_LOCAL_MACHINE)
? "The project's database is controlled by " + cValue
ENDIF |
See Also |
Project, Registration Database |