FolderItem.MacVRefNum

From Xojo Documentation

Property (As Integer )


aFolderItem.MacVRefNum = newIntegerValue
or
IntegerValue = aFolderItem.MacVRefNum

Supported for all project types and targets.

Macintosh volume reference number (Macintosh only).

Example

Dim f As New FolderItem
f = GetOpenFolderItem("text/plain")

If f.MacVRefNum <> 0 Then
MsgBox(Str(f.MacVRefNum))
Else
MsgBox("The MacVefNo is zero.")
End If