Procedura: creare un progetto di test in Visual Basic

Nelle sezioni riportate di seguito viene illustrato come creare ed eseguire l'esempio di codice Visual Basic per l'automazione di Visual SourceSafe mediante l'utilizzo dell'interfaccia IVSSDatabase, che rappresenta un database di Visual SourceSafe.

Creare un progetto di test in Visual Basic

Per creare un progetto di test in Visual Basic, effettuare le seguenti operazioni:

  1. Creare un nuovo database di Visual SourceSafe in c:\VSSTestDB.

    Per ulteriori informazioni su come creare un nuovo database, vedere Procedura: eseguire l'accesso a Visual SourceSafe.

  2. Aprire Visual Studio e nella pagina iniziale scegliere Nuovo progetto.

  3. Selezionare Progetti di Visual Basic dalla visualizzazione struttura nella parte sinistra della schermata.

  4. Selezionare Applicazione console come modello di progetto.

  5. Impostare il nome dell'applicazione su IVSSTestVB, quindi scegliere OK per creare il progetto.

  6. Evidenziare il file Module1.vb nella finestra Esplora soluzioni e rinominarlo come PName.vb. Eliminare completamente il codice inserito da Visual Studio in questo file.

  7. Nelle proprietà del progetto IVSSTestVB impostare Oggetto di avvio su Sub Main.

  8. Per utilizzare l'assembly di interoperabilità primario per il componente COM SSAPI.DLL, selezionare References nel progetto IVSSTest, quindi fare clic con il pulsante destro del mouse e scegliere Aggiungi riferimento. Assicurarsi che la scheda .NET sia selezionata, quindi utilizzare il pulsante Seleziona per selezionare l'assembly di interoperabilità primario Microsoft.VisualStudio.SourceSafe.Interop.dll di IVVS. Il componente verrà aggiunto all'elenco Componenti selezionati.

  9. Scegliere OK.

Aggiungere il codice di esempio

Nell'esempio riportato di seguito viene illustrato come utilizzare la proprietà Name dell'interfaccia IVSSItem.

  • Incollare il codice riportato di seguito in PName.vb.

    Imports System
    Imports Microsoft.VisualStudio.SourceSafe.Interop
    
    Imports System
    Imports Microsoft.VisualStudio.SourceSafe.Interop
    
    Module IVSSTest
    
        Public Sub Main()
    
            ' Create a VSSDatabase object.
            Dim vssDatabase As New VSSDatabase
    
            ' Open a VSS database using network name for automatic user login.
            vssDatabase.Open("C:\VSSTestDB\srcsafe.ini", Environment.UserName, "")
    
            ' vssFolder represents a SourceSafe project "TestFolder".
            Dim vssFolder As IVSSItem = vssDatabase.VSSItem("$/TestFolder", False)
    
            Console.WriteLine("'{0}' folder name is '{1}'", vssFolder.Spec, vssFolder.Name)
    
        End Sub
    
    End Module
    

Eseguire il test dell'applicazione

Per eseguire il test dell'applicazione, effettuare le seguenti operazioni:

  • Premere CTRL+F5 per generare ed eseguire l'applicazione.

    Output dell'applicazione: '$/TestFolder' folder name is 'TestFolder'.

Vedere anche

Mostra: