Xref FullPath

[n8wex]

Is it possible to get the Xref's FullPath if unloaded?

[n8wex]

worked it out...



Public Shared Function FullPath(ByVal Name As String) As String
Dim strReturn As String = ""

Using xr As XrefGraphNode = GetXRef(Name)
Using db As Database = Application.DocumentManager.MdiActiveDocument.Database
Using tr As Transaction = db.TransactionManager.StartTransaction
Dim btr As BlockTableRecord = CType(tr.GetObject(xr.BlockTableRecordId, OpenMode.ForRead), BlockTableRecord)
strReturn = btr.PathName.ToString
End Using
End Using
End Using
Return strReturn
End Function