Jenna

Got a new Hartshorn last week, Jenna Hartshorn.  She was born at 12:53 PM on 6/21/2011 and was 19-3/4 inches long and weighed 7 lbs.  Congrats to Jon and Patty (and Phillip for being a great big brother!).

Learning Powershell

I'm studying Powershell and have written a couple of small but useful scripts in it. Just for fun I decided to try my hand at something a little different when I saw an article in the TechNet Library about how to list Fonts on a computer. This script is adapted from that one and is actually kinda useful. It displays ONLY the TrueType Fonts on a PC, as did the original. However, where the original only displayed the Font Name, this one also displays a little more text and also the name of the logged on user. Also, the original script, if re-run, appended the new list onto the old one (appended the content of $objFonts to $strHTML); I am clearing $strHTML to that only fresh results appear.

Clear-Variable strHTML

[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Drawing")
$UserName = (Get-Item 'HKLM:\Software\Microsoft\Windows NT\CurrentVersion\Winlogon').GetValue('DefaultUserName')
$objFonts = New-Object System.Drawing.Text.InstalledFontCollection
$colFonts = $objFonts.Families
$objIE = New-Object -com "InternetExplorer.Application"
$objIE.Navigate("about:blank")
$objIE.ToolBar = 0
$objIE.StatusBar = 0
$objIE.Visible = $True
$objDoc = $objIE.Document.DocumentElement.LastChild
foreach ($objFont in $colFonts)
{
$strHTML = $strHTML + "<font size='5' face='" + $objFont.Name + "'>" + 'This ' + $objFont.Name + ' font is on the computer of '+ $UserName + "</font><br>"
}
$objDoc.InnerHTML = $strHTML

Your Love Is Extravagant

Your love is extravagant;
Your friendship, it is intimate.
I feel I'm moving to the rhythm of Your grace,
Your fragrance is intoxicating in our secret place.
Your love is extravagant.

Spread wide in the arms of Christ is the love that covers sin
No greater love have I ever known You considered me a friend
Capture my heart again

Spread wide in the arms of Christ is the love that covers sin.
No greater love have I ever known; You considered me a friend.

Capture my heart again
Your love is extravagant
Your friendship, it is intimate .

By Darrell Evans

Recorded by Casting Crowns