Skip to Content

Registrieren Anmelden

Industry Online Support

Technical Forum

Navigation

Speichermedium inhalt anzeigen

Erstellt von: a-d-78 am: 10.12.2014 12:17 (8 Antworten)

Bewertung (0)

Dank 0

9 Einträge

10.12.2014 12:17	Bewerten (0)
a-d-78 Beiträge: 56 Bewertung: (2)	Möchte folgendes umsetzen: Der Bediener der Anlage bekommt z.B. einen USB-Stick mit unterschiedlichen Aufträgen die als csv – Datei auf dem Stick gespeichert sind. Jetzt soll der Bediener die Möglichkeit haben den Auftrag einzeln in die Steuerung zu importieren. Die Dateinamen sind entweder Kunden- oder Auftragsnummer. Gibt es eine Möglichkeit alle verfügbaren Dateien mit der Endung (csv) in einer Art Liste (z.B. Textliste) einzutragen? Ist es auch Möglich den Inhalt des USB-Sticks in Explorer anzuzeigen mit der Möglichkeit die Datei auszuwählen und importieren? Verwendete HMI-Panel: Comfort TP900
a-d-78 Beiträge: 56 Bewertung: (2)	Zuletzt bearbeitet von: a-d-78 am: 10.12.2014 12:17
Vorschlag Bedanken Zitat Antwort

11.12.2014 13:14	Bewerten (0)
Prof. Frink Platin-Experte Beigetreten: 05.07.2013 Letzter Bes: 18.11.2024 Beiträge: 3120 Bewertung: (516)	Hallo, a-d-78 Jetzt soll der Bediener die Möglichkeit haben den Auftrag einzeln in die Steuerung zu importieren. 1. Wie sieht denn so ein Auftrag aus? 2. Wie stellst du dir den Import in die Steuerung vor? Eine Auflistung der Dateien in einem Verzeichnis lässt sich wahrscheinlich per Skript bewerkstelligen. Gruss Prof. Frink
	Pi is exactly three! All you have to do is think of things which people need but which don’t exist yet.
Vorschlag Bedanken Zitat Antwort

16.12.2014 09:53	Bewerten (0)
Jonny9 Bronze-Mitglied Beigetreten: 06.04.2011 Letzter Bes: 05.11.2024 Beiträge: 240 Bewertung: (25)	Welches Panel verwendest du? Bei einigen gibt es Browser-Funktionen. Sonst könnte ich dir ein Skript anbieten. Ich hatte das gleiche Problem und mir ein Skript geschrieben, was alle csv-Dateien in einer Textanzeige darstellt. Diese habe ich über zwei Tasten scrollbar gemacht. Vor die Dateinamen stelle ich eine fortlaufende Zahl. Diese muss der Anwender eingeben und die Datei wird importiert.

Vorschlag Bedanken Zitat Antwort

08.01.2015 09:02	Bewerten (0)
a-d-78 Beiträge: 56 Bewertung: (2)	Hallo. so ähnlich habe ich mir das auch vorgestellt. Könntest du mir das Script zu Verfügung stellen? Ein Script für den Import bzw. Export der Daten habe ich bereits erstellt. Mir fehlt nur ein Script oder die eine andere Möglichkeit den Inhalt eines Speichermediums (Ordner) für den Bediener sichtbar zu machen. Verwendete Panel: Comfort TP900 viellen Dank
a-d-78 Beiträge: 56 Bewertung: (2)	Zuletzt bearbeitet von: a-d-78 am: 08.01.2015 09:38 Zuletzt bearbeitet von: a-d-78 am: 08.01.2015 09:04 Zuletzt bearbeitet von: a-d-78 am: 08.01.2015 09:03
Vorschlag Bedanken Zitat Antwort

