<div>
 &nbsp; &nbsp;On Local Error Resume Next<br />
&nbsp; &nbsp; <br />
&nbsp; &nbsp; Dim net As WshNetwork<br />
&nbsp; &nbsp; Dim username As String<br />
&nbsp; &nbsp; Set net = New WshNetwork<br />
<br />
&nbsp; &nbsp; username = net.UserDomain &amp;&nbsp;&quot;\&quot; &amp;&nbsp;net.username<br />
&nbsp; &nbsp; username = LCase(username)<br />
&nbsp; &nbsp; <br />
&nbsp; &nbsp; If Err.Number &lt;&gt;&nbsp;0 Then<br />
&nbsp; &nbsp; &nbsp; &nbsp; username = &quot;&quot;<br />
&nbsp; &nbsp; Else<br />
&nbsp; &nbsp; &nbsp; &nbsp; MsgBox (username)<br />
&nbsp; &nbsp; End If
</div>


   On Local Error Resume Next
   
    Dim net As WshNetwork
    Dim username As String
    Set net = New WshNetwork

    username = net.UserDomain & "\" & net.username
    username = LCase(username)
   
    If Err.Number <> 0 Then
        username = ""
    Else
        MsgBox (username)
    End If

<div>
<div class="content wysiwyg-content">
I'd like to create a C++ .DLL that I can call from other environments (Powerbuilder namingly). &nbsp;I need to get the user's domain and network username (not the windows username if it happens to be different than the network authentications in the case of VPN's for instance. &nbsp;I've figured out a way to get what I want in VB with a reference to the Windows Host Model Scripting Object but I'm having a damned hard time using the ActiveX DLL in the traditional way windows DLL's are used (I know there's a way around it by writing a wrapper for the compiler but I haven't had time to do that).<br />
<br />
Now, does anybody have a better way to accomplish this or can they show me an example of how to reference the windows scripting object from a C++ DLL. &nbsp;Thanks!
</div>
</div>


I'd like to create a C++ .DLL that I can call from other environments (Powerbuilder namingly).  I need to get the user's domain and network username (not the windows username if it happens to be different than the network authentications in the case of VPN's for instance.  I've figured out a way to get what I want in VB with a reference to the Windows Host Model Scripting Object but I'm having a damned hard time using the ActiveX DLL in the traditional way windows DLL's are used (I know there's a way around it by writing a wrapper for the compiler but I haven't had time to do that).

Now, does anybody have a better way to accomplish this or can they show me an example of how to reference the windows scripting object from a C++ DLL.  Thanks!

Network Username/Password Windows Host Model Scripting Object

Kernel and system programming is the process of creating the software necessary for a computer or device to function and operate other programs. Some operating systems (such as Microsoft Windows) are proprietary, but others, such as the various Linux distributions, are open source.