Domino 9 und frühere Versionen > Entwicklung

lokale Replik verhindern

<< < (2/3) > >>

rar:
Stimmt natürlich Bernhard.
Das war auch nur eine Idee von mir. Ich wüßte sonst nicht wie ich das Problem lösen könnte.

koehlerbv:
Sowas müsste dann wohl in jede Maske, jeden Folder und jede Ansicht:

Declarations:
Declare Function NEMGetCurrentSubprogramWindow Lib "nnotesws.dll" () As Long
Declare Function NEMStopSubprogramWindow Lib "nnotesws.dll" (Byval wHandle As Long) As Integer


PostOpen oder Initialize:
Dim wHandle As Long
   
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Set db = session.CurrentDatabase
   If ( db.Server = "" ) Then
      Messagebox "Die Benutzung dieser DB ist nur auf dem Server erlaubt.", 0,"Schwerer Anwenderfehler"
      wHandle = NEMGetCurrentSubprogramWindow
      Call NEMStopSubprogramWindow(wHandle)
   End If

Wenn's der Kunde löhnt ;-)

Bernhard

Don Pasquale:
Hallo bernhard & rar

Vielen Dank,
damit komme ich zurecht.

in die entscheidenen Views packe ich dann auch das
StopSubprogramm

Ciao
Don Pasquale

Driri:
Hi,

wieso dekativierst Du nicht in den Replizierparametern für die Datenbank auf dem Server die Replikation ?

Beim Versuch, eine Replik zu erzeugen kommt dann eine Fehlermeldung, das Erzeugen einer Replik ist nicht mehr möglich.

Don Pasquale:
@Driri:

Das wäre eine Idee, allerdings habe ich keine Gewähr, dass der Admin das auch wirklich macht :-(

Ciao
Don Pasquale

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete