Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
Kommentar vom Moderator Dani am 16.03.2019 um 11:16:30 Uhr
- Formatierung hinzugefügt.
- Echtdaten ersetzt.

Script für Outlook Signatur

Mitglied: s.fromm

s.fromm (Level 1) - Jetzt verbinden

16.03.2019, aktualisiert 11:16 Uhr, 408 Aufrufe, 3 Kommentare

Hallo, ich bin gerade dabei die Outlook Signaturen bei uns auf den neusten Stand zu bringen. Wir nutzen dafür ein Powershell-script das bei jedem Start geladen wird und eine Word-Vorlage mit den Daten aus der AD-auffüllt. Das funktioniert auch sehr gut.

Nun haben wir die Vorlage bekommen das wir zwei Signaturen benötigen, eine für neue Mails und eine für Antworten und Weiterleitungen.

Mein Problem ist nun das ich das Script nicht so geändert bekomme das mir zwei signaturen geladen werden.

Ich habe unten mal das Script angefügt vielleicht hat ja jemand eine Idee wie ich damit zwei Signaturen geladen bekomme. Würde mich sehr freuen nicht alle mit Hand zu ändern

Danke schonmal im Voraus.

MfG Sebastian

01.
# Custom variables
02.
$UserDomain = $env:userdomain
03.

04.
if ($UserDomain -eq "GROEBERN")
05.
{
06.
$SignatureName = 'Signatur_long_GR'
07.
# Pfad der Signatur auf AD-Server Attendorn
08.
$SigSource = "\\x.y.z.de\SysVol\x.y.z.de\scripts\Scripte\signature\Signatur_long_GR.docx"
09.
# Name der Signatur in HEX mit zwei Nullen am Ende
10.
$inhalt = 0x73,0x00,0x6F,0x00,0x64,0x00,0x65,0x00,0x63,0x00,0x69,0x00,0x61,0x00,0x5F,0x00,0x61,0x00,0x74,0x00,0x74,0x00,0x65,0x00,0x6E,0x00,0x64,0x00,0x6F,0x00,0x72,0x00,0x6E,0x00,0x5F,0x00,0x67,0x00,0x72,0x00,0x6F,0x00,0x65,0x00,0x62,0x00,0x65,0x00,0x72,0x00,0x6E,0x00,0x00,0x00
11.
}
12.

13.

14.

15.
$SignatureVersion = "1.0" #Change this if you have updated the signature. If you do not change it, the script will quit after checking for the version already on the machine
16.
$ForceSignature = '1' #Set to 1 if you don't want the users to be able to change signature in Outlook
17.
 
18.
# Environment variables
19.
$AppData=(Get-Item env:appdata).value
20.

21.
if ($UserDomain -eq "GROEBERN")
22.
{
23.
$SigPath = '\Microsoft\Signatures'
24.
$LocalSignaturePath = $AppData+$SigPath
25.
$fullPathremove = $LocalSignaturePath+'\*'
26.
remove-item $fullPathremove -recurse -force
27.
}
28.

29.

30.
$RemoteSignaturePathFull = $SigSource
31.

32.

33.
# Copy version file
34.
If (-not(Test-Path -Path $LocalSignaturePath\$SignatureVersion))
35.
{
36.
New-Item -Path $LocalSignaturePath\$SignatureVersion -ItemType Directory
37.
}
38.
Elseif (Test-Path -Path $LocalSignaturePath\$SignatureVersion)
39.
{
40.
Write-Output "Latest signature already exists"
41.
break
42.
}
43.

44.
#Check signature path (needs to be created if a signature has never been created for the profile
45.
if (-not(Test-Path -path $LocalSignaturePath)) {
46.
	New-Item $LocalSignaturePath -Type Directory
47.
}
48.

49.
# Get Active Directory information for current user
50.
$UserName = $env:username
51.
$Filter = "(&(objectCategory=User)(samAccountName=$UserName))"
52.
$Searcher = New-Object System.DirectoryServices.DirectorySearcher
53.
$Searcher.Filter = $Filter
54.
$ADUserPath = $Searcher.FindOne()
55.
$ADUser = $ADUserPath.GetDirectoryEntry()
56.
$ADFirstName = $ADUser.FirstName
57.
$ADLastName = $ADUser.LastName
58.
$ADEmailAddress = $ADUser.mail
59.
$ADTitle = $ADUser.title
60.
$ADDescription = $ADUser.description
61.
$ADTelePhoneNumber = $ADUser.TelephoneNumber
62.
$ADPager = $ADUser.Pager
63.
$ADfacsimileTelephoneNumber = $ADUser.facsimileTelephoneNumber
64.
$ADMobile = $ADUser.mobile
65.
$ADStreetAddress = $ADUser.streetaddress
66.
$ADCity = $ADUser.l
67.
$ADcoName = $ADUser.co
68.
$ADPostalCode = $ADUser.PostalCode
69.
$ADCompany = $ADUser.company
70.
$ADCustomAttribute1 = $ADUser.extensionAttribute1
71.
$ADModify = $ADUser.whenChanged
72.

73.
# Copy signature templates from source to local Signature-folder
74.
Write-Output "Copying Signatures"
75.
Copy-Item "$Sigsource" $LocalSignaturePath -Recurse -Force
76.
$ReplaceAll = 2
77.
$FindContinue = 1
78.
$MatchCase = $False
79.
$MatchWholeWord = $True
80.
$MatchWildcards = $False
81.
$MatchSoundsLike = $False
82.
$MatchAllWordForms = $False
83.
$Forward = $True
84.
$Wrap = $FindContinue
85.
$Format = $False
86.
	
87.
# Insert variables from Active Directory to rtf signature-file
88.
Write-Output "Insert variables from Active Directory to rtf signature-file"
89.
$MSWord = New-Object -ComObject word.application
90.
$fullPath = $LocalSignaturePath+'\'+$SignatureName+'.docx'
91.
[void]$MSWord.Documents.Open($fullPath)
92.
	
93.

94.
# FirstName
95.
If ($ADFirstName -ne '') { 
96.
    $FindText = "FirstName"
97.
       $ReplaceText = $ADFirstName.ToString()
98.
   }
99.
   Else {
100.

101.
   }
102.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
103.

104.
# LastName
105.
If ($ADLastName -ne '') { 
106.
    $FindText = "LastName"
107.
       $ReplaceText = $ADLastName.ToString()
108.
   }
109.
   Else {
110.

111.
   }
112.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
113.

114.
# Title		
115.
   If ($ADTitle -ne '') { 
116.
   	$FindText = "Title"
117.
   	$ReplaceText = $ADTitle.ToString()
118.
}
119.
Else {
120.
    $FindText = "Title"
121.
   	$ReplaceText = "".ToString()
122.
}
123.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
124.

125.
# Description
126.
   If ($ADDescription -ne '') { 
127.
   	$FindText = "Description"
128.
   	$ReplaceText = $ADDescription.ToString()
129.
}
130.
Else {
131.
    $FindText = "Description"
132.
   	$ReplaceText = "".ToString()
133.
}
134.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
135.
# $LogInfo += $NL+'Description: '+$ReplaceText
136.
   	
137.
# Street Address
138.
If ($ADStreetAddress -ne '') { 
139.
       $FindText = "StreetAddress"
140.
    $ReplaceText = $ADStreetAddress.ToString()
141.
   }
142.
   Else {
143.
    $FindText = "StreetAddress"
144.
    $ReplaceText = $DefaultAddress
145.
    }
146.
	$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
147.

148.
# City
149.
If ($ADCity -ne '') { 
150.
    $FindText = "City"
151.
       $ReplaceText = $ADCity.ToString()
152.
   }
153.
   Else {
154.
    $FindText = "City"
155.
    $ReplaceText = "".ToString()
156.
   }
