/***	SimpleXML Class extension
	to easily append an XML as a child to an existing node
***/
function simplexml_append(SimpleXMLElement $to, SimpleXMLElement $from) {
	$toDom = dom_import_simplexml($to);
	$fromDom = dom_import_simplexml($from);
	$toDom->appendChild($toDom->ownerDocument->importNode($fromDom, true));
}

class uuid { 
    /** 
     * This class enables you to get real uuids using the OSSP library. 
     * Note you need php-uuid installed. 
     * On my system 1000 UUIDs are created in 0.0064 seconds. 
     * 
     * @author Marius Karthaus 
     * 
     */ 
    
    protected $uuidobject; 
    
    /** 
     * On long running deamons i've seen a lost resource. This checks the resource and creates it if needed. 
     * 
     */ 
    protected function create() { 
        if (! is_resource ( $this->uuidobject )) { 
            uuid_create ( &$this->uuidobject ); 
        } 
    } 
    
    /** 
     * Return a type 1 (MAC address and time based) uuid 
     * 
     * @return String 
     */ 
    public function v1() { 
        $this->create (); 
        uuid_make ( $this->uuidobject, UUID_MAKE_V1 ); 
        uuid_export ( $this->uuidobject, UUID_FMT_STR, &$uuidstring ); 
        return trim ( $uuidstring ); 
    } 
    
    /** 
     * Return a type 4 (random) uuid 
     * 
     * @return String 
     */ 
    public function v4() { 
        $this->create (); 
        uuid_make ( $this->uuidobject, UUID_MAKE_V4 ); 
        uuid_export ( $this->uuidobject, UUID_FMT_STR, &$uuidstring ); 
        return trim ( $uuidstring ); 
    } 
    
    /** 
     * Return a type 5 (SHA-1 hash) uuid 
     * 
     * @return String 
     */ 
    public function v5() { 
        $this->create (); 
        uuid_make ( $this->uuidobject, UUID_MAKE_V5 ); 
        uuid_export ( $this->uuidobject, UUID_FMT_STR, &$uuidstring ); 
        return trim ( $uuidstring ); 
    } 
} 

function create_uuid() {
	return sprintf( '%04x%04x-%04x-%04x-%04x-%04x%04x%04x',
		// 32 bits for "time_low"
		mt_rand( 0, 0xffff ), mt_rand( 0, 0xffff ),
		
		// 16 bits for "time_mid"
		mt_rand( 0, 0xffff ),
		
		// 16 bits for "time_hi_and_version",
		// four most significant bits holds version number 4
		mt_rand( 0, 0x0fff ) | 0x4000,
		
		// 16 bits, 8 bits for "clk_seq_hi_res",
		// 8 bits for "clk_seq_low",
		// two most significant bits holds zero and one for variant DCE1.1
		mt_rand( 0, 0x3fff ) | 0x8000,
		
		// 48 bits for "node"
		mt_rand( 0, 0xffff ), mt_rand( 0, 0xffff ), mt_rand( 0, 0xffff )
	);
}

$xl = new-object -com Excel.Application
$xl.visible = $false
$Workbook = $xl.Workbooks.open("c:\excel.xslx")
$ws = $Workbook.Worksheets.item("sheet 1")
$ws.Activate()

($ws.usedRange).Rows.Count

function getCellValue{
	param([int]$Row
		,[int]$Column
		,[Object]$Sheet)
	
	return $Sheet.Cells.Item($Row,$column).Value()
}

function setCellValue{
	param([int]$Row
		,[int]$Column
		,[Object]$Sheet
		,$Value)
	
	return $Sheet.Cells.Item($Row,$column) = $Value
}

$wb.Close($false) # close source workbook without saving
$xl.Quit()

$scriptStart = (Get-Date)
#
# script executing part
#
$xlProcess = Get-Process -Name "*excel*" |?{	$scriptStart -gt $_.StartTime	}
if($xlProcess){
	$xlProcess |%{  Stop-Process -Id $_.Id -Force   }
}

function Invoke-Query{
	param([string]$Server
		,[string]$Query
		,[string]$Database
		,[int]$Timeout = 20)
	$return = $null
	$conn = New-Object System.Data.SqlClient.SqlConnection
	if (!$conn){
		Throw "SqlConnection could not be created!"
		return
	}
	
	$conn.ConnectionString = "Server = $($server); Database = $($Database); Integrated Security = True"
	$conn.Open()
	if ($conn.State -eq 1){
		$cmd = New-Object System.Data.SqlClient.SqlCommand $Query, $conn
		$cmd.CommandTimeout = $Timeout
		$data = New-Object System.Data.SqlClient.SqlDataAdapter
		$ds = New-Object System.Data.DataSet
		$data.SelectCommand = $cmd
		$data.Fill($ds) | Out-Null
		
		$return = $ds.Tables[0]
		
		$ds.Dispose()
		$data.Dispose()
		$cmd.Dispose()
		$conn.Close()
	}

	return $return
}

$httpCred = New-Object net.NetworkCredential
$httpCred.UserName = "superuser"
$httpCred.Password = "superpass"

$http = New-Object net.WebClient
$http.Credentials = $httpCred

$response = $http.DownloadString("http://secure.domain.tld")