掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
自端末のコンピューター名とIPを取得するには？ (ID：84897)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
IPアドレスはご紹介頂いたHPを参考に、コンピュータ名は 以下のコードで取得できました。 Maxさんありがとうございました。 Public Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long Dim lSize As Long Dim sRet As String * 256 Dim sValue As String lSize = 255 lRet = GetComputerName(sRet, lSize) sValue = Left$(sRet, InStr(sRet, vbNullChar) - 1) lblHost.Caption = sValue End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.