für VB
Dim Datum_heute As Date
dim starten as Variant
Datum_heute = Now 'aktuelles Datum speichern
Date = DateValue("11.9.2003") 'Systemdatum ändern.
starten = Shell("C:\WINDOWS\CALC.EXE", 1)
'irgendwas passiert jetzt zb die zeitlich begrenzte Demo laufen lassen
'das Programm nicht beenden(!) es sei denn, du speicherst in eine IniDatei
Date = Datum_heute ' aktuelles Datum wieder zurücksetzen
musst nur aufpassen, dass man vor Mitternacht das Programm wieder beendet

äh, die Uhrzeit muss man aus dem Datum extrahieren fällt mir grad ein