Überwachen einer Datei

[Schokoscherzkeks]

Hallo zusammen,

ich habe viel gegoggelt, aber leider nichts passendes gefunden. Hoffe ihr könnt mir weiter helfen

ich möchte mit einer Batch-Datei einen Zeitstempel in eine Textdatei, die im Netzwerk liegt, einen Zeitstempel schreiben.
Auf einem anderen PC soll diese Textdatei überwacht werden und sobald sie sich änder, soll eine Excel-Datei geöffnet werden.

Das Überwachen bekomme ich leider nicht hin.
Danke für eure Hilfe

Gruß
Andi

[mumpel]

Hallo!

Das wirst Du auch nicht hinbekommen.

Gruß, René

[Schokoscherzkeks]

Hi,

warum nicht?

in Excel würde es mit dem FSO und einer Schleife klappen, allerdings frisst es mir die ganzen Ressourcen, bzw. wird dann schwierig mit anderen Makros.

Gruß
Andi

[knobbi38]

Hallo Andi,

diese Technik wird auch oft von Anwendungen unter Linux verwendet, wenn diese lose per Batch gekoppelt werden - ist also nicht so ungewöhnlich.
Zur Überwachung eignet sich das LastModifiedDate der "Syncdatei", daß dann in gewissen Zeitabständen auf Änderung überprüft wird (Polling). Die Zeitabstände sollten aber nicht zu kurz gewählt werden und müssen auf jedenfall größer sein, als die Auflösung des Zeitstempels der Datei!
Ob Excel zur Überwachung da wirklich gut geeignet ist, mag ich bezweifeln. Das könnte man auch mit einem kleinen Konsolen-Programm in C#, PowerShell, Python oder ähnliches im Hintergrund machen und dann eine Excel-Instanz mit der entsprechenden Datei starten.

Gruß Ulrich

[Schokoscherzkeks]

Hi,

Danke für die Infos.

Leider hab ich keine Ahnung von C++ usw, aber das war auch mein Gedanke.

Kann mir da jmd helfen das zu realisieren?

Gruß
Andi

[knobbi38]

Hallo Andi,

von C++ habe ich nicht gesprochen und mit VBA Kenntnissen solltes du aoch ein kleines Konsolen-Projekt mit z.B. VB.Net selber erstellen können. Schon in der Hilfe dazu wird gezeigt, wie man das LastModifiedDate einer Datei auslesen kann.

Gruß Ulrich

[Schokoscherzkeks]

Hi,

und mit welchem Programm programmiere ich VB.net?

Sorry, ich kann nur Excel dank Google, alle andere muss ich mir dann irgendwie zusammensuchen

Gruß
Andi

[Nepumuk]

Hallo Andi,

teste mal:

Code: Alles auswählen

Option Explicit

Private Const FILE_PATH As String = "G:\Eigene Dateien\Eigene Videos\Filme\TV.txt" ' Anpassen !!!

Private ldtmNextStart As Date

Public Sub StartTimer()
    Static dtmFileDateTime As Date
    If dtmFileDateTime = 0 Then
        dtmFileDateTime = FileDateTime(FILE_PATH)
    ElseIf dtmFileDateTime < FileDateTime(FILE_PATH) Then
        dtmFileDateTime = FileDateTime(FILE_PATH)
        Call MsgBox("Datei geändert.", vbExclamation, "Hinweis")
    End If
    ldtmNextStart = Now + TimeSerial(0, 0, 5)
    Call Application.OnTime(EarliestTime:=ldtmNextStart, Procedure:="StartTimer", Schedule:=True)
End Sub

Public Sub StopTimer()
    Call Application.OnTime(EarliestTime:=ldtmNextStart, Procedure:="StartTimer", Schedule:=False)
End Sub

[knobbi38]

Hallo Andi,

Die Programmiersprache VB.NET gehört zum Dotnet-Framework von MS. Man kann das Programm mit einem Texteditor erstellen und kompilieren, aber üblicherweise nimmt man dafür Visual Studio als IDE.
Bei Rheinwerk gibt es auch ein älters Openbook Einstieg in VB2012, das vielleicht eine erste Hilfestellung sein kann.

Gruß Ulrich

[knobbi38]

@Nepumuk:
Dafür ständig eine Excel Instanz geöffnet zu halten, die möglichst auch die andere Arbeit am PC mit Excel nicht stören soll, halte ich für etwas übertrieben. Dafür reicht ein eine einfache VB.Net Consol-App, ein PS-Script oder, wenn erlaubt, ein CScript oder VBScript.

Gruß Ulrich

[Schokoscherzkeks]

@Nepumuk

Danke für deinen Vorschlag. Leider ist Excel keine Lösung, da Excel durch andere Programme geöffnet und beendet wird. Frag nicht wieso, weiß ich selbst nicht. Ist eine sehr teure Software die mit geöffnetem Excel nicht klar kommt.

Ich denke ich werde das ganze in Autohotkey lösen. Sollte ich erfolg habe, Poste ich das hier

Gruß
Andi