PowerShelled

This blog has moved to http://ThePowerShellGuy.com Greetings /\/\o\/\/ $AtomFeed = ("Atom.xml")
$PreviousItems = (" It's busy at the Monad front "," Monad Remoting "," How MSH Works "," Hosting an MSH runspace from Monad "," MSH get-WmiMethodHelp function Update 3 "," out-dataGrid function for Monad "," Windows "Monad" Shell (MSH) Beta 3.1 "," Windows "Monad" Shell (MSH) Beta 3.1 "," scripting games Last Day MSH answers for event 7 a... "," Scripting Games almost over "," ")

Sunday, March 26, 2006

Some Monad Com hacks

Just some Com hacks in MSH I think are nice :
*edit* I keep on forgetting, you will need this alias, or change the new to new-object,
set-alias new new-object

# Some COM hacks 

# local user management 

MSH>(new -com shell.users).create('foo') 

isLoggedOn               : False 
passwordRequired         : False 
interactiveLogonAllowed  : True 
isProfilePrivate         : 
isPasswordResetAvailable : False 

MSH>(new -com shell.users).item('foo').changePassword('Secret','') 
True 

MSH>(new -com shell.users).item('foo') 

isLoggedOn               : False 
passwordRequired         : True 
interactiveLogonAllowed  : True 
isProfilePrivate         : 
isPasswordResetAvailable : False 

MSH>(new -com shell.users).remove('foo') 
True 

MSH>(new -com shell.users).item('foo') 
Exception calling "item" with "1" argument(s): "The parameter is  
incorrect. (Exception from HRESULT: 0x80070057 (E_INVALIDARG))" 
At line:1 char:28 

# File Dialog 

$c = new -com UserAccounts.CommonDialog 

MSH>$c.ShowOpen() 
True 
MSH>$c 


Filter      : 
FilterIndex : 0 
FileName    : C:\Documents and Settings\mow\My  
Documents\msh_transcript.20051129213303.txt 
Flags       : 0 
Owner       : 
InitialDir  : 

# Make a CAB file 

$m = new -com  makecab.makecab 
$m.CreateCab('c:\mow.cab',$false,$false,!-1) 
$m.addfile('c:\test.txt','test.txt') 
$m.CloseCab()

enjoy,

gr /\/\o\/\/
Tags : Monad msh

posted by /\/\o\/\/

Comments:

Anonymous

Very cool! You could use that to good effect if you had a function which took a filename (and you knew that you'd always have the GUI available):
$Script:CmnDiag = New -Com UserAccounts.CommonDialog

function Get-FileNameViaGUI ($fileName="*.*")
{
$Script:CmnDiag.FileName = $fileName
$done = $false
While (!$done)
{
$done = $Script:CmnDiag.ShowOpen()
}
$script:CmnDiag.FileName
}

function cat1 ($file = $(Get-FileNameViaGUI))
{
get-Content $file
}

=========================
cat1 foo.txt # would display the file
cat1 # would open up the GUI to get the file to then cat

# posted by

Anonymous : 5:17 AM

/\/\o\/\/

> You could use that to good effect if you had a function which took a filename (and you knew that you'd always have the GUI available):

Lol, how did you guess I wanted to use it for that ;-)

Nice Implementation,

the reason this COM way is handy here is that the .NET dialog boxes get no focus. (for forms, you can use this trick :

$Form.Add_Shown({$form.Activate()})

but not for the dialog boxes,

thanks for the script and comments.

gr /\/\o\/\/

# posted by

/\/\o\/\/ : 8:08 PM

/\/\o\/\/ PowerShelled

Sunday, March 26, 2006

Some Monad Com hacks

Archives

Links