Zuviel Werbung? - > Hier kostenlos beim SPS-Forum registrieren

Seite 2 von 2 ErsteErste 12
Ergebnis 11 bis 14 von 14

Thema: SKript_Daten schreiben

  1. #11
    ka1978 ist offline Erfahrener Benutzer
    Themenstarter
    Registriert seit
    26.11.2011
    Beiträge
    139
    Danke
    26
    Erhielt 0 Danke für 0 Beiträge

    Standard


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    Hallo,

    Also mit dem Schreiben und Kopieren von Daten hat es endlich mal funktioniert. Aber das Löschen von Daten auf MMCard hat es bis jetzt nicht geklappt.

    Zum Testen , ob es an MM Card liegt , habe ich den MMC Card durch ein USB gesetzt und getestet, das Schreiben sowie Kopieren funktioniert auch. aber das

    Löschen funktionier nicht. ich habe den Skript (Löschen) angepasst und im PC getestet und es funktioniert. hat jemand einen Vorschlag?
    Code:
    --------------Skript Datei löschen -----------
    ----------------------------------------------
    ------------------Panel-----------------------
    ----------------------------------------------
    On Error Resume Next
    Dim f,fso,Datei
    Set fso = CreateObject("FileCtl.FileSystem")
    Datei="\Storage Card MMC\Test\Messungen.csv"
     If fso.Dir(Datei) <> "" Then fso.Kill Datei
     
    Set fso= Nothing
    ShowSystemAlarm "Datei gelöscht"
    
    ----------------------------------------------
    ------------------PC--------------------------
    ----------------------------------------------
    Dim fso,Datei
    
    Set fso = CreateObject("Scripting.FileSystemObject")
    Datei = "C:\Test\Messungen.csv"
     
    If fso.FileExists(Datei) Then fso.DeleteFile Datei
    
    Set fso= Nothing
    ShowSystemAlarm "Datei gelöscht"

  2. #12
    Registriert seit
    22.06.2009
    Ort
    Sassnitz
    Beiträge
    11.191
    Danke
    923
    Erhielt 3.292 Danke für 2.661 Beiträge

    Standard

    Gibt es Fehlermeldungen? (Kannst Du Systemmeldungen sehen?)
    Ist die csv-Datei vielleicht noch geöffnet? In einem anderen Skript das Close vergessen?

    Mache Dir ein Testskript, wo Du mehr sehen kannst:
    Code:
    Dim fso, Datei
    Set fso = CreateObject("FileCtl.FileSystem")
    Datei="\Storage Card MMC\Test\Messungen.csv"
    If fso.Dir(Datei) <> "" Then
      ShowSystemAlarm "Datei '" & Datei & "' vorhanden - versuche zu löschen"
      fso.Kill Datei
      ShowSystemAlarm "Datei '" & Datei & "' vermutlich gelöscht"
    Else
      ShowSystemAlarm "Datei '" & Datei & "' nicht gefunden - kann deshalb nicht löschen"
    End If
    Harald
    Es ist immer wieder überraschend, wie etwas plötzlich funktioniert, sobald man alles richtig macht.

    FAQ: Linkliste SIMATIC-Kommunikation über Ethernet

  3. Folgender Benutzer sagt Danke zu PN/DP für den nützlichen Beitrag:

    ka1978 (26.02.2014)

  4. #13
    ka1978 ist offline Erfahrener Benutzer
    Themenstarter
    Registriert seit
    26.11.2011
    Beiträge
    139
    Danke
    26
    Erhielt 0 Danke für 0 Beiträge

    Standard

    Nach ich die Taste Daten löschen betätige, wird der Skript (Löschen) aufgerufen , danach bekomme ich als meldung : Datei gelöscht.

    Der Skript "Daten schreiben" wird minutlich aufgerufen.

  5. #14
    Registriert seit
    22.06.2009
    Ort
    Sassnitz
    Beiträge
    11.191
    Danke
    923
    Erhielt 3.292 Danke für 2.661 Beiträge

    Standard


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    Das heißt ja nur, daß Dein Skript bis zur Meldungsausgabe am Ende gekommen ist. Egal ob der Kill-Befehl überhaupt aufgerufen wurde.
    Wo war nochmal Dein Problem? Das Skript meldet "Datei gelöscht" aber die Datei ist nachher immer noch da (oder schon wieder?) ?

    Da man auf einem Panel nicht wirklich debuggen kann, muß man sich halt selber an markanten Programmpunkten Testausgaben einbauen um den Programmablauf verfolgen zu können. Benutze mal das von mir vorgeschlagene Testskript. Vor allem lasse mal das "On Error Resume Next" weg.

    Harald
    Es ist immer wieder überraschend, wie etwas plötzlich funktioniert, sobald man alles richtig macht.

    FAQ: Linkliste SIMATIC-Kommunikation über Ethernet

Ähnliche Themen

  1. Antworten: 8
    Letzter Beitrag: 01.08.2013, 11:04
  2. Web2Plc- Werte über Browser schreiben in Steuerung schreiben
    Von pantau86 im Forum PC- und Netzwerktechnik
    Antworten: 3
    Letzter Beitrag: 21.03.2012, 16:23
  3. Daten in DB schreiben
    Von zloyduh im Forum Simatic
    Antworten: 4
    Letzter Beitrag: 24.01.2011, 11:20
  4. Zähler in DB schreiben
    Von Pockebrd im Forum Simatic
    Antworten: 4
    Letzter Beitrag: 02.11.2010, 15:00
  5. Variable schreiben
    Von stricky im Forum CODESYS und IEC61131
    Antworten: 15
    Letzter Beitrag: 06.02.2009, 20:27

Lesezeichen

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •