<< Click to Display Table of Contents >> Navigation:  ThinBASIC Modules > OS (Operating System) > OS_GetComputerName

 

Description

 

Returns computer name.

 

Syntax

 

s = OS_GetComputerName

 

Returns

 

String.

 

Remarks

 

Restrictions

 

See also

 

Examples

 

Thanks to Abraxas for the following script example

USES "OS"

 

Dim sMsg As String

 

sMsg += "Computer Name"     & $Tab & OS_GetComputerName & $CRLF

sMsg += "OS System Folder " & $Tab & OS_GetSystemDir    & $CRLF

sMsg += "Temperary Folder " & $Tab & OS_GetTempDir      & $CRLF

sMsg += "Current User Name" & $Tab & OS_GetUserName     & $CRLF

sMsg += "Windows Directory" & $Tab & OS_GetWindowsDir   & $CRLF

sMsg += "IE Version"        & $Tab & OS_IEVersion       & $CRLF

sMsg += "Windows Version"   & $Tab & OS_WinVersionText  & $CRLF

sMSG += "Running"           & $Tab & $Tab

 

' I'm runing 32 bit windows and it returned 0 so i guessed how it worked. 

If OS_IsWow64 = 0 Then

  SMsg += "32 bit Windows" & $CRLF

Else 

  SMsg += "64 bit Windows" & $CRLF

End If

 

MSGBOX 0, sMsg