157.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
158.

159.

160.
# PostalCode
161.
If ($ADPostalCode -ne '') { 
162.
    $FindText = "PostalCode"
163.
       $ReplaceText = $ADPostalCode.ToString()
164.
   }
165.
   Else {
166.
    $FindText = "PostalCode"
167.
    $ReplaceText = "".ToString()
168.
   }
169.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
170.

171.
# Company
172.
If ($ADCompany -ne '') { 
173.
    $FindText = "Company"
174.
       $ReplaceText = $ADCompany.ToString()
175.
   }
176.
   Else {
177.
    $FindText = "Company"
178.
    $ReplaceText = "".ToString()
179.
   }
180.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
181.
	
182.
# coName
183.
If ($ADcoName -ne '') { 
184.
    $FindText = "coName"
185.
    If ($ADcoName -eq "Deutschland") {
186.
       $ReplaceText = "Germany".ToString()
187.
       }
188.
       Else {
189.
       $ReplaceText = $ADcoName.ToString()
190.
       }
191.
   }
192.
   Else {
193.
    $FindText = "coName"
194.
    $ReplaceText = "".ToString()
195.
   }
196.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
197.

198.

199.

200.
# Telephone
201.
If ($ADTelephoneNumber -ne "") { 
202.
	$FindText = "TelephoneNumber"
203.
	$ReplaceText = $ADTelephoneNumber.ToString()
204.
   }
205.
Else {
206.
	$FindText = "TelephoneNumber"
207.
    $ReplaceText = $DefaultTelephone
208.
	}
209.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
210.
	
211.
# facsimileTelephoneNumber
212.
If ($ADfacsimileTelephoneNumber -ne "") { 
213.
	$FindText = "facsimileTelephoneNumber"
214.
	$ReplaceText = $ADfacsimileTelephoneNumber.ToString()
215.
   }
216.
Else {
217.
	$FindText = "facsimileTelephoneNumber"
218.
    $ReplaceText = "".ToString()
219.
	}
220.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
221.

222.
# Mobile
223.
If ($ADMobile -ne "") { 
224.
	$FindText = "MobileNumber"
225.
	$ReplaceText = $ADMobile.ToString()
226.
   }
227.
Else {
228.
	$FindText = "MobileNumber"
229.
    $ReplaceText = "".ToString()
230.
	}
231.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
232.

233.
# Pager
234.
If ($ADPager -ne "") { 
235.
	$FindText = "Pager"
236.
	$ReplaceText = $ADPager.ToString()
237.
   }
238.
Else {
239.
	$FindText = "Pager"
240.
    $ReplaceText = "".ToString()
241.
	}
242.
$MSWord.Selection.Find.Execute($FindText, $MatchCase, $MatchWholeWord,	$MatchWildcards, $MatchSoundsLike, $MatchAllWordForms, $Forward, $Wrap,	$Format, $ReplaceText, $ReplaceAll	)
243.

244.
# Save new message signature 
245.
Write-Output "Saving signatures"
246.
#Save HTML
247.
$saveFormat = [Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat], "wdFormatHTML");
248.
$path = $LocalSignaturePath+'\'+$SignatureName+".htm"
249.
$MSWord.ActiveDocument.saveas([ref]$path, [ref]$saveFormat)
250.
    
251.
# Save RTF 
252.
$saveFormat = [Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat], "wdFormatRTF");
253.
$path = $LocalSignaturePath+'\'+$SignatureName+".rtf"
254.
$MSWord.ActiveDocument.SaveAs([ref] $path, [ref]$saveFormat)
255.
	
256.
# Save TXT    
257.
$saveFormat = [Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat], "wdFormatText");
258.
$path = $LocalSignaturePath+'\'+$SignatureName+".txt"
259.
$MSWord.ActiveDocument.SaveAs([ref] $path, [ref]$SaveFormat)
260.
$MSWord.ActiveDocument.Close()
261.
$MSWord.Quit()
262.
	
