Open topic with navigation

Erstellung von benutzerdefinierten Prüfziffern

Sie können mit Visual Basic Script (VBScript) eine benutzerdefinierte Prüfziffer anhand eines vorhandenen Prüfziffernalgorithmus oder über die Konzeption eines benutzerdefinierten Algorithmus erstellen.

GeschlossenSo erstellen Sie eine benutzerdefinierte Prüfziffer mit VBScript anhand eines vorhandenen Algorithmus

  1. Doppelklicken Sie auf den gewünschten Strichcode, um das Dialogfeld Strichcode-Eigenschaften zu öffnen. Wählen Sie alternativ aus dem Kontextmenü des Objekts den Eintrag Eigenschaften.

  2. Wählen Sie in der Navigationsleiste die Datenquelle mit den zu codierenden Daten aus.

  3. Klicken Sie auf das Symbol auf der Datenquellen-Symbolleiste, um den Assistenten für neue Datenquelle zu starten.

  4. Wählen Sie unter Typ den Eintrag Visual Basic Scripting.

  5. Klicken Sie auf Fertigstellen, um den Assistenten für neue Datenquelle zu schließen.

  6. Behalten Sie als Skripttyp die Einstellung Einzeiliger Ausdruck bei, und wählen Sie Mit Skript-Editor bearbeiten.

  7. Entfernen Sie eventuell vorhandenen Ausdruckstext aus dem FensterEditor.

  8. Erweitern Sie im Fenster Skript-Assistent den Knoten Funktionen und anschließend den Knoten Prüfziffer.

  9. Doppelklicken Sie auf den gewünschten Prüfzifferntyp.

  10. Ersetzen Sie im Feld Editor den hervorgehobenen Text («String») mit dem Freigabenamen der Datenquelle, die im Schritt 4 oben benannt wurde.

  11. Klicken Sie auf OK, um den Skript-Editor zu schließen.

GeschlossenSo erstellen Sie eine benutzerdefinierte Prüfziffer mit VBScript anhand eines benutzerdefinierten Algorithmus

  1. Doppelklicken Sie auf den gewünschten Strichcode, um das Dialogfeld Strichcode-Eigenschaften zu öffnen. Wählen Sie alternativ aus dem Kontextmenü des Objekts den Eintrag Eigenschaften.

  2. Wählen Sie in der Navigationsleiste die Datenquelle mit den zu codierenden Daten aus.

  3. Klicken Sie auf das Symbol auf der Datenquellen-Symbolleiste, um den Assistenten für neue Datenquelle zu starten.

  4. Wählen Sie unter Typ den Eintrag Visual Basic Scripting.

  5. Klicken Sie auf Fertigstellen, um den Assistenten für neue Datenquelle zu schließen.

  6. Ändern Sie den Skripttyp in Mehrzeiliges Skript.

  7. Wählen Sie Mit Skript-Editor bearbeiten, um den Skript-Editor.

  8. Entfernen Sie eventuell vorhandenen Skripttext aus dem Fenster Editor.

  9. Geben Sie einen benutzerdefinierten Algorithmus zur Berechnung der Prüfziffer ein, etwa:

    'Erstellen Sie eine Mod43-Prüfziffer.

    charSet = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ-. $/+%"

    For i + 1 ToLen(C39)

    total = InStr(charSet, Mid(C39,i,1)) - 1 + total

    Next

    Value = Mid(charSet, (total Mod 43 + 1), 1)

  10. Klicken Sie auf OK, um den Skript-Editor zu schließen.

Verwandte Themen