This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#IBJS.net 20160803, in Anlehnung an fb_dial.vbs von Michael Engelke 2012 | |
#Fritz!Box Wählhilfe mit Powershell von Joachim Schubert ibjs.net 2016 | |
#Der Fritz-Box Benutzername für diesen Konstellation lautet NAS-Read | |
#Das encrypted Fritz-Box Passwort ist vorher in einer Datei Securestring.fb abzulegen. | |
#ConvertFrom-SecureString (read-host -AsSecureString -Prompt "Passwort ") >SecureString.fb | |
#Als Default Rufnummer nehme ich hier die Zeitansage der Telekom, die aber kostenpflichtig ist | |
#Alternativ nehme ich zum Testen eine interne Nummer wie **610, damit kann ich es zwar klingeln lassen, | |
#kann aber bisher die internen Gespräche nicht an das Wahlgerät **613 übergeben, es legt sofort auf. | |
#Zum Aufbau einer Verbindung lege ich eine sonst unbenutzte Festnetznummer auf das Zielgerät. | |
#Erprobung an Windows 7/ Powershell 5/ Gigaset A415 **613, Gigaset SL1 **610/ FritzBox 6360/Unity Media VoIP |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#ibjs.net 20169806 | |
Add-Type -AssemblyName System.speech | |
$Hedda=New-Object ` | |
System.Speech.Synthesis.SpeechSynthesizer | |
$hedda.SelectVoice(` | |
($hedda.GetInstalledVoices().voiceinfo|?{$_.name -match "Hedda"}).name) | |
$GD=@' | |
$D=get-date | |
$S="Heute ist {0} der {1} {2} {3}. Es war gerade {4} Uhr und {5} Minuten und {6} Sekunden" -f ` | |
$D.tostring("dddd"),$D.day,$D.tostring("MMMM"),$D.year,$D.hour,$D.minute,$D.second |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#ibjs.net 20160817 Abfragefunktion für NTP, Auswertung der deutschen w32tm Ausgabe | |
$NTP_Server=@("ptbtime1.ptb.de", "ptbtime2.ptb.de", "ptbtime3.ptb.de", ` | |
"pool.ntp.org","europe.pool.ntp.org","de.pool.ntp.org ",` | |
"time-a.nist.gov","time-b.nist.gov ") | |
Function Get-NtpTime{ | |
Param($Server) | |
If (! $Server){$Server="ptbtime1.ptb.de"} | |
$NTPResponse={(iex "w32tm /stripchart /computer:$Server /dataonly /samples:0")[2]} | |
$NTPTime={get-date([regex]::Replace("$(&$NTPResponse)","([\D\s]+)([\d\. :]+)\.",'$2'))} |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#ibjs.net enable "String".Reverse 20170813 | |
Update-TypeData -TypeName "System.String" -MemberType ScriptProperty -MemberName "Reverse" -Value {-join $this[($this.length)..0]} -Force | |
(get-history|select -Last 1).commandline.reverse |