Datum Uhrzeit

[guko56]

Hallo Spezies

Wie kann ich von einer Datei auf den Windows-Rechner das Datum und die Uhrzeit der Dateierstellung auslesen.

Danke
Günter

[Klaus Major]

Hi Günter,

on mouseup
  put "/Volumes/.../einbe datei.pdf" into tPfad

  ## Den nackten Dateinamen daraus extrahieren:
  set itemdel to "/";put item -1 of tPfad into tDateiname

  ## Den Ordner daraus extrahieren
  delete item -1 of tPfad

  ## Dateien aus dem Ordner holen
  put files(tPfad,"detailed") into tDateien

  ## Dateinamen sind hier URLENCODED
  put urldecode(tDateien) into tDateien

  ## Datei aus der Liste suchen
  put lineoffset(tDateiname,tDateien) into tZeile

  ## Entsprechende Zeile aus der Liste extrahieren
  put line tZeile of tDateien into tDateiInfo

  ## item 4 herausziehen, das ist das erstellungsdatum in Sekunden
  set itemdel to ","
  put item 4 of tDateiInfo into tErstellung
  convert tErstellung from seconds to system date and system time
  answer "Datei wurde erstellt am:" && tErstellung
end mouseup

Check „files“ im Dictionary für noch mehr Infos in -> the detailed files

 

Gruß

Klaus

[guko56]

Hallo Klaus

Danke, werde ich ausprobieren.
Meine vorhergende Anfrage zu FTP hat sich geklärt.

Danke
Günter

[Klaus Major]

Danke, werde ich ausprobieren.

Hab ich, funtioniert! 😀

Meine vorhergende Anfrage zu FTP hat sich geklärt.

Ich weiß immer noch nicht, was drin steht!?

[guko56]

Hallo Klaus

Code hat natürlich top funktioniert, danke !

Mein FTP-Code ist unten zu sehen. Es war nur ein Versuch. Ich wollte von einem
Handy mit FTP auf meinen Server zugreifen. Mit PC zum Server geht dies auch ohne Probleme.
Mit Handy auf Server aber nicht ganz ohne Probleme. Es kommt vom Server keine Rückmeldung da
ich vermutlich über Handy nur in eine Richtung kommunizieren kann. Daher muß ich einen anderen Weg gehen.

local Datei
on mouseUp
–set the cursor to watch — Uhr
FÜLLDATEI

put „ftp://user:PW@HOME-SERVER/Abfrage_Server.txt“ into Serverdatei
put „123“ & Datei & CR into tText
put textdecode(tText,“UTF-8″) into url Serverdatei
wait 50 milliseconds

end mouseUp

on FÜLLDATEI
–Zeile füllen–
put „x“ into Wert
repeat with z=1 to 100
put Wert after Wertzeile
end repeat
put Wertzeile & CR into Zeile
–Datei füllen–
repeat with y=1 to 100
put Zeile after Dateiwert
end repeat
put Dateiwert into Datei
end Fülldatei

Gruß
Günter

[Klaus Major]

Aha, danke! 🙂

Und woran lag’s nun?

[guko56]

Hallo Klaus

Habe es mit einem kleinen Trick gelöst. Da beim Aufbau der FTP-Verbindung über Handy nach der
Datenübertragung die Datei nicht geschlossen wurde und die Verbindung weiterhin bestand,
wird auf Serverebene aller 50 millisec. der Dateizugriff auf die Datei geprüft und nach einer Änderung wird ein kurzer Server-Reset durchgeführt. Damit wird die Verbindung unterbrochen
und kann bei Bedarf wieder neu aufgebaut werden.

Gruß Günter

[Klaus Major]

Aha, danke!

[guko56]

Der Code funktioniert natürlich, vielen Dank dafür.
Mein FTP-Text war nur zum probieren und hat sich erledigt. Er sah so aus:

on mouseUp
set the cursor to watch — Uhr

put URL(„ftp://user:PW@HOME-SERVER/Abfrage_Server.txt“) into Serverdatei
put field „fld_feld01″ into tText
put textdecode(tText,“UTF-8“) into url Serverdatei

wait 500 milliseconds

put empty into field „lbl_Anzeige“
put URL(„ftp://user:PW@HOME-SERVER/Daten.txt“) into FTPText
put textdecode(FTPText,“UTF-8″) into Wert

If Wert<> „“ Then
put Wert into field „lbl_Anzeige“
Else
put „???“ into field „lbl_Anzeige“
end if

set the cursor to arrow — Pfeil
end mouseUp

Mit besten Grüßen
Günter

[Autor]

Beiträge