binnum

Changing Home Folders with vbs logging old path abnd new one to file

binnum — Fri, 26 Mar 2010 13:51:00 GMT

Const ForAppending=8
Set objFSO=CreateObject("Scripting.FileSystemObject")
Set objTextFile=objFSO.OpenTextFile _
(".\HomeFolderChange.html", ForAppending, True)
call WriteHTML("<html><head><title>Home Catalog Changes</title></head><body><table border=solid><tr><th>Username</th><th>Current Home catalog</th><th>New Home Catalog</th></tr>")

Set objDomain = GetObject("WinNT://domain.com")
objDomain.Filter = Array("user")
For Each objUser In objDomain
call WriteHTML("<tr><td>" & objUser.Name & "</td>")
if (objUser.HomeDirectory <> "") then
call WriteHTML("<td>" & objUser.HomeDirectory & "</td>")
NewHomePath="\\Fileserver\Share\" & objUser.Name
call WriteHTML("<td>" & NewHomePath & "</td></tr>")
   objUser.Put "homeDirectory", "\\Fileserver\Share\" + un
   objUser.Put "homeDrive", "H:"
   objUser.SetInfo
else
call WriteHTML("<td> Home Directory Not Set</td>")
call WriteHTML("<td>New Home Directory Will not be set</td></tr>")
end if
Next

sub WriteHTML(line)
objTextFile.WriteLine(line)
end sub

call WriteHTML("</table></body></html>")
objTextFile.Close

Active Directory Certificate Services Event ID 100, cannot start Certificate Services

binnum — Fri, 26 Mar 2010 08:48:00 GMT

If you get the error: The revocation function was unable to check revocation because the revocation server was offline. 0x80092013 (-2146885613) eiht the event ID 100 run this command to be able to start it up again

certutil –setreg ca\CRLFlags +CRLF_REVCHECK_IGNORE_OFFLINE

Protect OU's from accidental Deletion using Powershell

binnum — Fri, 26 Feb 2010 13:18:00 GMT

After migrating from eg. AD 2003 R2 to 2008 R2 you may want to use the feature to protect all OU's from accidental deletion.

You probably don't want to do it the manual way, right click - checkbox - ok for every OU. Instead use Powershell to do it.

Start Active Directory Module for Windows Powershell (under Administrative tools)

Then run this single line (piping the result from Get-ADO.... to Set-ADO....)

Get-ADOrganizationalUnit -filter * | Set-ADOrganizationalUnit -ProtectedFromAccidentalDeletion $true

Found it on this great blog:

System manager for Exchange 2003 on Windows 7

binnum — Tue, 02 Feb 2010 12:19:00 GMT

Have gotten some questions of how to get the Exchange 2003 tools working on Windows 7, mainly the Exchange tabs of ADUC. Some have tried modifying the ESM for Vista http://www.microsoft.com/downloads/details.aspx?familyid=3403d74e-8942-421b-8738-b3664559e46f&displaylang=en and then installing it on Windows 7 RC, with mixed result.

What have worked best for me is to install XP-mode http://www.microsoft.com/windows/virtual-pc/download.aspx, then install adminpak.msi http://www.microsoft.com/downloads/details.aspx?FamilyID=c16ae515-c8f4-47ef-a1e4-a8dcbacff8e3&displaylang=en, and then the exchange management tools from exchange 2003 CD/DVD.

Donate for haiti

binnum — Tue, 02 Feb 2010 12:17:00 GMT

Great initiative, please donate:

http://www.nullsession.com/2010/01/21/it-pro-challenge-for-haiti/

God Mode...if not seen yet

binnum — Mon, 11 Jan 2010 14:22:00 GMT

Create a new folder, name it: GodMode.{ED7BA470-8E54-465E-825C-99712043E01C}

Works on Windows 7 / Server 2008 R2

Changing the DNS server IP Adress settings on AD computers with DNS server adresses specified on each computer

binnum — Fri, 23 Oct 2009 08:47:00 GMT

If you replace your old DNS servers with new ones (if you upgrade to Server 2008 R2 perhaps) and have a bunch of computers/servers that don't use DHCP, where DNS servers are specified locally on each computer, this script could be useful.

What it does:

