如何取得電腦名稱

出自VFP Wiki

(修訂版本間差異)
跳轉到: 導航, 搜尋
 
第1行: 第1行:
[[category:系統管理]]
[[category:系統管理]]
 +
==如何取得電腦名稱==
===參考資料===
===參考資料===
http://fox.hanyu.com.tw/View.aspx?fbId=1&Id=28221
http://fox.hanyu.com.tw/View.aspx?fbId=1&Id=28221

在2006年10月8日 (日) 08:26的最新修訂版本


目錄

如何取得電腦名稱

參考資料

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