Retrieve System Info

Retrieves System Information in a single line of code

Original Author: Bharat Nagarajan

Assumptions

To retrieve system info we use all kinda code but there is a function in VB 6.0 called Environ() which takes in a single parameter which makes our lives bit easy. Like if you want to know the users Temporary Directory or System Directory via VB 6.0

Returns

System Information

Code

Private Sub cmdSysInfo_Click()
'Will popup a message box displaying your computer name
MsgBox(environ("computername"))
'Like that we can get it for the variables like
    'ALLUSERSPROFILE()
    'APPDATA()
    'CommonProgramFiles()
    'COMPUTERNAME()
    'ComSpec()
    'HOMEDRIVE()
    'HOMEPATH()
    'LOGONSERVER()
    'NUMBER_OF_PROCESSORS()
    'OS()
    'Os2LibPath()
    'Path()
    'PATHEXT()
    'PROCESSOR_ARCHITECTURE()
    'PROCESSOR_IDENTIFIER()
    'PROCESSOR_LEVEL()
    'PROCESSOR_REVISION()
    'ProgramFiles()
    'SystemDrive()
    'SystemRoot()
    'TEMP()
    'TMP()
    'USERDOMAIN()
    'USERNAME()
    'USERPROFILE()
    'windir()
End Sub


About this post

Posted: 2003-06-01
By: ArchiveBot
Viewed: 90 times

Categories

Visual Basic 6

Attachments

No attachments for this post

Comments

No comments have been added for this post.

You must be logged in to make a comment.