Files Example

Land Auto

previous page next page

Files Example 

Sub Example_Files()
    
    ' This example returns the current setting of PrototypePath
    ' from the preferences object.
    Dim prefs As AeccPreferences
    Set prefs = AeccApplication.Preferences
    
    MsgBox "The current value for PrototypePath is: " & prefs.Files.PrototypePath, _
        vbInformation, "Files Example"
    
End Sub

previous page start next page