<     > 

DisableAllDevices

Description

Disable all the devices that are listed in the device manager.

Examples

VBScript Example

Dim oDevice
CreatePrim "Cone", "MeshSurface"
SetValue "PlayControl.Out", 500

' Enable the Device manager
If Not Application.Devices.Enable Then
Application.Devices.Enable = True
End If

' Add the Mouse Driver if it is not there.
set oDevice = Application.Devices.Item("Mouse")
If TypeName (oDevice) = "Nothing" Then
set oDevice = Application.Devices.AddDevice( "Mouse" )
End If

DisableAllDevices
logmessage oDevice & " is active " & oDevice.Enable

See Also

Autodesk Softimage v7.5     <     >