I was wondering how to launch Visual SourceSafe within a VB application? I tried the following code:

Dim VSSApp As Object
Set VSSApp = GetObject("", "SSEXP.application")

SSEXP.exe is the SourceSafe executable, however I am not sure what to call in order to launch it. I included the reference to SourceSafeTypeLib, however this dll does not give me the capability to create the object. I get the error ActiveX component cannot create object. Any help is appreciated.

Thanks,
Sheena :)

Sheena,
Here find the code to launch the SourceSafe application.
Cheers,
-Ned

    Dim ReturnValue As Integer
    'Open the SourceSafe application from the specified path
    If Len(Dir("C:\Microsoft Visual Studio\VSS\win32\SSEXP.EXE")) > 0 Then
        ReturnValue = Shell("C:\Microsoft Visual Studio\VSS\win32\SSEXP.EXE", 1)
        AppActivate ReturnValue ' Activate the window
    End If


-Ned

Thanks Ned,

But unfortunately, I didn't specify that other people will be using this code (it's an add-in) and I want to launch visual sourcesafe without the pathname being hardcoded. The shell function works great when launching it from my computer but I now need to find a function that will search the registry for the path (since it varies on each computer) and then use that pathname variable. Something like this Shell(pathname).

Any ideas?
Thanks

Hi Sheena,

You can get the installation path in the key "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\VisualStudi o\6.0\Setup\Microsoft Visual SourceSafe\ProductDir"

Stéphane Lajoie