https://forge.codesys.com/forge/talk/Deutsch/thread/cf91deb2da/2020-02-28T09:19:13.267000ZRecent posts to Filesystem2020-02-28T09:19:13.267000Z2020-02-28T09:19:13.267000ZErik Böhmhttps://forge.codesys.com/u/erik-boehm/https://forge.codesys.comaf77d62ebfa58a9c7b8aa429cd4016e198b93457

<div class="markdown_content"><p>Mahlzeit</p> <p>Da würde ich jetzt mal vorschlagen die CoDeSys Hilfe zu benutzen.</p> <p>Da wird das ausführlich erklärt.</p> <p>Gruss</p> <p>Erik</p></div>

2020-02-28T09:19:06.598000Z2020-02-28T09:19:06.598000ZKaihttps://forge.codesys.com/u/kai/https://forge.codesys.comcc54c133c2e7d5c9f43cc94f0ac8459f48d712ad

<div class="markdown_content"><p>tja, bei mir funktioniert es leider nicht. die while-schleife läuft schon so oft durch wie dateien im ordner vorhanden sind, aber die dateinamen werden nicht ausgelesen bzw. die variable "strTemp" ist immer leer.</p> <p>was, ausser null, kann ich denn eigentlich auf die 3. eingangsvariable "pDirInfo" von "SysDirRead" schreiben?</p></div>

2020-02-28T09:19:04.084000Z2020-02-28T09:19:04.084000ZErik Böhmhttps://forge.codesys.com/u/erik-boehm/https://forge.codesys.comff1ba5ab8fc305a217294b99f05824d4e520b133

<div class="markdown_content"><p>Mahlzeit</p> <p>Bei mir sieht das so aus:</p> <p>dwDirHandle := SysDirOpen(strPrgPath);</p> <p>FOR i:=1 TO 100 BY 1 DO</p> <div class="codehilite"><pre><span></span><span class="n">strDirEntry</span><span class="o">[</span><span class="n">i</span><span class="o">]</span><span class="w"> </span><span class="err">:</span><span class="o">=</span><span class="w"> </span><span class="s1">''</span><span class="p">;</span><span class="w"></span> </pre></div> <p>END_FOR</p> <p>i := 0;</p> <p>WHILE SysDirRead(hDir:=dwDirHandle,strTemp,0) &lt;&gt; 0 DO</p> <div class="codehilite"><pre><span></span><span class="nv">strExt</span> :<span class="o">=</span> <span class="nv">RIGHT</span><span class="ss">(</span><span class="nv">strTemp</span>,<span class="mi">4</span><span class="ss">)</span><span class="c1">;</span> <span class="k">IF</span> <span class="nv">strExt</span> <span class="o">=</span> <span class="s1">'</span><span class="s">.txt</span><span class="s1">'</span> <span class="nv">OR</span> <span class="nv">strExt</span> <span class="o">=</span> <span class="s1">'</span><span class="s">.din</span><span class="s1">'</span> <span class="nv">OR</span> <span class="nv">strExt</span> <span class="o">=</span> <span class="s1">'</span><span class="s">.DIN</span><span class="s1">'</span> <span class="k">THEN</span> <span class="nv">i</span> :<span class="o">=</span> <span class="nv">i</span><span class="o">+</span><span class="mi">1</span><span class="c1">;</span> <span class="nv">strDirEntry</span>[<span class="nv">i</span>] :<span class="o">=</span> <span class="nv">strTemp</span><span class="c1">;</span> <span class="nv">END_IF</span> </pre></div> <p>END_WHILE</p> <p>Das funktioniert auf einer RTE wunderbar.</p> <p>Gruss Erik</p></div>

2020-02-28T09:18:57.212000Z2020-02-28T09:18:57.212000ZKaihttps://forge.codesys.com/u/kai/https://forge.codesys.com063e971d3ffcffe1b851478e0acc487399364a25