263.

264.
# Office 2010
265.
If (Test-Path HKCU:'\Software\Microsoft\Office\14.0')
266.
{
267.
If ($ForceSignature -eq '1')
268.
    {
269.
    Write-Output "Remove forced signature for Office 2010"
270.
    Remove-ItemProperty HKCU:'\Software\Microsoft\Office\14.0\Common\MailSettings' -Name 'ReplySignature' -Force
271.
    Remove-ItemProperty HKCU:'\Software\Microsoft\Office\14.0\Common\MailSettings' -Name 'NewSignature' -Force
272.
    Write-Output "Setting Office 2010 signature as available"
273.
    $MSWord = New-Object -comobject word.application
274.
    $EmailOptions = $MSWord.EmailOptions
275.
    $EmailSignature = $EmailOptions.EmailSignature
276.
    $EmailSignatureEntries = $EmailSignature.EmailSignatureEntries
277.
    }
278.
}
279.

280.

281.
############################################################
282.
# Signatur Ordnernummer auslesen
283.
$signature_reg_version = ((Get-ItemProperty -Path HKCU:'SOFTWARE\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\Outlook\9375CFF0413111d3B88A00104B2A6676' -Name '{ED475418-B0D6-11D2-8C3B-00104B2A6676}').'{ED475418-B0D6-11D2-8C3B-00104B2A6676}')
284.

285.
# Binär in String
286.
if ($signature_reg_version -eq "1")
287.
{
288.
$signature_reg_version = 1
289.
}
290.
ElseIf ($signature_reg_version -eq "2")
291.
{
292.
$signature_reg_version = 2
293.
}
294.
ElseIf ($signature_reg_version -eq "3")
295.
{
296.
$signature_reg_version = 3
297.
}
298.
ElseIf ($signature_reg_version -eq "4")
299.
{
300.
$signature_reg_version = 4
301.
}
302.
ElseIf ($signature_reg_version -eq "5")
303.
{
304.
$signature_reg_version = 5
305.
}
306.
ElseIf ($signature_reg_version -eq "6")
307.
{
308.
$signature_reg_version = 6
309.
}
310.
ElseIf ($signature_reg_version -eq "7")
311.
{
312.
$signature_reg_version = 7
313.
}
314.
ElseIf ($signature_reg_version -eq "8")
315.
{
316.
$signature_reg_version = 8
317.
}
318.
ElseIf ($signature_reg_version -eq "9")
319.
{
320.
$signature_reg_version = 9
321.
}
322.

323.
# Erzeugen der Reg Schlüssel für New und Reply E-Mails
324.
New-ItemProperty HKCU:'SOFTWARE\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\Outlook\9375CFF0413111d3B88A00104B2A6676\0000000'$signature_reg_version -Name 'New Signature' -Value ([byte[]]($inhalt)) -PropertyType 'Binary' -Force
325.
New-ItemProperty HKCU:'SOFTWARE\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\Outlook\9375CFF0413111d3B88A00104B2A6676\0000000'$signature_reg_version -Name 'Reply-Forward Signature' -Value ([byte[]]($inhalt)) -PropertyType 'Binary' -Force
326.

327.
# Schliessen von Outlook, da es sonst geöffnet bleibt
328.
Get-Process outlook |   Foreach-Object { $_.CloseMainWindow() | Out-Null } | stop-process –force
Mitglied: Kraemer
16.03.2019, aktualisiert um 11:15 Uhr
Zitat von s.fromm:
$SigSource = "\\x.y.z.de\SysVol\x.y.z.de\scripts\Scripte\signature\Signatur_long_GR.docx"
na, wenn deine Frage in Verbindung mit den Infos keine Bewerbungen hageln lässt...
Bitte warten ..
Mitglied: freesolo
16.03.2019, aktualisiert um 10:11 Uhr
Zitat von Kraemer:
na, wenn deine Frage in Verbindung mit den Infos keine Bewerbungen hageln lässt...
Wohl eher Kündigungen ...
https://www.saechsische.de/autozulieferer-ist-zahlungsunfaehig-3417877.h ...
Bitte warten ..
Mitglied: Andrew01
16.03.2019 um 09:59 Uhr
Nicht Lustig!
Bitte warten ..
Ähnliche Inhalte
Windows Server
Outlook Digitale Signatur
Frage von MahagonWindows Server1 Kommentar

Guten Morgen Ich versuche gerade mit Outlook 2013 unter Server 2012 R2 eine signierte e-Mail zu verschicken. Es handelt ...

Outlook & Mail
Outlook 2016 Signatur
Frage von Alex284Outlook & Mail1 Kommentar

Liebe Community! In unserer html Signatur haben wir ein Logo eingebettet. Ich habe nun folgenes Problem. Bei Outlook 2016 ...

Microsoft Office
Outlook 2007 Signatur
Frage von anak1mMicrosoft Office3 Kommentare

Hallo zusammen, hat auch jemand das Problem, dass eine Signatur welche ein Bild enthält, das Bild manchmal in Outlook ...

Outlook & Mail
Outlook Signatur einmalig vereilen
Frage von 113726Outlook & Mail18 Kommentare

Hallo, ich habe schon im Internet gesucht aber keine wirkliche Lösung gefunden. Gibt es eine Möglichkeit, einmalig eine neue ...

Neue Wissensbeiträge
Datenschutz

SiSyPHuS Win10: Analyse der Telemetriekomponenten in Windows 10

Tipp von freesolo vor 23 StundenDatenschutz1 Kommentar

Alle die sich detailliert für die Datensammlung interessieren die unter Windows 10 stattfindet, sollten sich folgende Analyse des BSI ...

Sicherheit
Adminrechte dank Intel-Grafikkarte
Information von DerWoWusste vor 1 TagSicherheit1 Kommentar

ist das Advisory, welches beschreibt, welche Intel HD Graphics Modelle Sicherheitslücken haben, mit denen sich schwache Nutzer zu Admins ...

Internet

EU Urheberrechtsreform: Eingriff in die Internetkultur

Information von Frank vor 1 TagInternet1 Kommentar

Liebe Besucherin, lieber Besucher, warum erscheint das obere Banner in allen Beiträgen? Aus Protest gegen Teile der geplanten EU-Urheberrechtsreform ...

Windows Server
Windows Backup - FilterManager Event 3
Tipp von NixVerstehen vor 2 TagenWindows Server

Hallo zusammen, ich bin kein gelernter ITler und auch beruflich nicht in dem Feld tätig. Wir setzen in unserem ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
Glasfaserkabel verlegen und Anschlüsse setzen
Frage von LLL0rdLAN, WAN, Wireless21 Kommentare

Hallo Leute, ich muss demnächst ein Netzwerkkabel auf einer Länge von ca. 70 Metern verlegen. Das Netzwerkkabel soll dabei ...

Windows Server
Mac Rechner im Windows Netzwerk - was jetzt?
gelöst Frage von Kopfg3ldWindows Server18 Kommentare

Hallo zusammen, ich habe folgende Herausforderungen. Aber erst mal was kurz zum Netzwerk - Windows Server (ältester ist ein ...

Microsoft Office
Sharepoint 2016 mag keine Umlaute in .docx-Titeln
gelöst Frage von DerWoWussteMicrosoft Office14 Kommentare

Moin Kollegen. Nutzt hier jemand Sharepoint? Könnt Ihr, unabhängig von der Sharepointversion, bitte einen Test machen? Ladet ein .docx ...

Basic
VBS soll alle Ordner auswählen, die im Startmenu angezeigt werden
Frage von Senseless-CreatureBasic12 Kommentare

Guten Morgen - gibt es eine Möglichkeit, per VBS das Startmenu in Win10 zu modifizieren? Ich beherrsche VBS mittlerweile ...