Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.

Would you please elaborate on your answer, if possible? I have access to the VaultSDK.chm file too.

This is what I'm using to get the current lifecyclestate of a file.

AddReference "Autodesk.Connectivity.WebServices.dll"
Imports AWS = Autodesk.Connectivity.WebServices
AddReference "Autodesk.DataManagement.Client.Framework.Vault.dll"
Imports VDF = Autodesk.DataManagement.Client.Framework
AddReference "Connectivity.Application.VaultBase.dll"
Imports VB = Connectivity.Application.VaultBase


Sub Main()
	Dim paras As Parameters
	Dim para As Parameter
	Dim propsets As PropertySets
	Dim doc As Document = ThisDoc.Document

		Dim mVltCon As VDF.Vault.Currency.Connections.Connection
		mVltCon = VB.ConnectionManager.Instance.Connection
		If  mVltCon Is Nothing Then
		     MsgBox("Not logged in to Vault" )
		     Exit Sub
		End If
		
		MsgBox(get_vaultfilestatus(doc.FullFileName, mVltCon))
			
	
End Sub

Function get_vaultfilestatus(filepath As String, vaultconnection As VDF.Vault.Currency.Connections.Connection) As String
	
	
	filepath = filepath.Replace("C:\xx\", "$/")
	'flip the slashes
	filepath = filepath.Replace("\", "/")
	
	Dim VaultPaths() As String = New String() {filepath}
	 
	Dim wsFiels() As AWS.File = vaultconnection.WebServiceManager.DocumentService.FindLatestFilesByPaths(VaultPaths)
	 
	Dim mFileIt As VDF.Vault.Currency.Entities.FileIteration = New VDF.Vault.Currency.Entities.FileIteration(conn,wsFiels(0))
	Dim lifeCycleInfo As VDF.Vault.Currency.Entities.FileLifecycleInfo = mFileIt.LifecycleInfo
	
	Return lifeCycleInfo.StateName
	'MessageBox.Show(lifeCycleInfo.StateName)
End Function