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

Seite 3 von 4 ErsteErste 1234 LetzteLetzte
Ergebnis 21 bis 30 von 32

Thema: WinCC Flex. Daten per VBS ins Netzwerk kopieren

  1. #21
    Registriert seit
    22.08.2006
    Beiträge
    35
    Danke
    2
    Erhielt 0 Danke für 0 Beiträge

    Standard


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    Hallo,

    folgendes Skript versuche ich ans Laufen zu bekommen.

    Meldung: "The system cannot move the file."

    Wo liegt der fehler?
    Angehängte Dateien Angehängte Dateien

  2. #22
    Registriert seit
    22.03.2007
    Ort
    Detmold (im Lipperland)
    Beiträge
    11.727
    Danke
    398
    Erhielt 2.404 Danke für 2.002 Beiträge

    Standard

    Hallo,
    also erstmal hat SevenBit da ja was von FileCopy geschrieben - ich würde vom Verständnis des Sachverhalts auch erstmal dazu tendieren. Und dann ... würdest du bitte meine Frage aus Beitrag #20 beantworten ?

    Gruß
    Larry

  3. #23
    Registriert seit
    22.08.2006
    Beiträge
    35
    Danke
    2
    Erhielt 0 Danke für 0 Beiträge

    Standard

    aber gerne, der Zielordner ist bis auf eine Datei, die nicht diesen Namen hat, komplett leer.

    und es macht keinen unterschied, ob ich filecopy oder movefile nehme. es geht nicht.

  4. #24
    Registriert seit
    22.03.2007
    Ort
    Detmold (im Lipperland)
    Beiträge
    11.727
    Danke
    398
    Erhielt 2.404 Danke für 2.002 Beiträge

    Standard

    ... und was ist mit FileCopy ? Was bekommst du da für eine Meldung ?

  5. #25
    Registriert seit
    22.08.2006
    Beiträge
    35
    Danke
    2
    Erhielt 0 Danke für 0 Beiträge

    Standard

    wieder die mit der Zugriffsverweigerung.

    Habe mein skript etwas geändert

    If fs.dir(Ablageordner) <> "" Then
    ShowSystemAlarm "Ablagedatei: " & Ablagedatei

    'ShowSystemAlarm "Zieldatei: " & Zielort
    If fs.dir(Zielort) <> "" Then
    fs.kill(Zielort)
    ElseIf fs.dir(Zielort) = "" Then
    fs.mkdir(Zielort)
    fs.filecopy Ablageordner, Zielort
    End If
    End If

    der Zielordner wird erstellt. aber kopiert wird nicht. Wieder "Access is denied"

  6. #26
    Registriert seit
    22.03.2007
    Ort
    Detmold (im Lipperland)
    Beiträge
    11.727
    Danke
    398
    Erhielt 2.404 Danke für 2.002 Beiträge

    Standard

    Also dann im Einzelnen :
    Was ist der exakte Inhalt von "Ablageordner" und "Zielort" ?
    Endet Zielort mit einem "\" ?
    Beinhaltet Ablageordner den Dateinamen ganz oder teilweise ?

    Gruß
    Larry

  7. #27
    Registriert seit
    22.08.2006
    Beiträge
    35
    Danke
    2
    Erhielt 0 Danke für 0 Beiträge

    Standard

    For a = Jahr - 1 To Jahr
    For d = 0 To 365


    Dateiname = "Anlage_" & a & "_" & d
    ergibt: "Anlage_10_263"
    Ablageordner = "\Storage Card MMC\" & Dateiname
    ergibt: "\Storage Card MMC\Anlage_10_263"
    Ablagedatei = Ablageordner & "\" & Dateiname & ".csv"
    ergibt: "\Storage Card MMC\Anlage_10_263\Anlage_10_263.csv"
    Zielort = "\\Notebook23\Protokoll\" & Dateiname
    ergibt: "\\Notebook23\Protokoll\Anlage_10_263"
    Zieldatei = Zielort & "\" & Dateiname & ".csv"
    ergibt: "\\Notebook23\Protokoll\Anlage_10_263\Anlage_10_263.csv"

    If fs.dir(Ablageordner) <> "" Then
    hier überprüfe ich, ob der Quellordner (damit die Datei) vorhanden ist
    If fs.dir(Zielort) <> "" Then
    hier überprüfe ich, ob am Ziel bereits die Datei vorhanden ist
    fs.kill(Zieldatei)
    wenn ja, dann löschen
    ElseIf fs.dir(Zielort) = "" Then
    fs.mkdir(Zielort)
    wenn nein, dann Ordner erstellen
    fs.Movefile Ablagedatei, Zielort
    und dann die Datei kopieren/verschieben
    End If

    ShowSystemAlarm (Err.Description)
    End If
    Next
    Next

    Mit dem Verschieben hab ich den Vorteil, dass ich danach nicht löschen muss. Das soll später voll automatisch in der Anlage laufen. Wenn Netzwerk vorhanden und Daten senden = True, dann Datei verschieben und gut ist die Sache.

    Nur habe ich halt das Problem mit dem Zugriff.

  8. #28
    Registriert seit
    22.03.2007
    Ort
    Detmold (im Lipperland)
    Beiträge
    11.727
    Danke
    398
    Erhielt 2.404 Danke für 2.002 Beiträge

    Standard

    OK ... dann weiter ...
    das Ziel "\\Notebook_23" ist im Netzwerk zu erreichen ? - Ach ... das ist Blödsinn ... du hast ja geschrieben, dass du das Zielverzeichnis erzeugen kannst.
    Hast du volle Zugriffsrechte darauf ? Also "Read, Write, Modify, Create" etc. ?

    In deinem vorletzen Beitrag kopierst du den Ablageordner und nicht die Ablagedatei - war das ein Schreibfehler oder ist das ggf. wirklich so ? Sowohl MoveFile wie auch CopyFile wollen m.E. mit einer datei arbeiten und nicht mit einem Ordner ...

    Gruß
    Larry

  9. #29
    Registriert seit
    22.08.2006
    Beiträge
    35
    Danke
    2
    Erhielt 0 Danke für 0 Beiträge

    Standard

    Hallo,

    du hast recht, es ist mir auch aufgefallen.

    Scheinbar geht es jetzt. Ich habe es heute noch 2 oder 3 mal probiert. ich teste das morgen noch mal ausgiebig.

    Aber 1000 Dank!!!!!

    Manchmal hilft es, wenn man drüber spricht...

  10. #30
    Registriert seit
    22.08.2006
    Beiträge
    35
    Danke
    2
    Erhielt 0 Danke für 0 Beiträge

    Standard


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    Moin Larry,

    ich habe es jetzt so gemacht, dass ich die Daten auf der MMC in einen Ordner schreibe.
    Beim Senden suche ich den Ordner und schiebe die Datei auf mein Notebook.

    Jetzt brauche ich den Ornder nicht mehr. Wenn ich mit fs.kill("\Storage Card MMC\Ordner") den Ordner löschen will, dann zeigt mir das Panel an, dass der Zugriff verweigert wird.

    For A = Jahr - 1 To Jahr
    For d = 0 To 365

    Dateiname = "Anlage_" & A & "_" & d

    If Dateiname <> "Anlage_" & A & "_" & Jahrestag Then
    die akutelle datei finden und dann rest überspringen
    Ablageordner = "\Storage Card MMC\" & Dateiname
    Ablagedatei = Ablageordner & "\" & Dateiname & ".csv"
    'ShowSystemAlarm Ablagedatei
    Zieldatei = "\\Notebook23\Protokoll\"

    If fs.dir(Ablageordner) <> "" Then
    fs.MoveFile Ablagedatei, Zieldatei & Dateiname & ".csv"
    SmartTags("DB Allgemein.Letztes_Senden_Tag") = Jahrestag
    ShowSystemAlarm "Datenübertragung erfolgreich"
    'fs.kill(Ablageordner) Funzt nicht!!
    End If
    ShowSystemAlarm (Err.Description)
    End If
    Next
    Next

    vielleicht kannst du mir hier auch noch weiterhelfen

Ähnliche Themen

  1. Antworten: 0
    Letzter Beitrag: 06.01.2011, 15:44
  2. Antworten: 4
    Letzter Beitrag: 18.12.2009, 14:34
  3. S7-Simatic Netzwerk in WinCC Flex anzeigen
    Von fahrenholzsaar im Forum HMI
    Antworten: 3
    Letzter Beitrag: 24.11.2009, 08:15
  4. Antworten: 2
    Letzter Beitrag: 11.09.2008, 21:45
  5. WINCC Flex- Vorlage kopieren?
    Von knabi im Forum HMI
    Antworten: 2
    Letzter Beitrag: 24.07.2007, 10:59

Lesezeichen

Berechtigungen

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