windows vista - Vbscript detect whether UAC-elevated -

-

how can vbscript detect whether or not running in uac elevated context?

i have no problem detecting user, , seeing if user within administrators group. still doesn't answer question of whether process has elevated privs or not, when running under vista or windows 2008. please note, need detect status; not attempt elevate or (err ..) de-elevate.

the method settled on depends on fact vista , windows 2008 have whoami.exe utility, , detects integrity level of user owns process. couple of screenshots here:

whoami, normal , elevated, on vista http://lh3.ggpht.com/_svunm47buj0/sq6ql4injpi/aaaaaaaaaea/iwbcsrazqrg/whoami%20-%20adminuser%20-%20groups%20-%20cropped.png?imgmax=512

you can see when cmd running elevated, whoami /groups reports "high" mandatory integrity level , different sid when running non-elevated. in pic, top session normal, 1 underneath running elevated after uac prompt.

knowing that, here code used. checks os version, , if vista or server 2008, calls checkforelevation runs whoami.exe /groups, , looks string s-1-16-12288 in output. in example echo status; in real script branch different actions based on result.

sub getosversion dim strcomputer, owmiservice, colosinfo, oosproperty, strcaption, strosfamily strcomputer = "." set owmiservice = getobject("winmgmts:\\" & strcomputer & "\root\cimv2") set colosinfo = owmiservice.execquery("select * win32_operatingsystem") 'i hate looping through 1 property. dunno way! each oosproperty in colosinfo    strcaption = oosproperty.caption  next if instr(1,strcaption, "vista", vbtextcompare) strosfamily = "vista" if instr(1,strcaption, "2008", vbtextcompare) strosfamily = "2008" if instr(1,strcaption, "xp", vbtextcompare) strosfamily = "xp" if instr(1,strcaption, "2003", vbtextcompare) strosfamily = "2003" if instr(1,strcaption, "2000", vbtextcompare) strosfamily = "2000" if strosfamily = ""      wscript.echo "no known os found. (script can detect windows 2000, 2003, xp, vista, 2008.)"  else      wscript.echo "os family = " & strosfamily end if select case strosfamily 'if vista/2008 call checkforelevation case "vista"     checkforelevation case "2008"     checkforelevation case else     exit sub end select end sub  sub checkforelevation 'test whether user has elevated token  dim oshell, oexecwhoami, owhoamioutput, strwhoamioutput, boolhaselevatedtoken set oshell = createobject("wscript.shell") set oexecwhoami = oshell.exec("whoami /groups") set owhoamioutput = oexecwhoami.stdout strwhoamioutput = owhoamioutput.readall if instr(1, strwhoamioutput, "s-1-16-12288", vbtextcompare) boolhaselevatedtoken = true if boolhaselevatedtoken     wscript.echo "current script running elevated privs." else     wscript.echo "current script not running elevated privs." end if end sub

Comments

Post a Comment

Popular posts from this blog

c++ - How do I get a multi line tooltip in MFC -

-
right now, have tool tip pops when hover on edit box. problem tool tip contains multiple error messages , in 1 long line. need have each error message on own line. error messages contained in cstring new line seperating them. my existing code below. bool ontooltiptext(uint, nmhdr* pnmhdr, lresult* presult) { assert(pnmhdr->code == ttn_needtexta || pnmhdr->code == ttn_needtextw); // need handle both ansi , unicode versions of message tooltiptexta* pttta = (tooltiptexta*)pnmhdr; tooltiptextw* ptttw = (tooltiptextw*)pnmhdr; // tchar szfulltext[256]; cstring strtiptext=_t(""); uint nid = pnmhdr->idfrom; if (pnmhdr->code == ttn_needtexta && (pttta->uflags & ttf_idishwnd) || pnmhdr->code == ttn_needtextw && (ptttw->uflags & ttf_idishwnd)) { // idfrom hwnd of tool nid = ::getdlgctrlid((hwnd)nid); } //m_errprojaccel[ch] contains 1 or more error messages each...
Read more

asp.net - In javascript how to find the height and width -

-
i having .aspx , masterpage page. in masterpage loading aspx page . in aspx page design using generating table structure using code-behind server in javascript how find height , width . regards, kumar if you're looking table height , width, should it var tbl = document.getelementbyid('tbldemo'); alert(tbl.offsetwidth + '\n' + tbl.offsetheight);
Read more

c# - DataTable to EnumerableRowCollection -

-
i have datatable according client requirement can contain invalid date "00/00/1999",null,empty string.(typed datset) when collect them enumerables wish convert of invalid forms empty string. (i.e) enumerablerowcollection<datarow> query = order in _table.asenumerable() select new { orderdate= string.isnullorempty(convert.tostring(order.field<datetime>("orderdate")) || (how check date invalid date) ? string.empty : order.field<datetime>("orderdate") } how check whether date valid date or not? datetime.tryparse...like given current code: datetime date; enumerablerowcollection<datarow> query = order in _table.asenumerable() select new { orderdate= string.isnullorempty(convert.tostring(order.field<datetime>("orderdate")) || !datetime.tryparse(convert.tostring(order.field<datetime...
Read more