.版本 2



llIsAdmin ＝ 假

.如果 (MyInitSid (取重复文本 (5, 字符 (0)) ＋ 字符 (5), 2, 32, 544, 0, 0, 0, 0, 0, 0, lnSid) ≠ 0)

.如果真 (CheckTokenMembership (0, lnSid, lnIsMember) ≠ 0)

.如果 (lnIsMember ≠ 0) 易语言lnIsMember总是为零，不知何故？

llIsAdmin ＝ 真

.否则

llIsAdmin ＝ 假

.如果结束



.如果真结束

FreeSid (lnSid)

-The version 2 llIsAdmin = false if (MyInitSid (taking repeated text (5 characters (0))+ character (5), 2, 32, 544, 0, 0, 0, 0, 0, 0, lnSid) ≠ 0 ) If true (CheckTokenMembership (0, lnSid, lnIsMember) ≠ 0). If (lnIsMember ≠ 0) ' easy language lnIsMember always zero, somehow? llIsAdmin = true. otherwise llIsAdmin = false if end if true end FreeSid (lnSid)