<div class="markdown_content"><p>also aus der hilfe-datei werd ich, ehrlich gesagt nicht schlau.</p> <p>hier ist mal ein Bsp von mir, wie ich es versucht habe:</p> <p>VAR</p> <p>Dir_Handle : DWORD;</p> <p>eintraege : ARRAY <span>[1..5]</span> OF STRING;</p> <p>out : UDINT;</p> <p>i: INT;</p> <p>strTemp: STRING;</p> <p>END_VAR</p> <hr/> <p>Dir_Handle := SysDirOpen('A:\PLC\DATEN');</p> <p>i := 0;</p> <p>out := 1;</p> <p>WHILE out &lt;&gt; 0 DO</p> <p>out := SysDirRead(Dir_Handle , strTemp , 0)</p> <p>i := i+1;</p> <p>eintraege<span>[i]</span> := strTemp;</p> <p>END_WHILE </p> <p>Der Ordner wird zwar geöffnet, die Dateinamen im Ordner werden aber nicht ausgelesen.</p> <p>Hat vielleicht jemand ne Idee, was ich falsch mache?</p></div>

2020-02-28T09:18:54.807000Z2020-02-28T09:18:54.807000ZOberchefehttps://forge.codesys.com/u/oberchefe/https://forge.codesys.com5b6b3a860d5518ef6d75ed1f4a1f17b8044639de

<div class="markdown_content"><p>Hilfe:</p> <p>C:\Programme\WAGO Software\CoDeSys V2.3\Help\German\SysLibDir.chm</p> <p>Sollte also nach dem Schema ablaufen:</p> <div class="codehilite"><pre><span></span><span class="nt">MeineVariable</span><span class="o">:=</span><span class="nt">SysDirOpen</span><span class="o">(</span><span class="s2">"Pfadname"</span><span class="o">);</span> <span class="nt">CheckObNochWasZuLesen</span><span class="o">:=</span><span class="nt">SysDirRead</span><span class="o">(</span><span class="nt">MeineVariable</span><span class="o">,</span><span class="nt">Ergebnisstring</span><span class="o">,</span><span class="nt">PointerAufEintrag</span><span class="o">);</span> </pre></div> <p>Die zweite Zeile wird solange wiederholt bis "CheckObNochWasZuLesen" Null wird.</p></div>

2020-02-28T09:18:47.935000Z2020-02-28T09:18:47.935000ZKaihttps://forge.codesys.com/u/kai/https://forge.codesys.comf6618472b7497c91b32ea044ef1202306aede6c7

<div class="markdown_content"><p>mein zweites problem hat sich erledigt... habs hinbekommen. wenn man den kompletten pfad+dateinamen angibt, dann ist das kopieren ganz einfach.</p> <p>aber bei der anwendung der SysLibDir.lib (funktion SysDirRead) hab ich probleme. </p> <p>Gibts dafür irgendwo programmierbeispiele?</p></div>

2020-02-28T09:18:45.154000Z2020-02-28T09:18:45.154000ZOberchefehttps://forge.codesys.com/u/oberchefe/https://forge.codesys.com10f6b0572972975027750e31c60768f6a3216e00

<div class="markdown_content"><p>Für's erste Problem mußt Du Dir warscheinlich was mit der SysLibDir.lib basteln.</p></div>

2020-02-28T09:18:38.074000Z2020-02-28T09:18:38.074000ZKaihttps://forge.codesys.com/u/kai/https://forge.codesys.comeb366e144373d6e315c68de38ce5be651b2d36e8

<div class="markdown_content"><p>hallo</p> <p>ich arbeite zur Zeit mit dem Wago 750-841. ich suche momentan nach einer Lösung dafür, wie ich im Programm die verbleibende Größe meines Filesystems ermitteln kann, um angelegte Protokolldateien gegebenenfalls</p> <p>wieder zu löschen, wenn sich der Speicherplatz dem Ende neigt. </p> <p>Gibt es dafür eine Bilbliothek?</p> <p>Desweiteren würde mich interessieren, ob/wie ich Dateien innerhalb des Filesystems von einem Ordner in einen anderen Ordner verschieben bzw. kopieren kann?</p> <p>Würde mich sehr über eure Hilfe freuen,</p> <p>MfG Kai</p></div>