[VBS] Saber si eres administrador

[Eleкtro]

Gracias por la solucion en VB, pero al final he decidido hacerlo en C++

Si para ti no supone un problema realizar la comprobación de si el usuaro actual es Administrador en el lenguaje que sea, entonces yo te recomiendo VB.NET/CSharp, no necesitas manejar la WinAPI como estás intentando en VB6 y C++ (que también podrías hacerlo de esa manera), en .NET se puede lograr con un código reálmente simple y efectivo:

Código (vbnet) [Seleccionar] Expandir

   ' Current User Is Admin?
   ' ( By Elektro )
   '
   ''' <summary>
   ''' Indicates whether the current logged user is an Administrator.
   ''' </summary>
   ''' <returns><c>true</c> if the current logged user is an Administrator, <c>false</c> otherwise.</returns>
   Public Function CurrentUserIsAdmin() As Boolean

       Dim Identity As Security.Principal.WindowsIdentity =
           Security.Principal.WindowsIdentity.GetCurrent

       Return New Security.Principal.WindowsPrincipal(Identity).
                  IsInRole(Security.Principal.WindowsBuiltInRole.Administrator)

   End Function

Saludos