Media

The TOKOPEN_MEDIA object defines the properties of each storage location. The most commonly used property is the MediaName and UNCPathRoot which determines what the media location is known as and where it physically resides.

 TOKOPEN_MEDIA

 MediaName As String
     The name used by TokOpen to describe the location, i.e. 'April 2001'

 MediaNum As Long
     The unique number for the media.

 UncPathRoot as String
     The fully qualified path to the location, i.e. \\Server1\Documents\Aug2001

 MaxFilesPerFolder as Long
     The number of files before sub-folders are created, 0 implies never.

 Removable As Boolean
     True if the media is removable, i.e. Floppy disk or CD/Optical.

 Is_Available As Boolean
     True if the media currently available ( on line / inserted if removable )

 IsNoss As Boolean
     True if the location is managed by NOSS (PaperClip comatibility only)

 Noss_Server as Long
     The NOSS Server number, 1 to 10.

 Noss_Class as Long
     The NOSS Class number, starting from 1, that documents are written to.

See Also:-

 TOKOPEN_MEDIALIST

Example Code :-

Dim i As Long Dim api As TOKOPEN_VIEW For i = 1 To api.Environment.media.Count If api.Environment.media(i).is_available = False Then MsgBox api.Environment.media(i).medianame + " Is not Online" End If Next i