PowerShell example to edit multiple files. This specific example remove the first 15 chars from every XML file in a directory.
get-childitem D:TEMPMessages *.xml |
% {
[string]$sFileContent = cat $_.fullname
$sFileContent = $sFileContent.substring(15,$sFileContent.length-15) | Out-File -Filepath $_.fullname
echo $_.fullname
}
Specific PowerShell script to shutdown a BizTalk receive location when a disk is more then 80% full. This application uses WMI to request disk info and shutdown the the receive location.
function fGetDiskFillPerc([string]$vComputer, [string]$vDiskID) {
$vCommandLine1 = "Get-WMIObject -ComputerName '" + $vComputer + "' Win32_LogicalDisk -filter `"DeviceID = '" + $vDiskID + "'`""
$vResult1 = Invoke-Expression $vCommandLine1
foreach ( $vDisk in $vResult1 ) {
if ($vDisk.DriveType -eq 3) {
[decimal]$dDiskFill = $vDisk.Size - $vDisk.FreeSpace
return $dDiskFill / $vDisk.Size * 100
}
}
}
[decimal]$dDiskFillPercResult = fGetDiskFillPerc "." "D:"
if ( $dDiskFillPercResult -gt 80 ) {
$oRecLoc1 = get-wmiobject MSBTS_ReceiveLocation -namespace 'rootMicrosoftBizTalkServer' -filter "Name='ReceivePortName'"
[void]$oRecLoc1.Disable()
}
Script to return database file usage (GB) from a database.
USE [DATABASE]
GO
SELECT DBFiles.fileid as FileID,
DBFiles.filename as FileName,
DBFiles.name as Name,
CONVERT(decimal(18,3),ROUND(((CAST(FILEPROPERTY(DBFiles.Name, 'SpaceUsed') AS decimal) * 8) /1024 /1024), 3)) AS SpaceUsedGB,
CONVERT(decimal(18,3),ROUND(((CAST(DBFiles.size AS decimal) * 8) /1024 /1024), 3)) AS FileSizeGB
FROM dbo.sysfiles DBFiles
GO
Visual Basic script to convert HTML to CSV or TEXT using the Excel.Application object.
'****************************************************************************************
'bestandsnaam: ConvertTable2X.vbs
'geschreven_door: Tim van Kooten Niekerk
'versie: 17:38 15-4-2010
'Converteer html tabellen naar CSV of TEXT m.b.v. het Excel object
'****************************************************************************************
' Global variable and const declarations
option explicit
'on error resume next
dim oEXC, oArg
const xlCSV=6
const xlTXT=21
' Global objectdeclarations
set oArg = WScript.Arguments
set oEXC = CreateObject("Excel.Application")
' Functie inlezen argumenten van de commandline (0-?)
function fReadArgument(vArgNumber)
On Error Resume Next
fReadArgument = oArg(vArgNumber)
end function
' Convert2X function...
function fTable2X(sHTMLFile, sCSVFile, sFileType)
if (sHTMLFile ‹› "") and (sCSVFile ‹› "") then
dim oWB
set oWB = oEXC.Workbooks.Open (sHTMLFile)
'oEXC.Visible = True
oEXC.Application.DisplayAlerts = False
oEXC.ActiveWorkbook.SaveAs sCSVFile, sFileType
oEXC.ActiveWorkbook.Close False
oEXC.Application.DisplayAlerts = True
' Opschonen
Set oWB = Nothing
end if
end function
' Start programma...
if fReadArgument("0") ‹› "" and fReadArgument("1") ‹› "" and fReadArgument("2") ‹› "" then
fTable2X fReadArgument("0"), fReadArgument("1"), fReadArgument("2")
else
MsgBox ("Een of meerdere argumenten ontbreken..." & vbCrLf & vbCrLf & "Gebruik: convertTable2X " & vbCrLf & "(filetypenum: 6=CSV, 21=TXT)")
end if
' Opschonen
set oArg = Nothing
set oEXC = Nothing
Simple script using the cluster command to return a cluster group to a prefered node.
# ********************************************************************
# Scriptnaam: AUTOFAILBACK.PS1
# Geschreven_door: Tim van Kooten Niekerk
# Versie: 20100412
# Info: Failback to preferred node (TST en ACC omgeving)
# ********************************************************************
# Constanten en andere string waarden...
[string]$sClusterGroupCmd = "cluster group"
[string]$sOutputLOGFile = "AutoFailBack.log"
[string]$sDateTime = Get-Date -f o
$sDateTime + ";START;>>> Start controle en AutoFail-Back procedure..." | Out-File -Filepath $sOutputLOGFile
function fAutoFailBack([string]$sClusterGroup1, [string]$sPreferredNodeCG1) {
[string]$sDateTime = Get-Date -f o
[string]$sClusterGroup1Clean = $sClusterGroup1.Replace("", "")
$vResult1 = Invoke-Expression $sClusterGroupCmd
$vResult2 = $vResult1 | select-string -Pattern $sClusterGroup1 | select-string -Pattern "Online" | select-string -Pattern $($sPreferredNodeCG1)
if ($vResult2.LineNumber -gt 0) {
$vResultFIN = $sDateTime + ";OK;" + $vResult2.Line
} else {
[string]$sClusterGroupCmdFO = $sClusterGroupCmd + " `"" + $($sClusterGroup1Clean) + "`" `/moveto:" + $($sPreferredNodeCG1)
$vResultB1 = Invoke-Expression $sClusterGroupCmdFO
$vResultB2 = $vResultB1 | select-string -Pattern $sClusterGroup1 | select-string -Pattern "Online" | select-string -Pattern $($sPreferredNodeCG1)
if ($vResultB2.LineNumber -gt 0) {
$vResultFIN = $sDateTime + ";FO-OK;" + $vResultB2.Line
} else {
$vResultC1 = Invoke-Expression $sClusterGroupCmd
$vResultC2 = $vResultC1 | select-string -Pattern $sClusterGroup1
$vResultFIN = $sDateTime + ";FO-FAIL;" + $vResultC2.Line
}
}
# Schrijf resultaat weg naar Logbestand
$vResultFIN | Out-File -Filepath $sOutputLOGFile -Append
}
fAutoFailBack "CLUSTERGROUPNAME" "NODENAME"
fAutoFailBack "CLUSTERGROUPNAME2" "NODENAME"
Met onderstaande T-SQL kun je de vulling in procent van het transaction log bestand van een specifieke database opvragen en monitoren. Dit is alleen handig in specifieke situaties. Bij een correct database onderhoudsplan zal dit niet nodig zijn.
CREATE TABLE #tTLSpace
(
DBName sysname,
TLSize decimal(18,5),
TLUsed decimal(18,5),
status INT
)
GO
INSERT INTO #tTLSpace
exec ('DBCC SQLPERF(logspace)')
GO
DECLARE @dTLUsed decimal
SELECT @dTLUsed = TLUsed from #tTLSpace WHERE DBName = 'DATABASE'
IF ( @dTLUsed > 90)
BEGIN
PRINT @dTLUsed
PRINT 'TransactionLog bestand 90 procent vol...'
END
GO
DROP TABLE #tTLSpace
GO
Script to check for databases not backupped in the last two days
SELECT sys.databases.name FROM sys.databases WHERE sys.databases.name not in (SELECT DISTINCT sys.databases.name from sys.databases INNER JOIN msdb..backupset ON sys.databases.name = msdb..backupset.database_name WHERE (msdb..backupset.type = 'D' AND backup_start_date > (GetDate() -2))) AND sys.databases.state = 0 AND sys.databases.name ‹› 'tempdb'
Text edit
a[text toevoegen na] i[text toevoegen voor] o[text onder toevoegen] O[text boven toevoegen] R[text overschrijven]
Text delete
d[getal+richting verwijderen] d$[verwijder text tot einde regel] dd[verwijder hele regel] x[verwijder huidig character] X[verwijder vorig character] J[koppel de huidige en de volgende regel aan elkaar]
Copy / Paste
y[getal+richting naar buffer kopieren] yw[woord naar buffer kopieren] p[plaats buffer na] P[plaats buffer voor]
Other
u[ongedaan maken] ~[hoofdletters/kleine letters]
File management
:wq[bestand opslaan en afsluiten :w[bestand opslaan] :q[afsluiten] :q![geforceerd afsluiten zonder opslaan]
Onderstaand een een eenvoudig PowerShell script om m.b.v. het PING commandp te controleren of een host nog online. De resultaten worden samen met een datumcode weggeschreven naar een logbestand.
# ********************************************************************
# Scriptnaam: PINGPROBE.PS1
# Geschreven_door: Tim van Kooten Niekerk
# Versie: 200910211650
# Info: Script stuurt een ping naar een gespecificeerd IP-adress en
# Info: schrijft resultaat weg in een gespecificeerd LOG-bestand.
# ********************************************************************
# Constanten en andere string waarden...
[string]$sIPAddress1 = "[IP-ADRESS-OR-HOSTNAME]"
[string]$vOutputTXTFile = "C:PingLog.txt"
[string]$sCommandLine1 = "ping " + $sIPAddress1 + " -n 1 | select-string -Pattern `"Reply`""
[string]$sDateTime = Get-Date -f o
$vResult1 = Invoke-Expression $sCommandLine1
if ($vResult1.LineNumber -gt 0) {
[bool]$bIsPingable = $True
[string]$sComment1 = $vResult1.line
} else {
[bool]$bIsPingable = $False
[string]$sComment1 = "No Reply..."
}
# Stel samen en voer resultaat uit naar bestand...
$sDateTime + ";" + $bIsPingable + ";" + $sComment1 | Out-File -Append -Filepath $vOutputTXTFile
Article is written in the Dutch language…
Onderstaande PowerShell script zoekt ip-adressen bij hostnamen uit een CSV-bestand en schrijft deze waarden weg in een text-bestand. De eerste regel van het CSV-bestand moet de kolomnamen bevatten. Het script kijkt naar de kolom met de naam “Hostname”.
# *****************************************************************************
# Scriptnaam: NSLOOKUP2.PS1
# Geschreven_door: Tim van Kooten Niekerk
# Versie: 2009.10.16.01
# Info: Dit script zoekt IP-adressen bij hostnamen vanuit een CSV-bestand.
# Info: De resultaten worden uitgevoerd naar bestand: "IPadressen.txt".
# Info: De 1e regel van het CSV-bestand moet kolomnamen bevatten.
# INfo: Het script kijkt alleen naar de kolom "Hostname".
# *****************************************************************************
$vDNSServerIP = "[server-ip-address]"
$vImportCSVFile = "HostNames.csv"
$vOutputTXTFile = "IPadressen.txt"
$aImportCSV1 = import-csv $vImportCSVFile
foreach ($vRow in $aImportCSV1 ) {
$vNSLookup = nslookup $($vRow.Hostname) $($vDNSServerIP) | `
select-string -NotMatch -Pattern $($VDNSServerIP)
$VNSLookupIP = $vNSLookup | select-string -Pattern "Address"
$VNSLookupName = $vNSLookup | select-string -Pattern "Name"
# Stel een regel samen t.b.v. uitvoer bestand...
"Question: " + $vRow.HostName + " " + `
$vNSLookupName.Line + " " + `
$vNSLookupIP.Line | `
Out-File -Append -Filepath $vOutputTXTFile
}