ArcPad Scripting Object Model
User Property
See Also  Example  Send comments on this topic.
Application Object : User Property

Glossary Item Box

Description

Returns or sets the current user.

Property type

Read-write property

Syntax

object.User = [ value ]

Return Type

String

Remarks

On Windows CE / Pocket PC, the default user is the Name specified in the Owner Information dialog box. device's owner. On desktop Windows, the default user is the username of the person currently logged in.

Example

Displays information about the system in a message box.
Example (VBScript)Copy Code
Sub DisplaySysInfo
  Dim strCSDVer, lngBldNum, lngMinorVer, lngMajorVer
  Dim lngPID, intPArch, intPLevel, lngPRev, lngPType
  Dim strPersonalFolder, strTempPath
  strCSDVer = Application.System.Properties("CSDVersion")
  lngBldNum = Application.System.Properties("BuildNumber")
  lngMinorVer = Application.System.Properties("MinorVersion")
  lngMajorVer = Application.System.Properties("MajorVersion")
  lngPID = Application.System.Properties("PlatformID")
  intPArch = Application.System.Properties("ProcessorArchitecture")
  intPLevel = Application.System.Properties("ProcessorLevel")
  lngPRev = Application.System.Properties("ProcessorRevision")
  lngPType = Application.System.Properties("ProcessorType")
  strPersonalFolder = Application.System.Properties("PersonalFolder")
  strTempPath = Application.System.Properties("TempPath")
  MsgBox "CSDVersion: " & strCSDVer & VBCr &_
         "BuildNumber: " & lngBldNum & VBCr &_
         "MinorVersion: " & lngMinorVer & VBCr &_
         "MajorVersion: " & lngMajorVer & VBCr &_
         "PlatformID: " & lngPID & VBCr &_
         "ProcessorArchitecture: " & intPArch & VBCr &_
         "ProcessorLevel: " & intPLevel & VBCr &_
         "ProcessorRevision: " & lngPRev & VBCr &_
         "ProcessorType: " & lngPType & VBCr &_
         "PersonalFolder: " & strPersonalFolder & VBCr &_
         "TempPath: " & strTempPath _
         ,vbInformation,"SYSTEM INFO"
End Sub

See Also

© 2012 All Rights Reserved.