Open Thema mit Navigation

Erstellung von benutzerdefinierten Prüfziffern

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

ClosedSo 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. Remove any existing expression text from the Editor pane.

  8. In the Script Assistant pane, expand the Functions node, followed by the Check Digit node.

  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.

ClosedSo 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. Select Edit with Script Editor to open the Script 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