Archivierung mit variablen Dateinamen

Dino

Level-1
Beiträge
39
Reaktionspunkte
9
Zuviel Werbung?
-> Hier kostenlos registrieren
Hallo Spezialisten!

Mein Ziel ist es ein Archiv auf eine Speicherkarte oder eine Festplatte im Netzwerk zu verschieben. Bis da kein Problem mit "ArchiviereProtokolldatei" oder mit "ArchiveLogFile" im Script. Der Knackpunkt ist, ich möchte eine Variable mit dem eigentlichen Dateinamen in die Funktion einfügen bzw. der Dateiname indirekt über eine Variable vergeben.

Ihr seit gerne eingeladen mir zu helfen! Im Voraus, Danke

Dino
 
' Autor: Waldemar Smarsly. '==================================================
Dim ex ,Datei,Vorlage,KopyVon, Text
KopyVon = "E:\AMP20-4\Datenbank\Vorlage.xlsx" ' Verzeichnis zum Vorlage kopieren
Datei = "E:\AMP20-4\Datenbank\" & SmartTags("DaFach.Artikel")& ".xlsx" ' Datei zuweisen Verzeichnis
SmartTags("Datenbankmeldungen") = "" ' Verzeichnis für Datensätze

("DaFach.Artikel") Ist eine Ein-Ausgabevariable von Typ String für Alphanumerische eingaben, zB DB oder dergleichen.

Vielleicht hilft es Dir weiter?
 
Zuviel Werbung?
-> Hier kostenlos registrieren
Guten Tag Waldi,
Danke für deine "Nachtarbeit"! Ich habe zwar nicht alles verstanden was du geschrieben hast aber der Anstoss war gut!

Bei mir ging's dann so:

- Deklarieren von 2 String-Variablen (L=255): Registername und Artikelbez

- EinAusgabefeld für Artikelbez

- Unter einer Taste Skript auslösen

Im Skript:

Registername = "\\APA32M\MeinArchiv\" & SmartTags("Artikelbez")

StopLogging hmiDataLog, "Variablenarchiv_1"

CloseAllLogs

ArchiveLogFile hmiDataLog, "Variablenarchiv_1", SmartTags("Registername"), hmiMove


Der Hacken ist (sonst wär's ja nicht interessant), wenn der String "Registername" zu lang wird (> 255) dann geht's nicht mehr.

Weisst du oder ein anderer Flitzer wieder ein Trick?

Schöner Gruss, Dino
 
Hallo Dino

Warum für Registername ein Variable?

DIM Registername

Registername = "\\APA32M\MeinArchiv\" & SmartTags("Artikelbez")

Sollte funktioklappern
Probier es aus und gebe mir ein Link

Gruß Waldi
 
Hallo Waldi

Ja, du hast recht, es geht! Übrigens Danke schön.

Gruss, Dino
 
Zuletzt bearbeitet:
Zurück
Oben