RE: [ActiveDir] OT: Parameters property from WinNT provider

[Michael B. Smith]

Interestingly enough, joe, it was a posting that you made in November of 2002 in microsoft.public.win2000.active_directory, that led me to this:

 

http://msdn.microsoft.com/library/en-us/sdo/sdo/changing_dial_in_settings.asp

 

I fixed a couple of bugs, added a couple more attributes, and voila' -- it does what I need. It is a damned shame it was so hard to find. I've spent way too many hours on this project this week.

 

The IAS, RRAS, and WTS attributes are all stored in that blob. I came across another, similar ActiveX object for dealing with WTS stuff.

 

Thanks!

 

(This isn't formatted the way I would've done so, but I stuck with the formatting of the example:

 

    a = PROPERTY_USER_RADIUS_FRAMED_IP_ADDRESS
    v = u.getproperty (a)
    msg = msg & "Static IP address: "
    If IsEmpty(v) Then
        msg = msg & "<not checked>"
    Else
        e = Right ("00000000" & Hex (v), 8)
        msg = msg & _
            CInt ("&h" & Mid (e, 1, 2)) & "." & _
            CInt ("&h" & Mid (e, 3, 2)) & "." & _
            CInt ("&h" & Mid (e, 5, 2)) & "." & _
            CInt ("&h" & Mid (e, 7, 2)) & " (" & _
            v & " " & typename (v) & ")"
    End If
    msg = msg & vbCrLf

 

    a = PROPERTY_USER_RADIUS_FRAMED_ROUTE
    v = u.getproperty (a)
    msg = msg & "Static Routes: "
    If IsEmpty (v) Then
        msg = msg & "<not checked>"
    Else
        If typename (v) = "Variant()" Then
            For Each e in v
                msg = msg & e & ", "
            Next
            msg = Left (msg, Len (msg) - 2)
        Else
            msg = msg & e
        End If
    End If
       
    wscript.echo msg

 

)

---

From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of joe
Sent: Thursday, October 06, 2005 9:12 PM
To: ActiveDir@mail.activedir.org
Subject: RE: [ActiveDir] OT: Parameters property from WinNT provider

The parameters aka userParameters attribute sucks, I don't think I have seen any docs where anyone has decoded it. If you are just looking to read it, you could pull the value, change it, then pull it again and see what is different. Make sure you understand the label that is used as well as the value's position in relation to the label so you can find it on other machines because the position in the string will not be absolute.

 

 

---

From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Michael B. Smith
Sent: Wednesday, October 05, 2005 9:12 PM
To: ActiveDir@mail.activedir.org
Subject: [ActiveDir] OT: Parameters property from WinNT provider

I need to know how to decode the parameters property on a user object from the WinNT provider. This is not an A/D environment; but I figure that one of you expert scripters must've run into this before.

 

Specifically, I'm trying to retrieve the msRADIUSFramedIPAddress value. In A/D, this is just a normal attribute. In a non-domain environment, it appears to be wrapped in the parameters attribute.

 

(This is the "Assign a Static IP address" field on the Dial-In tab of a user object in Computer Management.)

 

The below is what I'm getting back (the first number is the offset into the string, second number is the decimal value of that byte, third number is the hexadecimal value of the byte, a "-", and finally the character).

 

Thanks for any help you can offer!

 

Michael 

 

<junk deleted>