API 함수로 사용자 컴퓨터 이름을 가져올수 있답니다. 정보
API 함수로 사용자 컴퓨터 이름을 가져올수 있답니다.
본문
이것도 퍼온겁니다.
일전에 자유게시판에서 zzzz님이 언급했던 컴퓨터 이름을 이용해서 필요로 하는 제어가 가능할지
찾아다니다 부수적으로 찾아낸 겁니다.
문제는 이 소스를 저는 어떻게 활용하는지 모른다는 것이죠.
ㅠㅠ.........
이런걸 누가 필요로 할지는 모르지만 일단 올려둡니다.
Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" _
(ByVal lpBuffer As String, nSize As Long) As Long
Function ReturnComputerName() As String
Dim sComputerName As String
Dim iResult As Long
sComputerName = Space(256)
iResult = GetComputerName(sComputerName, 256)
If iResult <> 0 Then
ReturnComputerName = Left(sComputerName, 256)
Else
ReturnComputerName = "모름"
End If
End Function
원글의 출처
http://www.j-walk.com/ss/excel/tips/tip94.htm
원글에는 컴퓨터 사용자의 이름도 가져오도록 코딩되어 있다고 합니다.
일전에 자유게시판에서 zzzz님이 언급했던 컴퓨터 이름을 이용해서 필요로 하는 제어가 가능할지
찾아다니다 부수적으로 찾아낸 겁니다.
문제는 이 소스를 저는 어떻게 활용하는지 모른다는 것이죠.
ㅠㅠ.........
이런걸 누가 필요로 할지는 모르지만 일단 올려둡니다.
Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" _
(ByVal lpBuffer As String, nSize As Long) As Long
Function ReturnComputerName() As String
Dim sComputerName As String
Dim iResult As Long
sComputerName = Space(256)
iResult = GetComputerName(sComputerName, 256)
If iResult <> 0 Then
ReturnComputerName = Left(sComputerName, 256)
Else
ReturnComputerName = "모름"
End If
End Function
원글의 출처
http://www.j-walk.com/ss/excel/tips/tip94.htm
원글에는 컴퓨터 사용자의 이름도 가져오도록 코딩되어 있다고 합니다.
추천
0
0
댓글 4개
우와 아이젠님 정말 감사드립니다...
그렇지만 사용법을 모릅니당 ㅠㅠ
그래도 수고하셨습니당 ㅠㅠ
그렇지만 사용법을 모릅니당 ㅠㅠ
그래도 수고하셨습니당 ㅠㅠ
우와 무시로님 저도 감사합니다.
무플로 방치되지 않게 해 주셔서........
php 소스가 아니라서 죄송하게 생각하며 사용법을 몰라서 더 죄송합니다.
^^
무플로 방치되지 않게 해 주셔서........
php 소스가 아니라서 죄송하게 생각하며 사용법을 몰라서 더 죄송합니다.
^^
비주얼 베이직이군요 ^^
제가 예전에 프로젝트 할때 시스템 정보 빼오냐고 고생 좀 했죠 ^^
제가 예전에 프로젝트 할때 시스템 정보 빼오냐고 고생 좀 했죠 ^^
PHP에서 WIN API 를 DLL이나 다른 형태로 실행해서 리턴값을 받을수 있나???
저걸돌리려면 클라이언트에서 돌려야할거같은데.. 음..해킹? ^^;
웹을 잘몰라서링 ;;;
저걸돌리려면 클라이언트에서 돌려야할거같은데.. 음..해킹? ^^;
웹을 잘몰라서링 ;;;
