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 In VBS Date-Funktionen nutzen...

Mitglied: DocuSnap-Dude

DocuSnap-Dude (Level 2) - Jetzt verbinden

05.06.2011, aktualisiert 16:16 Uhr, 4019 Aufrufe, 8 Kommentare

Loginscript: an bestimmtem Datum Aktion ausführen...

Hallo,

ich komm wohl doch nie weg von meinem guten alten DOS-Batch....

Zum Henker wie bekomme ich es gebacken, das in einem Loginscript (VBS) an einem bestimmten Datum eine Messagebox erscheint. Und das UNABHÄNGIG vom Datumsformat des Users....

Das hier funktioniert leider so gar nicht:

01.
if day("05") then and month("06") and year("2011") then 
02.
	wscript.echo ("Achtung! Heute gibt's gesponsorten Kaffee & Pflaumenkuchen in der Kantine :-DD") 
03.
end if
Irgdnwas fehlt da noch; nur was und vor allem: Wie ist das wenn einer am Datumsformat hantiert??

Danke für Eure Hilfe.

Frank
Mitglied: TsukiSan
05.06.2011 um 16:19 Uhr
hallo Frank,

dein
if day("05") then and month("06") and year("2011") then
beinhaltet ein then zu viel!

Gruss
Tski
Bitte warten ..
Mitglied: TsukiSan
05.06.2011 um 16:22 Uhr
Zum Henker wie bekomme ich es gebacken, das in einem Loginscript (VBS) an einem bestimmten Datum eine Messagebox erscheint. Und das UNABHÄNGIG vom Datumsformat des Users....

na evenutell so:
01.
dd = day(date) 
02.
mm = month(date) 
03.
yy = year(date) 
04.
 
05.
meinDatum = 01072011 
06.
 
07.
temp = dd & mm & yy 
08.
if temp = meinDatum then .....
so müßte es ungetestet funktionieren

Gruss
Tsuki
Bitte warten ..
Mitglied: Friemler
05.06.2011 um 16:25 Uhr
Hallo Frank,

  1. Ein Then zuviel
  2. Sollte das so heißen:

if day(now) = 5 and month(now) = 6 and year(now) = 2011 then
Gruß
Friemler


[EDIT]
Oh, zu langsam.
[/EDIT]
Bitte warten ..
Mitglied: jonny83
05.06.2011 um 16:34 Uhr
Hi,

also du verwendest in VBScript einfach nur "Date()" was dir das Datum vom System zurückliefert.
dein if day and month etc.... sieht schon noch mehr nach Batchverarbeitung aus

Du kannst das z.B. einfach so machen

szDatum = replace(Date(),"/",".")

so würde er dir z.B ein Datumsformat von 01/01/2011 in 01.01.2011 ändern.
das Ersetzen kannst du ja öfter machen falls du nicht sicher bist welches Datumsformat du zu erwarten hast.
du könntest das dann alles so machen:

nimm gar kein Zeichen im Datum - also nimm immer 01012011

szDatum = replace(Date(),"-","")
szDatum = replace(szDatum,"/","")
szDatum = replace(szDatum,".","")
usw....(falls überhaupt nötig)

dann bekommst du hier z.B. für heute: 05062011

jetzt suchst du danach

if szDatum = "05062011" then
---wscript.echo "kaffe kuchen und blaaaa"
end if

PS: das mit dem Replace könnte man auch besser verschachteln oder über eine schleife laufen lassen.
Alo du könntest deine Suchkriterien so setzen
szSuchen = "/#.#-"
später das dann in ein Array packen
arrSuchen = split(szSuchen,"#")
und dann das Array durchlaufen
For i = uBound(arrSuchen) to lBound(arrSuchen)

blabla usw....


noch was by the way:

guck mal - ich hatte das mal gebraucht bzgl. Datumsberechnung etc...
evtl. kannst du das gebrauchen für deine Kaffe & Pflaumenkuchen Ausgabe :D

' *
' Schritt0
' Das Datum des heutigen Tages wird ausgelesen bzw. es werden
' die "Ausnahmepr¸fungen" definiert
'
*
Dim dtmDate, intDayOfWeek, x
dtmDate = Date()
'dtmDate = #10/1/2010#

'*
' Ermitteln des ersten Montags des
' aktuellen Monats
'
*
Do Until x = 1
intDayOfWeek = Weekday(dtmDate)
If intDayOfWeek = 2 Then
Wscript.Echo "Der erste Montag des Monats ist am " & dtmDate & "."
Exit Do
Else
dtmDate = dtmDate + 1
End If
Loop
'*
' Pr¸fen ob HEUTE der erste Montag
' des aktuellen Monats ist
'
*
If dtmDate = Date() then
wscript.echo "JA"
else
wscript.echo "nein"
end if
Bitte warten ..
Mitglied: TsukiSan
05.06.2011 um 16:47 Uhr
hallo jonny83,

dein
so würde er dir z.B ein Datumsformat von 01/01/2011 in 01.01.2011 ändern.
würde nur fruchten, wenn die Einstellungen der Maschine dd/mm/YYYY sind.
frankoehli schreibt aber
das UNABHÄNGIG vom Datumsformat des Users....
da ist man mit Abfrage von
1) day(Date)
2) month(Date)
3) year(Date)
völlig unabhängig von. Und wie man die 3Dinger dann nachher zusammenbaut ist völlig dem Author des Progis überlassen
Trotzdem sind deine Ideen eventuell informativ für den TO

Gruss
Tsuki
Bitte warten ..
Mitglied: 76109
05.06.2011 um 17:54 Uhr
Hallo frankoehli!

Sollte auch so gehen:
01.
If DateSerial(2011, 6, 5) = Date Then WScript.Echo "..."
Gruß Dieter
Bitte warten ..
Mitglied: DocuSnap-Dude
06.06.2011 um 11:17 Uhr
Hi an euch alle,

Bingo!

Letztlich hab ich folgendes Benutzt (Danke an Friemler) weil es mir am übersichtlichsten erscheint:


01.
if day(now) = 7 and month(now) = 6 and year(now) = 2011 then 
02.
  wscript.echo "Es gibt Kaffee in der Kueche" 
03.
      else 
04.
  wscript.echo "heute kein Kaffee" 
05.
end if 
Supi; Danke!
Bitte warten ..
Mitglied: DocuSnap-Dude
06.06.2011 um 11:18 Uhr
Hallo,

danke euch allen! siehe oben mein letzter Kommentar. Supi!
Bitte warten ..
Ähnliche Inhalte
Windows Netzwerk

VBS Logon-Script für die Nutzer einrichten

Frage von rababar2014Windows Netzwerk13 Kommentare

Hallo Forum, ich habe mir aus einer Vorlage hier im Forum ein VSB-Script gebastelt, um meine Netzlauferke bei Anmeldung ...

Batch & Shell

Powershell Wenn-Dann bzw. If-Then Funktion für .csv nutzen

gelöst Frage von DelPinguinoBatch & Shell4 Kommentare

Hallo zusammen, ich habe bereits mehrfach sehr nützliche Informationen hier gefunden und bin deshalb guter Dinge, dass mir auch ...

Batch & Shell

Erstellen eines GUI in Powershell und das nutzen vom Funktionen mit Usereingabe

gelöst Frage von IT-Guy77Batch & Shell2 Kommentare

Hallo zusammen, folgendes Problem: Ich arbeite derzeit an einem GUI in Powershell für eine kleine Sammlung von Skripten um ...

VB for Applications

Excel Funktion Date oder Heute in SQL-Verbindung

gelöst Frage von YotYotVB for Applications2 Kommentare

Moin! Zunächst einmal: ich habe das Thema nur halbrichtig ausgewählt, da es das, was ich suchen würde, nicht gibt. ...

Neue Wissensbeiträge
Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 1 StundeGoogle Android

Hier eine Information, die für Administratoren und Verantwortliche in Unternehmen, die für die Beschaffung und das Rollout von Android-Geräten ...

Sicherheit

Intel gibt neue Spectre V2-Microcode-Updates frei (20.02.2018)

Information von kgborn vor 1 StundeSicherheit

Intel hat zum 20. Februar 2018 weitere Microcode-Updates für OEMs freigegeben, um Systeme mit neueren Prozessoren gegen die Spectre ...

Microsoft
ARD-Doku - Das Microsoft Dilemma
Tipp von Knorkator vor 4 StundenMicrosoft2 Kommentare

Hallo zusammen, vor einigen Tagen lief in der ARD u.a. Reportage. Das Youtube Video dazu dürfte länger verfügbar sein. ...

Windows 10

Neue Sicherheitslücke in Windows 10 (Version 1709) durch Google öffentlich geworden

Information von kgborn vor 22 StundenWindows 10

Vor ein paar Tagen haben Googles Sicherheitsforscher vom Projekt Zero eine Sicherheitslücke im Edge-Browser publiziert. Jetzt wurde eine weitere ...

Heiß diskutierte Inhalte
Windows Server
AD DS findet Domäne nicht, behebbar?
Frage von schapitzWindows Server35 Kommentare

Guten Tag, ich habe bei einem Kunden ein Problem mit den AD DS. Umgebung ist folgende: Windows Server 2016 ...

Router & Routing
LANCOM VPN CLIENT einrichten
Frage von Finchen961988Router & Routing27 Kommentare

Hallo, ich habe ein Problem und hoffe ihr könnt mir helfen, wir haben einen Kunden der hat einen Speedport ...

CPU, RAM, Mainboards
32 gb RAM zu wenig?
Frage von pcguyCPU, RAM, Mainboards13 Kommentare

Hallo zusammen, mein PC verfügt über 32GB Ram. Nun kriege ich bei grossen Dateien im Illustrator die Fehlermeldung das ...

Router & Routing
ISC DHCP 2 Subnetze
gelöst Frage von janosch12Router & Routing9 Kommentare

Hallo, ich betreibe bei mir im Netzwerk einen ISC DHCP Server auf Debian, der DHCP verwaltet aktuell ein /24 ...