Retrieves all computers-names from the specified OU
Loops through the names and for each name...

Retrieves the current DNS Server IP adress settings for all adapters on the computer and writes them to a file named: "DNSsettingsBefore.txt"
Changes the DNS Server IP Adresses to the ones specified in the script
Retrieves the current DNS Server IP adress settings for all adapters on the computer and writes them to a file named: "DNSsettingsAfter.txt"

Use this script at your own risk, please test it in a lab environment before moving to production

Hyper-v gadget

binnum — Thu, 24 Sep 2009 14:19:00 GMT

Not news, but if you have missed this one, try it, I'm loving it:

http://mindre.net/post/Hyper-V-Monitor-Gadget-for-Windows-Sidebar.aspx

Get rid of the quick launch bar in Sharepoint 2003

binnum — Thu, 24 Sep 2009 14:10:00 GMT

Old post, but useful when you want to get rid of it

http://mindsharpblogs.com/todd/archive/2005/10/25/801.aspx

Extend the trial period

binnum — Thu, 24 Sep 2009 14:06:00 GMT

To extend the period for testing etc. great !

http://www.microsoft.com/downloads/details.aspx?FamilyID=ba571339-5436-4cf5-9c37-6ed7dab6f781&displaylang=en

How to manually rearm the 10 day activation grace period
When the initial 10-day activation period nears its end, you can run the Slmgr.vbs script to reset it back to 10 days. To do this, follow these steps:

1. Click Start, and then click Command Prompt.

2. Type slmgr.vbs -dli, and then press ENTER to check the current status of your activation period.

3. To reset the activation period, type slmgr.vbs –rearm, and then press ENTER.

4. Restart the computer.

This resets the activation period to 10 days, and can be used up to five times. After this you will need to either activate or reinstall the evaluation.

Scripts for useraccounts

binnum — Thu, 24 Sep 2009 12:37:00 GMT

Some scripts for user account management (tested in AD 2003 / Exchange 2003 environment):

Create user, random password, generate username...
List all users who have their mail forwarded

Scripts for Groups

binnum — Thu, 24 Sep 2009 11:53:00 GMT

Some scripts for groups - simple really but sometimes useful:

Add users to a groups
List all memebrs of a group
List all groups in the domain and all the users in each group

Some useful Server 2008 Core Commands

binnum — Wed, 23 Sep 2009 07:41:00 GMT

// Show ip4 interface config
netsh interface ipv4 show config

// Set static IP-adress & Properties
netsh interface ipv4 set address name =<interface name> source static address=<ip-adress> mask=<subnet mask> gateway=<gateway adress>

// Add DNS Server
netsh interface ipv4 add dnsserver name=<interface name> address=<dns-server-ip> index=1/2 (For 1st/2nd DNS)

// Rename server
netdom renamecomputer <old-server-name> /NewName:<new-server-name>

// Join server to domain
netdom join <server-name> /domain:domain.local /userd:* /passwordd:*

//
c:\Windows\System32\cscript scregedit.wsf /AR 0

// Activate Windows
c:\Windows\system32\cscript slmgr.vbs -ato

// Install prodkey
c:\Windows\system32\cscript slmgr.vbs -ipk

// UnInstall prodkey
c:\Windows\system32\cscript slmgr.vbs -upk

// Enable Remote Desktop in Windows Firewall
netsh advfirewall Firewall set rule group="Remote Administration" new enable=yes

// Activate Automatic Updates
cscript \windows\system32\scregedit.wsf /au 4
net stop wuauserv
net start wuauserv
wuauclt /detectnow

// Change Display settings
Control desk.cpl

// Set language, keyboard etc.
Control intl.cpl

// Change System Properties
Control sysdm.cpl - View or set system properties.

// Set date & Time
Control timedate.cpl

// Enable Windows Remoteshell
WinRM quickconfig

// Apply security update/fix
wusa.exe patchname.msu /quiet

// List installed/not installed server roles
OCList.exe

// Add or remove server roles / features
OCSetup.exe

// List a lot of commands you can run to configure OS
cscript C:\Widnows\System32\Scregedit.wsf /cli

// Lsita system info
SystemInfo

// Handle eventlog
wevtutil.exe

// List installed updates
Wmic qfe list