Benutzer-Werkzeuge

Webseiten-Werkzeuge


de:programmieren:codes:entferneobjekt

EntferneObjekt()

Entfernen Sie aus Ihrer Arbeitsumgebung MyVemosy oder aus dem System Vemosy Objekte, bequem und schnell. Diese Funktion greift für alle Objekte innerhalb von Vemosy.

Objekte, die im System von Vemosy entfernt werden sollen, können nur von Administratoren oder Assistenten entfernt werden.

Parameter und Erklärungen

  • Titel
    • Übergeben Sie mit diesem Wert den Titel des Objektes, dass Sie löschen möchten.
  • Typ
    • Übergeben Sie an Vemosy/MyVemosy den Typen des Objektes, dass Sie löschen möchten.
  • Systemweit
    • Optional können Sie bestimmen, ob das Objekt systemweit (also auch von Vemosy) dauerhaft gelöscht werden soll. Die Anweisung muss als boolescher Wert übergeben werden. Standardwert: False | Falsch
  • VorOrt
    • Optional können Sie bestimmen, ob das Objekt nur vor Ort (also nur aus Ihrer Arbeitsumgebung MyVemosy) dauerhaft gelöscht werden soll. Die Anweisung muss als boolescher Wert übergeben werden. Standardwert: True | Wahr

Beispiele

Wir entfernen das Objekt „MeinTabellenImport“ vom Typen Quelle (Import aus Microsoft® Access® ehemals Table/Tabelle) aus der lokalen Arbeitsumgebung MyVemosy:

If EntferneObjekt("MeinTabellenImport", 1) = False Then MsgBox "Schade, konnte nicht lokal gelöscht werden!", ,"Objekte entfernen"

Wir entfernen das Objekt „MeinTabellenImport“ vom Typen Quelle (Import aus Microsoft® Access® ehemals Table/Tabelle) aus dem kompletten System von Vemosy:

If EntferneObjekt("MeinTabellenImport", 1, True, False) = False Then MsgBox "Schade, dass Objekt konnte nicht aus **Vemosy** entfernt werden!", , "Objekt entfernen"

Wir entfernen kein Objekt, denn wir sagen der Funktion, dass sie nichts machen soll:

If EntferneObjekt("MeinTabellenImport", 1, , False) = False Then MsgBox "Es war nichts zu erwarten, wenn nichts gelöscht werden soll!", ,"Objekt entfernen"

Wir können das Ergebnis auch abfangen, um daraus eine eigenständige Meldung ohne Bewertung zu gestalten:

Dim Ergebnis as Boolean
Ergebnis = EntferneObjekt("MeinTabellenImport", 1)
MsgBox "Konnte das Objekt entfernt werden?" & vbCrLf & Ergebnis, ,"Objekt-Löschung"

Fehlermeldungen

Keine dokumentiert

de/programmieren/codes/entferneobjekt.txt · Zuletzt geändert: 28.04.2017 10:32 von support