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
GELÖST

WSH - net send bzw msg und Zeilenumbruch

Frage Entwicklung VB for Applications

Mitglied: Flachzange89

Flachzange89 (Level 1) - Jetzt verbinden

16.06.2008, aktualisiert 16:14 Uhr, 8651 Aufrufe, 4 Kommentare

Wir haben in unserem Netzwerk etwa 100 FatClients (handelsübliche PCs) und etwa 1.000 Thinclients (Anmeldung an W2k/W2k3 Terminal-Servern / Citrix Metaframe). Userbenachrichtigungen über Systemausfälle (SAP, etc.) werden derzeit über die Management-Tools von Citrix gehandhabt. Ich möchte dies über ein zentrales Skript gestalten, das gleichermaßen die Thinclients als auch die Fatclients benachrichtig.

Ich habe mir so weit gedacht, dass ich die Fatclients via "net send" und die Sitzungen auf dem Terminalserver via "msg" benachrichtige.

Ich habe mir dafür zunächst 2 Routinen geschrieben. Es wird jeweils die zu sendende Nachricht und die Organizational Unit im Active Directory angegeben, in dem sich die Fatclients bzw. Terminalserver befinden.

Für die Benachrichtigung der Fatclients:

01.
 
02.
function informAllFatClients(strMessage, strOU) 
03.
	Set objOU = GetObject(strOU) 
04.
	objOU.Filter = Array("computer") 
05.
	For Each objComputer in objOU 
06.
		wshell.exec ("net send " & objComputer.cn & " " & strMessage) 
07.
	Next 
08.
end function 
09.
 
Für die Benachrichtigung der Terminal Server:

01.
 
02.
function informAllTerminalServers(strMessage, strOU) 
03.
	Set objOU = GetObject(strOU) 
04.
	objOU.Filter = Array("computer") 
05.
	For Each objComputer in objOU 
06.
		wshell.exec ("MSG * /SERVER:" & objComputer.cn & " " & strMessage) 
07.
	Next 
08.
end function 
09.
 
Aufgerufen wird das ganze dann später einfach:

01.
 
02.
informAllFatClients strMitteilung, "LDAP://OU=COMPUTERKONTEN,DC=abcdefgh,DC=de" 
03.
informAllFatClients strMitteilung, "LDAP://OU=AbteilungXYZ,OU=COMPUTERKONTEN,DC=abcdefgh,DC=de" 
04.
[...] 
05.
informAllTerminalServers strMitteilung, "LDAP://OU=Terminalserver,OU=COMPUTERKONTEN,DC=abcdefgh,DC=de" 
06.
informAllTerminalServers strMitteilung, "LDAP://OU=Terminalserver2003,OU=COMPUTERKONTEN,DC=abcdefgh,DC=de" 
07.
 
So. Das prinzip funktioniert auch wunderbar.
Es werden alle Fatclients angesprochen und alle Sitzungen auf allen Terminalservern.

Nun ist das nächste Probleme die Übermittlung der Nachrichten. Einzeilige "Botschaften" sind hier kein Problem, wie schaut es bei mehrzeiligen aus?

Gibt es eine Möglichkeit, Zeilenumbrüche konform einzuarbeiten? Ggf. eine komplette Textdatei rauszuschicken?

Wer hier Ideen oder Erfahrungen hat, könnte diese bitte hier einbringen. Ich werde ein wenig herumspielen und dann noch einmal berichten.


Schönen Gruß,
Mitglied: Logan000
16.06.2008 um 13:55 Uhr
Moin
Gibt es eine Möglichkeit, Zeilenumbrüche konform einzuarbeiten?
Als kleine Anregung zu Zeilenumbrüchen:
01.
Set wshell = CreateObject("WScript.Shell") 
02.
CRLF = Chr(13) & chr(10) 
03.
strMessage ="Hallo " & CRLF & "Welt" 
04.
wshell.exec ("net send " & "MeinPC" & " " & strMessage) 
Viel Erfolg
Gruß L.
Bitte warten ..
Mitglied: Flachzange89
16.06.2008 um 14:16 Uhr
Moin Logan000

danke, das funktioniert schonmal super bei net send.
Gibt es auch eine Möglichkeit für MSG?
Dort werden die Umbrüche nur als Steuerzeichen angezeigt.


Gruß
Bitte warten ..
Mitglied: Logan000
16.06.2008 um 14:33 Uhr
Leider kann ich dir dabei nicht wirklich weiterhelfen.
Wenn ich das auf meinen PC (lokal) ausprobiere klappt das analog zu Net send.

Wobei mir ist nicht ganz klar warum du für den TermServer MSG verwendest.
Würdes es nicht reichen ein Net Send an den TermServer zu schicken damit alle User darauf diese Meldung sehen?

Gruß L.
Bitte warten ..
Mitglied: Flachzange89
16.06.2008 um 16:14 Uhr
Hallo nochmal Logan,

das stimmt, das reicht vollkommen aus. Ich war zu sehr auf dieses MSG fixiert.
Das klappt einwandfrei und erleichert mir die Arbeit in Zukunft ungemein.

Danke dir noch einmal für den Hinweis mit den Zeilenumbrüchen.


Gruß
Bitte warten ..
Ähnliche Inhalte
CSS
Zeilenumbruch ohne br
gelöst Frage von ANTiNATORCSS2 Kommentare

Ich habe einen <div> in den durch ein phpscript der Inhalt einer Textdatei eingegeben wird. Welcher wiederum aus einem ...

Batch & Shell
Zeilenumbruch in eventcreate
Frage von hansis1Batch & Shell7 Kommentare

Hallo! Ich möchte mit eventcreate in das WindowsLog schreiben. Allerdings brauche ich dafür auch Zeilenumbrüche. Wie kann ich das ...

Windows 7
Eine Nachricht msg-Behfel an alle Computer im Netz gleichzeitig senden Windows 7 Pro
Frage von Daoudi1973Windows 719 Kommentare

Hallo zusammen, ich habe eine kleine Netz zu Hause eingerichtet (5 PC`s) und möchte an alle PC´s gleichzeitig eine ...

Outlook & Mail
Msg in vcf konvertieren
gelöst Frage von YannoschOutlook & Mail3 Kommentare

Hallo zusammen, brauche für unsere Telefonsoftware unsere Outlook-Kontakte als vcf File. Die Kontakte lassen sich aber nur als msg ...

Neue Wissensbeiträge
Windows 10

Autsch: Microsoft bündelt Windows 10 mit unsicherer Passwort-Manager-App

Tipp von kgborn vor 1 TagWindows 107 Kommentare

Unter Microsofts Windows 10 haben Endbenutzer keine Kontrolle mehr, was Microsoft an Apps auf dem Betriebssystem installiert (die Windows ...

Sicherheits-Tools

Achtung: Sicherheitslücke im FortiClient VPN-Client

Tipp von kgborn vor 1 TagSicherheits-Tools

Ich weiß nicht, wie häufig die NextGeneration Endpoint Protection-Lösung von Fortinet in deutschen Unternehmen eingesetzt wird. An dieser Stelle ...

Internet

USA: Die FCC schaff die Netzneutralität ab

Information von Frank vor 2 TagenInternet5 Kommentare

Jetzt beschädigt US-Präsident Donald Trump auch noch das Internet. Der neu eingesetzte FCC-Chef Ajit Pai ist bekannter Gegner einer ...

DSL, VDSL

ALL-BM200VDSL2V - Neues VDSL-Modem mit Vectoring von Allnet

Information von Lochkartenstanzer vor 2 TagenDSL, VDSL2 Kommentare

Moin, Falls jemand eine Alternative zu dem draytek sucht: Gruß lks

Heiß diskutierte Inhalte
Batch & Shell
Kann man mit einer .txt Datei eine .bat Datei öffnen?
gelöst Frage von HelloWorldBatch & Shell20 Kommentare

Wie schon im Titel beschrieben würde ich gerne durch einfaches klicken auf eine Text oder Word Datei eine Batch ...

Router & Routing
OpenWRT bzw. L.E.D.E auf Buffalo WZR-HP-AG300H - update
gelöst Frage von EpigeneseRouter & Routing11 Kommentare

Guten Tag, ich habe auf einem Buffalo WZR-HP-AG300H die alternative Firmware vom L.E.D.E Projekt geflasht. Ich bin es von ...

LAN, WAN, Wireless
WLAN Reichweite erhöhen mit neuer Antenne
gelöst Frage von gdconsultLAN, WAN, Wireless8 Kommentare

Hallo, ich besitze einen TL-WN722N USB-WLAN Dongle mit einer richtigen Antenne. Ich frage mich jetzt ob man die Reichweite ...

Windows 10
Autsch: Microsoft bündelt Windows 10 mit unsicherer Passwort-Manager-App
Tipp von kgbornWindows 107 Kommentare

Unter Microsofts Windows 10 haben Endbenutzer keine Kontrolle mehr, was Microsoft an Apps auf dem Betriebssystem installiert (die Windows ...