如何取得電腦名稱

出自VFP Wiki

（修訂版本間差異）
跳轉到: 導航, 搜尋
小
小
第1行： 第1行：
-
[[category:VFPFAQ]]
+
[[category:系統管理]]
===參考資料===
===參考資料===

在2006年9月29日 (五) 14:10所做的修訂版本


目錄

參考資料

http://fox.hanyu.com.tw/View.aspx?fbId=1&Id=28221

solution

之一

machine_user=SYS(0)
xmd=AT("#",machine_user)
thismachine=AllTrim(SubStr(machine_user,1,xmd - 1))
LogonUser=AllTrim(SubStr(machine_user,xmd+1))

之二

wshNetwork = CreateObject("WScript.Network")
? wshNetwork.ComputerName
取自"http://wiki.sunyear.com.tw/index.php?title=%E5%A6%82%E4%BD%95%E5%8F%96%E5%BE%97%E9%9B%BB%E8%85%A6%E5%90%8D%E7%A8%B1"