08.01.2015 09:34	Bewerten (0)
a-d-78 Beiträge: 56 Bewertung: (2)	[code][/code] Sub VerzeichnisDurchsuchen() ' --- Deklaration der Konstanten Const Path= "F:\Kunden" ' --- Deklaration der Variablen Dim FS0, vz, Datei, Liste ' --- Error Routine - Fehlerroutine On Error Resume Next ' --- Objekt erzeugen Set FS0= CreateObject("Scripting.FileSystemObject") If Err.Number <> 0 Then ShowSystemAlarm "Error #" & CStr(Err.Number) & " " & Err.Description Err.Clear Exit Sub End If ' --- Referenz auf ein Verzeichniss holen Set vz= FS0.GetFolder(Path) If Err.Number <> 0 Then ShowSystemAlarm "Error #" & CStr(Err.Number) & " " & Err.Description Err.Clear Exit Sub End If ' --- Über alle Dateien in Verzeichniss iterieren For Each Datei In vz.Files Liste= Datei.Name ' ShowSystemAlarm Datei.Name Next SmartTags("TEXTLISTE_EINTRAG[0]")=Liste(0) SmartTags("TEXTLISTE_EINTRAG[1]")=Liste(1) SmartTags("TEXTLISTE_EINTRAG[2]")=Liste(2) SmartTags("TEXTLISTE_EINTRAG[3]")=Liste(3) SmartTags("TEXTLISTE_EINTRAG[4]")=Liste(4) SmartTags("TEXTLISTE_EINTRAG[5]")=Liste(5) SmartTags("TEXTLISTE_EINTRAG[6]")=Liste(6) SmartTags("TEXTLISTE_EINTRAG[7]")=Liste(7) SmartTags("TEXTLISTE_EINTRAG[8]")=Liste(8) SmartTags("TEXTLISTE_EINTRAG[9]")=Liste(9) SmartTags("TEXTLISTE_EINTRAG[10]")=Liste(10) End Sub [code][/code] Habe den o.g. Code versucht, Funktioniert aber leider nicht. In den Variablen wird nichts eingetragen.
a-d-78 Beiträge: 56 Bewertung: (2)
Vorschlag Bedanken Zitat Antwort

08.01.2015 10:36	Bewerten (0)
Jonny9 Bronze-Mitglied Beigetreten: 06.04.2011 Letzter Bes: 05.11.2024 Beiträge: 240 Bewertung: (25)	Ich habe zwei Scipte. Mit dem ersten werden alle csv-Dateien eingelesen und in einem Textfeld (nicht Liste) mit führenden Ziffern zur späteren Auswahl angezeigt. Ein weiteres script wird die ausgewählte Datei zurückgeben. Hierfür lese ich ebenfalls die Dateienamen und stoppe bei der Auswahl. Mit TIA hast du aber die Möglichkeit, ein Browserfenster zu öffnen. Das Script nutze ich nicht mehr, weil ich den Browser besser finde. Du findest den Browser unter "ÖffneDateiBroser" Dateianhang script.zip (149 Downloads)

Vorschlag Bedanken Zitat Antwort

08.01.2015 12:52	Bewerten (0)
Prof. Frink Platin-Experte Beigetreten: 05.07.2013 Letzter Bes: 18.11.2024 Beiträge: 3120 Bewertung: (516)	Bekommst du bei "Objekt erzeugen" keine Systemmeldung? Auf dem Panel (WinCE) musst du <FileCtl.FileSystem> statt <Scripting.FileSystemObject> verwenden.
	Pi is exactly three! All you have to do is think of things which people need but which don’t exist yet.
Vorschlag Bedanken Zitat Antwort

09.01.2015 09:41	Bewerten (0)
a-d-78 Beiträge: 56 Bewertung: (2)	Danke für die schnelle Antwort Ich finde die Funktion "ÖffneDateiBroser" nicht. Wo befindet sich diese? Oder ist es Version abhängig? Nutze zur Zeit die Version WinCC V12 SP1. Eine Frage zum Script "Lese_csv_Dateien": wie wird der Parameter "aling" verändert? Wird das Script bei jedem Scrollbefehl (Aufwärds/Abwärts) aufgerufen
a-d-78 Beiträge: 56 Bewertung: (2)	Zuletzt bearbeitet von: a-d-78 am: 09.01.2015 09:45
Vorschlag Bedanken Zitat Antwort

09.01.2015 09:42	Bewerten (0)
a-d-78 Beiträge: 56 Bewertung: (2)	Prof. Frink Bekommst du bei "Objekt erzeugen" keine Systemmeldung? Auf dem Panel (WinCE) musst du <FileCtl.FileSystem> statt <Scripting.FileSystemObject> verwenden. Habe das <Scripting.FileSystemObject> verwendet um auf dem PC Simulieren zu können
a-d-78 Beiträge: 56 Bewertung: (2)
Vorschlag Bedanken Zitat Antwort

|

Teile diese Seite:

Teile diese Seite auf...

Verwandte Themen nach Schlüsselwörtern:

TIA WinCC Adv Systemfunktionen / Skripte

Folgen Sie uns auf