XProfan

Deutsch

Peter
Mallow

Hi,
wie kann man mit Profan prüfen, ob eine Datei gerade verwendet wird.

Ich möchte z.B. eine Datei kopieren mit dem Copy-Befehl. Wenn aber die Datei gerade von einem anderen Programm verwendet wird oder das Programm geöffnet ist, kommt eine Fehlermeldung.
Das möchte ich umgehen.

Gruß
Peter

WinXP Pro SP2, XProfan 9 + XPSE
AMD Athlon 64 X2 3800

17.11.2007 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Eine Datei lesen geht auch dann wenn die Datei bereits von anderen Anwendungen zum lesen geöffnet ist, eine Datei lesen geht dann nur nicht wenn diese bereits zum schreiben geöffnet ist. In ioresult

steht, nach openrw

einer Datei, ob sich diese hat zum Lesen öffnen lassen. Der Copy nutzt Dir hier also nichts, kopiere manuell per Blockread

/write.

17.11.2007 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Peter
Mallow

Sorry, ich habe mich etwas ungenau ausgedrückt, aber trotzdem danke, für deine schnelle Antwort.

Das Programm soll eine dateiA.exe nach dateiB.exe kopieren. Problem: Wenn dateiB.exe geöffnet ist, stürzt das Programm mit einer Fehlermeldung ab, da eine Datei nicht kopiert werden kann, wenn die Zieldatei ausgeführt wird.

Ich möchte jetzt nur prüfen, ob dateiB.exe ausgeführt wird. Wenn ja, soll das Programm mit der Meldung Programm kann nicht ausgeführt werden. Bitte beenden sie zuerst dateiB.exe abgebrochen werden.
Falls nein, soll das Programm weiterarbeiten.

Ich suche jetzt eine Möglichkeit, mit der ich diese Überprüfung machen kann.

WinXP Pro SP2, XProfan 9 + XPSE
AMD Athlon 64 X2 3800

17.11.2007 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Ob es sich um eine Exe oder sonst eine Datei handelt spielt keine Rolle. Eine ausgeführte Exe ist imho normalerweise lesbar. Um zu prüfen ob lesbar lese ioresult nach assign und openrw aus. Ob eine exe jedoch grade ausgeführt wird ist kaum direkt messbar, sei denn Du kannst die ausgeführte Exe selbst programmieren sodass diese auf mögliche Anfragen antwortet. Das jedoch ist das Thema von Prozesskommunikation und nicht lesen von geöffneten Dateien bzw. Prüfen, ob Datei gerade verwendet wird.

17.11.2007 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Peter
Mallow

Okay, Danke. Funktioniert jetzt:
Kompilieren Markieren Separieren

Assign #1,utorrent.exe
OpenRW #1

if %IOResult > 0

    @MessageBox(Bitte zuerst uTorrent beenden!,uTorrent Version-Changer,64)
    end

endif

Close #1

WinXP Pro SP2, XProfan 9 + XPSE
AMD Athlon 64 X2 3800

17.11.2007 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Überarbeitet:
Kompilieren Markieren Separieren

nul(%ioresult)
var f&=assign(utorrent.exe)
openrw #f&
var r%=%ioresult
close #f&
assign #f&,

if r%

    MessageBox(Bitte zuerst uTorrent beenden!,uTorrent Version-Changer,64)
    end

endif

proc nul

    parameters p%
    return p%

endproc