.net - WMI query in VB.NET - access denied -

-

i getting access denied when running below code alternate credentials ('access denied (exception hresult: 0x80070005 (e_accessdenied)).

if run whole program under standard credentials, pass administrator username & password wmi connection options, access denied. if right-click on program , choose "runas" , put in administrator username & password (without passing credentials wmi options) works! gather account has required privileges , required ports open don't believe dcom issue.

i have tried wbemtest program , can connect remote pc entering username , password. can connect no matter options choose impersonation & authentication level. in program, have experimented putting various parameters these options (see commented lines) , have tried .enableprivileges option no combination of these make program work. missing here?

    sub main()     dim myconnectionoptions new system.management.connectionoptions     myconnectionoptions         '.enableprivileges = true         '.impersonation = system.management.impersonationlevel.impersonate         '.authentication = system.management.authenticationlevel.packetprivacy         if textboxusername.text <> ""             .username = textboxusername.text             .password = textboxpassword.text         end if     end     'establish connection     try         dim mymanagementscope system.management.managementscope         mymanagementscope = new system.management.managementscope( _             "\\" & textboxcomputername.text & "\root\cimv2", myconnectionoptions)         'connect wmi namespace         mymanagementscope.connect()         dim myobjectsearcher new managementobjectsearcher( _             mymanagementscope.path.tostring, "select * win32_computersystem")         dim mycollection managementobjectcollection         dim myobject managementobject         'execute query         mycollection = myobjectsearcher.get()         each myobject in mycollection             if myobject.getpropertyvalue("username") nothing                 msgbox("ctrl-alt-del")             else                 msgbox(myobject.getpropertyvalue("username").tostring)             end if         next     catch e exception         msgbox("_connection error" & e.message)     end try end sub

i assume wmi configuration correct in remote pc

in code need pass "mymanagementscope" object , create query object , pass both object searcher.

the below code in code didn't pass credentials ojectsearcher, change below code

    dim myobjectsearcher new managementobjectsearcher( _         mymanagementscope.path.tostring, "select * win32_computersystem")

to

    dim x objectquery     x = new objectquery("select * win32_computersystem")      dim myobjectsearcher new managementobjectsearcher( _         mymanagementscope, x)

Comments

Post a Comment

Popular posts from this blog

Perl - how to grep a block of text from a file -

-
it can in xml or text format. how in general grep block of text in perl? <track type="ws"> <range> <rangestart>0</rangestart> <rangeend>146.912</rangeend> <locationindex>0</locationindex> <propertyindex>0</propertyindex> </range> </track> <track type="ps" id="1"> <range> <rangestart>0</rangestart> <rangeend>146.912</rangeend> <locationindex>1</locationindex> <propertyindex>1</propertyindex> </range> </track> i want grep type="ps" , till </range> . one solution open file, read line line , match block. open(fh, "file.txt"); foreach $line (<fh>) { if ($line =~ m/type="cc"(.*?)<\/range>/) { print $1; } } but there more optimal solution without reading file line l
Read more

delphi - How to remove all the grips on a coolbar if I have several coolbands? -

-
Image
if set mycoolbar.fixedorder true,only grip on first band hidden. well,if use delphi 7 create vcl forms application,then put coolbar on , create 3 coolbans hold other controls,only grip , top coolbands can hidden setting mycoolbar.fixedorder:=true. i've uploaded picture make things clear. you got fixedorder property wrong. fixed property not allow bands rearranged if set true . setting property of coolbar true keep user changing bands order @ runtime, user can still move , resize bands. can give advice can do, actual solution problem, well, have wait answer. my advice use 3 coolbars in row , setting "fixedorder" property true , bandborderstyle bsnone . way grip hidden on of them. about property, it's not bug of ide, actual preference of property.
Read more

javascript - Animating array of divs; only the final element is modified -

-
this baffling me @ moment. i'm experienced programmer looking throw bit of surprise fiancee on countdown page our wedding. desired effect simulated confetti falling behind main page. setup follows: i have array of divs in javascript. each div absolutely positioned on page. have interval set updates every 50 or milliseconds. on each tick, run loop on array of divs, , calculations , update positions. problem problem having, however, though can see divs created, stored array, , modified (in case, each has slight randomized rotation) during initialization phase, once tick update position starts, div stored in whatever last slot of array gets position updated. tried hard-coding each div index testing purposes, strictly last element update position. upon printing current "left" , "top" style values each div before , after calculations shows value has been changed, no visible change noticeable. here's basic code: javascript var container;
Read more