HTA如何獲取當前用戶的用戶名？

我想要得到的用戶名當前用戶，然後在我的應用程序的名稱創建一個鏈接HTA如何獲取當前用戶的用戶名？

鏈接看起來像

http://localhost/?id=username

我試圖

Dim objNetworkSet 
objNetwork = CreateObject("WScript.Network")

但它不支持在HTA應用程序中

來源

2012-05-23 Cocoa Dev

由於它的前綴表示「objNetwork」是一個對象。所以使用「Set」分配給變量。

Dim objNetwork : Set objNetwork = CreateObject("WScript.Network") 
    MsgBox objNetwork.UserName

假設你想在運行時設置/在飛行中的鏈接：

<html> 
<head> 
    <title>SetLink HTA</title> 
    <HTA:APPLICATION 
    APPLICATIONNAME="SetLink HTA" 
    > 
    <SCRIPT Language="VBScript"> 
    Sub SetLink() 
    Dim oWNet : Set oWNet = CreateObject("WScript.Network") 
    MsgBox oWNet.UserName 
    LinkToBeDone.href = "http://gent/~" & oWNet.UserName 
    End Sub 
    </SCRIPT> 
</head> 
    <body onLoad="SetLink"> 
    <a id="LinkToBeDone" href="!somewhere!">To your home at a real computer</a> 
</body> 
</html>

附：看同樣的錯誤here。對於VBScript的這個功能似乎是糟糕的一天。

來源

2012-05-23 17:59:13

如何將其插入鏈接？ –

@Cocoa Dev查看更新後的答案 –

HTA如何獲取當前用戶的用戶名？

回答

相關問題