version-control - ms vss からバージョン番号を持つファイルのリストを取得する簡単な方法はありますか?

Question

多くの場合、Microsoft Visual Source Safe のバージョン番号を含むファイルのマニフェストを作成する必要があります。プロジェクト内のバージョン番号を持つファイルのリストを取得する方法はありますか?

Answer 1

自動化を使用できます。VSS 6.0 (およびそれ以前) には、使用できる ActiveX dll が付属しています。プロジェクトで Microsoft SourceSafe 6.0 Type Library を参照すると、(以下の証明されていない、テストされていない VB コード) のようなものが機能するはずです。

自動化は非常に強力です。私はこれを使用して、Vss を Ide に統合したことを証明しました。これは、ビジネス タイプの人々が Xml メッセージを照会するために XQuery スニペットを記述した場所で作成したものです。

Private Sub GetAllVersionNumbers()
    Dim db As New VSSDatabase
    Call db.Open("\\codestore\myProject\srcsafe.ini", "Myuser", "password")

    Call GetItemVersion(db.CurrentProject)
End Sub

Private Sub GetItemVersion(ByVal root As VSSItem)
    Dim item As VSSItem

    For Each item In root
        If item.Type = VSSITEM_FILE Then
            Call Output(item.Name, item.VersionNumber)
        Else ' item.Type =VSSITEM_FDOLDER
            'recurse
            Call GetItemVersion(item)
        End If
    Next
End Sub