oNet = CREATEOBJECT("WScript.Network") ? oNet.UserNameNow if the WSH isn't available...
DECLARE INTEGER WNetGetUser IN Win32API; STRING @lpszLocalName, STRING @lpszUserName,; INTEGER @lpcchBuffer LOCAL lcresult, lnpt, lnargs * Call to the API lcresult = SPACE(200) = WNetGetUser(0, @lcresult, LEN(lcresult)) lnpt = AT(CHR(0), lcresult) IF lnpt > 1 lcresult = LEFT(lcresult, lnpt - 1) ELSE lcresult = "" ENDIF