Maybe something like the following will work:
assuming nt4 style computer name in format of domain\hostname is in variable
set o = createobject("NameTranslate")
o.init 3, ""
on error resume next
o.set 3, computername
on error goto 0
and then if it works you should have the dn to the computer and you should
be able bind to it.
> I want to be able to bind to the AD computer object for the computer I am
> logged onto using VBScript in order to modify properties (I've dealt with
> security permissions on those properties). I've been able to do this with
> ADO query to the GC with %computername% - is there an easier way?