Retrieve System Info

Posted: 2003-06-01
By: ArchiveBot
Viewed: 68

Filed Under:

VB6 Code Cache

No attachments for this post

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


Comments on this post

No comments have been added for this post.

You must be logged in to make a comment.