Sehr geehrter Herr Prof. Flatscher,
anbei das überarbeitete Rexx Programm.
Mit freundlichen Grüßen,
Gruppe 4 - Karner, Khawar
Liebe Gruppe 4, liebe Alle (scrollen Sie diese e-Mail etwas hinunter),
leider funktioniert das vbscript-Beispiel noch immer nicht, hier ein Screenshot mit Console und Fehlermeldung:
---
Noch ein Hinweis, der vielleicht für alle interessant ist: Sie können in einem Rexxprogramm mit der "PARSE SOURCE"-Anweisung den vollqualifizierten Pfad zu dem gerade laufenden Rexxprogramm erhalten. Wenn Sie dann wissen, dass es eine in Rexx eingebaute Funktion namens "FILESPEC()" gibt, die es Ihnen erlaubt, die Bestandteile eines vollqualifizierenden Pfads nach Ihren Bedürfnissen extrahieren zu lassen, dann können Sie Ihr Programm so umschreiben, dass es nicht mehr notwendig ist, Ihre Dateien auf den Desktop zu kopieren, damit Ihr Programm fehlerfrei ablaufen kann, indem Sie dann das aktuelle Verzeichnis mit der in Rexx eingebauten Funktion "DIRECTORY()" dorthin wechseln.
Damit gewinnen Sie vollkommene Flexibilität für Ihre Programme und sind nicht mehr darauf angewiesen, dass die benötigten Programme an einem absoluten Speicherort gefunden werden müssen (stattdessen suchen Sie relativ zum Speicherort Ihres Programms die benötigten Dateien)!
Hier Ihr Programm entsprechend abgeändert:
*parse source . . thisPgm*** -- vollqualizifierter Pfad zu diesem Programm *location=filespec("location", thisPgm)* *call directory location* -- aktuelles Verzeichnis zum Programmort versetzen
SAY "Stellen Sie die Emulation Ihres Internet-Explorers in den Entwicklertools auf Version 10 zurueck und lassen sie geblockte Inhalte zu, um die Inahlte vollstaendig anzeigen zu koennen!"
address cmd "cars.html"
myIE = .OLEObject~New("InternetExplorer.Application") myIE~Visible = .true myIE~Navigate(*location*"button_ende.html") -- "location" benutzen
Mit freundlichem Gruß
Rony G. Flatscher
On 02.12.2020 22:17, Sulaiman Khawar wrote:
Sehr geehrter Herr Prof. Flatscher,
anbei das überarbeitete Rexx Programm.
Mit freundlichen Grüßen,
Gruppe 4 - Karner, Khawar
Sehr geehrter Herr Professor Flatscher, liebe Kollegen,
anbei das überarbeitete HTML mit VBScript, (Script von head auf body verschoben) und die von ihnen aktualisierte Rexx Programm. Herzlichen Dank für die Abänderung!
Die Emulation bei Internet Explorer 11 muss auf Internet Explorer 10 bei den Entwicklertools umgestellt werden, damit das vbscript-Beispiel fehlerfrei funktioniert.
Hier ein Screenshot mit dem Zwischenergebniss und dem gelb markierten Bereich wo man die Umstellung vornehmen kann:
Am 03.12.2020 um 13:00 schrieb Rony G. Flatscher:
Liebe Gruppe 4, liebe Alle (scrollen Sie diese e-Mail etwas hinunter),
leider funktioniert das vbscript-Beispiel noch immer nicht, hier ein Screenshot mit Console und Fehlermeldung:
Noch ein Hinweis, der vielleicht für alle interessant ist: Sie können in einem Rexxprogramm mit der "PARSE SOURCE"-Anweisung den vollqualifizierten Pfad zu dem gerade laufenden Rexxprogramm erhalten. Wenn Sie dann wissen, dass es eine in Rexx eingebaute Funktion namens "FILESPEC()" gibt, die es Ihnen erlaubt, die Bestandteile eines vollqualifizierenden Pfads nach Ihren Bedürfnissen extrahieren zu lassen, dann können Sie Ihr Programm so umschreiben, dass es nicht mehr notwendig ist, Ihre Dateien auf den Desktop zu kopieren, damit Ihr Programm fehlerfrei ablaufen kann, indem Sie dann das aktuelle Verzeichnis mit der in Rexx eingebauten Funktion "DIRECTORY()" dorthin wechseln.
Damit gewinnen Sie vollkommene Flexibilität für Ihre Programme und sind nicht mehr darauf angewiesen, dass die benötigten Programme an einem absoluten Speicherort gefunden werden müssen (stattdessen suchen Sie relativ zum Speicherort Ihres Programms die benötigten Dateien)!
Hier Ihr Programm entsprechend abgeändert:
*parse source . . thisPgm*** -- vollqualizifierter Pfad zu diesem Programm *location=filespec("location", thisPgm)* *call directory location* -- aktuelles Verzeichnis zum Programmort versetzen SAY "Stellen Sie die Emulation Ihres Internet-Explorers in den Entwicklertools auf Version 10 zurueck und lassen sie geblockte Inhalte zu, um die Inahlte vollstaendig anzeigen zu koennen!" address cmd "cars.html" myIE = .OLEObject~New("InternetExplorer.Application") myIE~Visible = .true myIE~Navigate(*location*"button_ende.html") -- "location" benutzenMit freundlichem Gruß
Rony G. Flatscher
On 02.12.2020 22:17, Sulaiman Khawar wrote:
Sehr geehrter Herr Prof. Flatscher,
anbei das überarbeitete Rexx Programm.
Mit freundlichen Grüßen,
Gruppe 4 - Karner, Khawar
--
Prof. Dr. Rony G. Flatscher Department Wirtschaftsinformatik und Operations Management Institut für Wirtschaftsinformatik und Gesellschaft D2c 2.086 WU Wien Welthandelsplatz 1 A-1020 Wien/Vienna, Austria/Europe
http://www.wu.ac.at __________________________________________________________________________________
Liebe Gruppe 4,
On 03.12.2020 20:41, Sulaiman Khawar wrote:
anbei das überarbeitete HTML mit VBScript, (Script von head auf body verschoben) und die von ihnen aktualisierte Rexx Programm. Herzlichen Dank für die Abänderung!
Die Emulation bei Internet Explorer 11 muss auf Internet Explorer 10 bei den Entwicklertools umgestellt werden, damit das vbscript-Beispiel fehlerfrei funktioniert.
Hier ein Screenshot mit dem Zwischenergebniss und dem gelb markierten Bereich wo man die Umstellung vornehmen kann:
Hier die Einstellungen entsprechend Ihren Vorschlägen:
Hier die Fehlermeldung:
Hier button_ende.html:
Mit freundlichem Gruß
Rony G. Flatscher
-- __________________________________________________________________________________
Prof. Dr. Rony G. Flatscher Department Wirtschaftsinformatik und Operations Management Institut für Wirtschaftsinformatik und Gesellschaft D2c 2.086 WU Wien Welthandelsplatz 1 A-1020 Wien/Vienna, Austria/Europe
http://www.wu.ac.at __________________________________________________________________________________
Sehr geehrter Herr Prof. Flatscher, liebe Kollegen,
Um das VBScript ohne Fehler ausführen zu können, müssen die geblockten Inhalte zugelassen werden die Standardgemäß vom MSIE11 blockiert sind.
Wie hier im Screenshot zu sehen taucht eine Abfrage die man zustimmt, mit dem Button "Geblockte Inhalte zulassen":
Alternativ bei Internetoptionen -> Erweitert, folgendes Häckchen macht:
Hier weitere Screenshots, wie sich das Script verhält mit Zwischenresultat:
Endresultat:
Liebe Grüße,
Gruppe 4 - Karner, Khawar
Am 04.12.2020 um 15:23 schrieb Rony G. Flatscher:
Liebe Gruppe 4,
On 03.12.2020 20:41, Sulaiman Khawar wrote:
anbei das überarbeitete HTML mit VBScript, (Script von head auf body verschoben) und die von ihnen aktualisierte Rexx Programm. Herzlichen Dank für die Abänderung!
Die Emulation bei Internet Explorer 11 muss auf Internet Explorer 10 bei den Entwicklertools umgestellt werden, damit das vbscript-Beispiel fehlerfrei funktioniert.
Hier ein Screenshot mit dem Zwischenergebniss und dem gelb markierten Bereich wo man die Umstellung vornehmen kann:
Hier die Einstellungen entsprechend Ihren Vorschlägen:
Hier die Fehlermeldung:
Hier button_ende.html:
Mit freundlichem Gruß
Rony G. Flatscher
-- __________________________________________________________________________________
Prof. Dr. Rony G. Flatscher Department Wirtschaftsinformatik und Operations Management Institut für Wirtschaftsinformatik und Gesellschaft D2c 2.086 WU Wien Welthandelsplatz 1 A-1020 Wien/Vienna, Austria/Europe
http://www.wu.ac.at __________________________________________________________________________________
Lieber Herr Khawar,
Danke für Ihre Screenshots!
Zum einen, bei meinem InternetExplorer kommt keine Abfrage bezüglicher geblockter Inhalte.
Bei mir wird der InternetExplorer 11 gestartet (mit der Option die dargestellte Seite in Edge darzustellen, wo VBScript nicht mehr unterstützt wird, soviel ich weiß), für den ich dann Version 10 in der Emulation entsprechend Ihren Hinweisen eingestellt habe. Auch die Änderung "aktive Inhalte ausführen" lassen, führt nicht dazu, dass ich Ihr VBScript-Beispiel erfolgreich ablaufen lassen kann! Hier ein Screenshot:
Gibt es andere Studierende in BP1, die das letzte Beispiel für den Termin 5 der Gruppe 4 erfolgreich zum Laufen gebracht haben? Wenn ja, was haben Sie machen müssen, damit es bei Ihnen funktioniert hat? Bitte schreiben Sie über die e-Mail-Liste, sodass alle interessiert Zuschauende auf den gleichen Wissensstand kommen!
Mit freundlichem Gruß
Rony G. Flatscher
P.S.: Wie Sie am Screenshot sehen, verwende ich eine englische Version von Windows und damit vom InternetExplorer.
-
Rony G. Flatscher -
Sulaiman Khawar