declare sub keybd_event lib "user32.dll" (byval bvk as integer, byval bscan as integer, byval dwflags as integer,byval dwextrainfo as integer)
Sub removeDB(servername As String,dbpath As String)
Dim workspace As New notesuiworkspace
Call workspace.AddDatabase(servername,dbpath)
keybd_event 46,0,0,0 ' Del key down
keybd_event 46,0,2,0 ' Del key up
keybd_event 89,0,0,0 ' Y key down
keybd_event 89,0,2,0 ' Y key up
End Sub
Schalte mal die "stacked" Option für die Kacheln aus.
Hab in meinem Code-Archiv eine Funktion zum Entfernen einer DB vom Workplace gefunden, vielleicht hilft es:
Und wenn du tatsächlich das stückchen script genommen hättest...
Unter Ansicht den Punkt "Symbole anordnen" ausgewählt.
Dann ist mir aufgefallen, dass die Kachel "Ausgehende Mail" scheinbar doppelt angezeigt wurde.
Ich habe beide Kacheln nur 1x angeklickt und dabei hat sich eine Kachel in die gesuchte Kachel des Kollegen umgewandelt.
Fazit
Im Notes Client gibt es 2 Arten von Links, HotSpots & native Links.
Native Links setzen die Kacheln korrekt, HotSpots tun dies nicht.
Die URI, welche ein HotSpots nutzt, funktioniert, wenn sie auf anderem Wege benutzt wird (Sametime & Run) korrekt.
Die Verwendung eines HotSpots führt nebenbei dazu, dass danach auch alle anderen Linkarten/Aufrufe, bei (und nur bei) der entsprechenden Ziel-Datenbank keine Kacheln mehr erzeugen können.
Daher bin ich der Meinung, dass HotSpots die einzige Fehlerursache sind.
(...)
Workaround
Native Links, anstatt HotSpots nutzen.