AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Delphi Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...
Thema durchsuchen
Ansicht
Themen-Optionen

Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...

Ein Thema von dataspider · begonnen am 16. Jun 2015 · letzter Beitrag vom 18. Jun 2015
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#11

AW: Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...

  Alt 16. Jun 2015, 16:27
Eventuell kann Firebird und deine DB-Komponenten auch mit Notification/Callbacks umgehen.

Sonst fragt der Client ja beim Server an, aber bei Notifications wendet sich der Server an einen/alle Clienten und schickt denen eine Nachricht.
Beim Empfang einer Nachricht kannst du das auswerten und z.B. auf den Text "Beenden" reagieren.

Ich hatte das letztens bei uns so umgesetzt, daß man z.B. eine MessageBox anzeigen kann (User+Message, bzw. All+Message) oder eben ein Shutdown-Befehl (Timeout+Message)
"Programm wird in 5 Mnuten beendet. Bitte speichern." oder Dregleichen.

Die Befehle sind einfach wie eine Stringliste hinterlegt, da die Notification ein String ist.
Command=Shutdown;Timeout=300;Message=Wartungsupdate

[edit]
Und ja, manchmal hängen die Events/Notifications etwas, oder arbeiten garnicht.
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.858 Beiträge
 
Delphi 11 Alexandria
 
#12

AW: Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...

  Alt 16. Jun 2015, 16:38
Bei Firebird Events benachrichtigt der Server die Clients, welche sich für dafür beim Server registriert haben.
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von dataspider
dataspider

Registriert seit: 9. Nov 2003
Ort: 04539 Groitzsch
1.351 Beiträge
 
Delphi 11 Alexandria
 
#13

AW: Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...

  Alt 16. Jun 2015, 21:10
Eventuell kann Firebird und deine DB-Komponenten auch mit Notification/Callbacks umgehen.
Ich denke - wie mkinzler auch - dass die Events (POST_EVENT) von Firebird vom Server ausgehen und damit wohl genau das tun, was du beschreibst.
Ich bin nun sowieso fast fertig und kann mit der Lösung gut leben...

Nochmals Danke

Frank
Frank Reim
  Mit Zitat antworten Zitat
Dejan Vu
(Gast)

n/a Beiträge
 
#14

AW: Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...

  Alt 17. Jun 2015, 08:21
Ich habe dieses Problem so gelöst, das die Anwender die EXE einfach nicht direkt starten können. Sie starten eine Batch-Datei, die aus dem Netz die EXE lokal kopiert und dann ausführt. So kann ich Ruhe meine Updates einspielen und beim nächsten Start haben alle Anwender automatisch die aktuelle EXE.

Bei dieser Vorgehensweise reicht ein "Es ist eine neue Version verfügbar, welche beim nächsten Start automatisch geladen wird." als Nachricht. Alternativ kann man die Batch-Datei durch einen UI-gepimpten 'Loader' ersetzen, der irgendwelche Releasenotes anzeigt, sofern die EXE neueren Datums ist.

Nachrichten habe ich einmal über Mailslots verschickt. Ich fand es blöd, dafür eine Tabelle vorzuhalten. Für 'offline' und 'latest News' sowie eine History (wer wann gelesen) ist das aber durchaus sinnvoll.
  Mit Zitat antworten Zitat
Benutzerbild von dataspider
dataspider

Registriert seit: 9. Nov 2003
Ort: 04539 Groitzsch
1.351 Beiträge
 
Delphi 11 Alexandria
 
#15

AW: Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...

  Alt 17. Jun 2015, 09:52
Ich habe dieses Problem so gelöst, das die Anwender die EXE einfach nicht direkt starten können. Sie starten eine Batch-Datei, die aus dem Netz die EXE lokal kopiert und dann ausführt. So kann ich Ruhe meine Updates einspielen und beim nächsten Start haben alle Anwender automatisch die aktuelle EXE.
Das hatte ich auch mal. Ich hatte dafür eine eigene AppStart.EXE und eine INI mit allen Parametern für den Abgleich.

Mein eigentliches Problem ist aber, dass ich zumindest bei diesem Projekt sicherstellen muss, dass während des DB-Updates alle Benutzer von der Datenbank getrennt sind.

Danke

Frank
Frank Reim
  Mit Zitat antworten Zitat
mm1256

Registriert seit: 10. Feb 2014
Ort: Wackersdorf, Bayern
640 Beiträge
 
Delphi 10.1 Berlin Professional
 
#16

AW: Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...

  Alt 17. Jun 2015, 10:28
Mein eigentliches Problem ist aber, dass ich zumindest bei diesem Projekt sicherstellen muss, dass während des DB-Updates alle Benutzer von der Datenbank getrennt sind.
....und während des Updatevorganges kein ReConnect eines Clients stattfinden darf.

Dieses Problem löse ich wie folgt: Auf dem Server liegt eine Tabelle mit Login-Logout-Informationen jedes Clients, physikalischer Dateiname "Logbuch". Darin wird protokolliert, wann User im Netzwerk ein Programm starten, und wann (und ob) sie es wieder ordnungsgemäß beenden. Bei einem Update ohne strukturelle Änderungen an der DB (ein quasi On-the-Fly-Update) bleibt die Struktur dieser Tabelle gleich. Wenn aber - so wie vermutlich auch bei dir - strukturelle Änderungen an den Datenbanken vorgenommen werden (müssen) gehe ich wie folgt vor:

- der DB-Server-Dienst wird beendet
- TCP/IP wird im DB-Server deaktiviert
- der DB-Server wird mit lokalem Zugriff (named Pipe) gestartet
- die Struktur der Logbuch-Tabelle wird geändert, d.h. das Feld bzw. der Feldname mit der Versionsnummer wird umbenannt
- weitere Strukturänderungen werden durchgeführt
- das Update (Programmdateien) wird installiert
- der DB-Server wird mit aktiviertem TCP/IP neu gestartet

Aufgrund Verwendung einer persistenten Feldliste können nun ältere Programmversionen generell nicht mehr am System angemeldet werden, weil ja das Feld (der Feldname) mit der neuen Versionsnummer bei der Anmeldung nicht gefunden wird. Die Exception wird behandelt und der User darauf hingewiesen, dass er versucht hat, sich mit einer alten Programmversion am neuen Datenbestand anzumelden. Das funktioniert immer, sowohl bei lokalen auf dem Client liegenden Programmdateien als auch bei shared auf dem Server liegenden Programmdateien.
Gruss Otto
Wenn du mit Gott reden willst, dann bete.
Wenn du ihn treffen willst, schreib bei Tempo 220 eine SMS
  Mit Zitat antworten Zitat
Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.143 Beiträge
 
Delphi 10.3 Rio
 
#17

AW: Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...

  Alt 17. Jun 2015, 10:52
Früher habe ich auch den Trick mit der Batch Datei gemacht...

Warum legst Du nicht einfach eine Datei hin DeinProgramm.Upd
Beim Start testest Du ab ob die Datei da ist und wenn ja starttest Du per Shellexecute ein Renamer der die aktuelle Version schließt und dann
DeinProgramm.exe löscht und DeinProgramm.Upd renamed auf *.exe.

Mavarik
  Mit Zitat antworten Zitat
Benutzerbild von dataspider
dataspider

Registriert seit: 9. Nov 2003
Ort: 04539 Groitzsch
1.351 Beiträge
 
Delphi 11 Alexandria
 
#18

AW: Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...

  Alt 17. Jun 2015, 13:19
- der DB-Server-Dienst wird beendet
- TCP/IP wird im DB-Server deaktiviert
...
Fehlt am Anfang als Erstes: Alle laufenden Anwendungen, die auf die Datenbank zugreifen, werden beendet.
Nur das war mein Problem.
Dann erfolgt ein ShutDown des Firebird - Servers...

Trotzdem Danke. Anregungen sind immer wertvoll!

Warum legst Du nicht einfach eine Datei hin DeinProgramm.Upd
Beim Start testest Du ab ob die Datei da ist und wenn ja starttest Du per Shellexecute ein Renamer der die aktuelle Version schließt und dann
DeinProgramm.exe löscht und DeinProgramm.Upd renamed auf *.exe.
Mavarik
siehe #15...
Ohne "Zwangstrennung" geht es nicht, dennoch soll diese "sanft" erfolgen

Frank
Frank Reim
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.858 Beiträge
 
Delphi 11 Alexandria
 
#19

AW: Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...

  Alt 18. Jun 2015, 10:36
Ich würde nicht den Firebird Server beenden, sondern die Datenbank in den Wartungsmodus versetzen.
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von dataspider
dataspider

Registriert seit: 9. Nov 2003
Ort: 04539 Groitzsch
1.351 Beiträge
 
Delphi 11 Alexandria
 
#20

AW: Alle EXE' n einer Anwendung zum Zeitpunkt X beenden...

  Alt 18. Jun 2015, 11:14
Ich würde nicht den Firebird Server beenden, sondern die Datenbank in den Wartungsmodus versetzen.
Genau das macht ja ShutDown des Firebird Servers.
Ich will ja auch die Update - Scripts einspielen.

Frank
Frank Reim
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:05 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz