Keskustelu: Ohjelmointikysymykset: VB6 ja tietokoneen nimi

Jokkeri [08.04.2008 09:53:28]

Tervehdys!

Miten VB6:lla saisi selville tietokoneen nimen jota käytetään?

Antti Laaksonen [08.04.2008 09:56:45]

WinAPIn funktio GetComputerName antaa ainakin jonkin nimen.

Hycke [08.04.2008 10:08:26]

vaikka näin:

Private Sub Form_Load()
    MsgBox CurrentComputerName
End Sub

Function CurrentComputerName() As String
    '/  CurrentComputerName()
    '/      returns users computername
    '/
    Dim EnvValue  As String
    On Error GoTo Err
    EnvValue = Environ("computername")

    CurrentComputerName = EnvValue
    Exit Function
Err:
    CurrentComputerName = ""
End Function

Tai vieläkin lyhyemmin

MsgBox Environ("computername")

Jokkeri [08.04.2008 15:27:10]

Kiitos, sehän kävi helposti!

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Kirjautuminen