{"id":10510,"date":"2009-03-26T20:40:26","date_gmt":"2009-03-26T19:40:26","guid":{"rendered":"http:\/\/funrecycler.com\/?p=268"},"modified":"2009-03-26T20:40:26","modified_gmt":"2009-03-26T19:40:26","slug":"vbnet-dateinamen-auslesen-und-in-ein-array-speichern","status":"publish","type":"post","link":"https:\/\/funrecycler.com\/index.php\/2009\/03\/26\/vbnet-dateinamen-auslesen-und-in-ein-array-speichern\/","title":{"rendered":"Vb.net &#8211; Dateinamen auslesen und in ein Array speichern"},"content":{"rendered":"<p>Wenn die eigne Anwendung zum Beispiel mit Dateien arbeitet, ist es eventuell notwendig die Dateien in einen bestimmten Verzeichnis zukennen. Sind die Dateien bekannt, kann man diese direkt im Quellcode angeben. Ver\u00e4ndert sich jedoch der Verzeichnisinhalt, ist es notwendig dieses Verzeichnis aus zulesen um die darin befindlichen Dateien zu ermitteln.<br \/>\nDies l\u00e4sst sich einfach \u00fcber die <span style=\"color: #3366ff;\"><strong>Directory.GetFiles<\/strong><\/span> Funktion realisieren. <span style=\"color: #3366ff;\"><strong>Directory.GetFiles <\/strong><span style=\"color: #000000;\">gibt leider nur den kompletten Pfad in einen Array zur\u00fcck, die R\u00fcckgabe muss also mit <span style=\"color: #3366ff;\"><strong>Split<\/strong><\/span> getrennt werden um an den Dateinamen zugelangen. <span style=\"color: #3366ff;\"><strong>Split<\/strong><\/span> trennt anhand eines Zeichen, den String in ein Array auf. Wendet man Split auf eine Pfadangabe an, erh\u00e4lt man eine R\u00fcckgabearray in den sich im letzten Arrayfeld der Dateiname befindet.\u00a0 Um nun schnell den Inhalt eines Ordners in Erfahrung zubringen, b\u00fcndelt man diese Methoden in eine Funktion.<\/span><\/span><br \/>\n<!--more--><\/p>\n<pre lang=\"VB\">public function func_read_dir(sub_path as string)<\/pre>\n<p>\u00f6ffentliche Funktion erstellen:<\/p>\n<pre lang=\"VB\">Dim ary_files() As String\nDim ary_files_return() As String\nDim ary_split_filename() as String<\/pre>\n<p>3 Arrays definieren:<\/p>\n<pre lang=\"VB\">ary_files = Directory.GetFiles(sub_path)<\/pre>\n<p>Nun werden die Dateien samt Pfad in ein Array gespeichert<\/p>\n<pre lang=\"VB\">For x= 0 To ary_files.Length -1\n  ary_split_filename = split(ary_files(x), \"\\\")\n  ary_files_return(x) = ary_split_filename(ary_split_filename.Length -1)\nNext<\/pre>\n<p>In der Schleife arbeitet man die Anzahl der Dateien im Verzeichnis ab, mit Split trennet man anhand des Backslashs, anschliessend wird \u00fcber array.length das letzte feld im Array ermittelt<\/p>\n<pre lang=\"VB\">return ary_files\nEnd function<\/pre>\n<p>Array zur\u00fcckgeben und Funktion schliessen<br \/>\n<span style=\"color: #3366ff;\"><span style=\"color: #000000;\">Um die <strong><span style=\"color: #3366ff;\">Directory.GetFiles<\/span><\/strong> Methode nutzen zu k\u00f6nnen,\u00a0 muss der IO Namespace angeben werden:\u00a0 <span style=\"color: #3366ff;\"><strong>Imports System.IO<\/strong><span style=\"color: #000000;\">. <\/span><\/span><\/span><\/span><br \/>\n<span style=\"color: #3366ff;\"><span style=\"color: #000000;\"><span style=\"color: #3366ff;\"><span style=\"color: #000000;\">Aufgerufen wird die Funktion wie folgt:<\/span><\/span><\/span><\/span><\/p>\n<pre lang=\"VB\">ary_filenames = func_read_dir(path_to_dir)<\/pre>\n<p>Die gesamte Funktion:<\/p>\n<pre lang=\"VB\">public function func_read_dir(sub_path as string)\nDim ary_files() As String\nDim ary_files_return() As String\nDim ary_split_filename() as String\nary_files = Directory.GetFiles(sub_path)\nFor x= 0 To ary_files.Length -1\n  ary_split_filename = split(ary_files(x), \"\\\")\n  ary_files_return(x) = ary_split_filename(ary_split_filename.Length -1)\nNext\nreturn ary_files\nEnd function<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>Wenn die eigne Anwendung zum Beispiel mit Dateien arbeitet, ist es eventuell notwendig die Dateien in einen bestimmten<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1,27,13,14,17],"tags":[292,1073,1134,2441,2815],"class_list":["post-10510","post","type-post","status-publish","format-standard","hentry","category-allgemein","category-kniffe-und-tricks","category-politik","category-programmieren","category-technik-trends","tag-array","tag-function","tag-getfiles","tag-split","tag-vbnet"],"_links":{"self":[{"href":"https:\/\/funrecycler.com\/index.php\/wp-json\/wp\/v2\/posts\/10510","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/funrecycler.com\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/funrecycler.com\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/funrecycler.com\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/funrecycler.com\/index.php\/wp-json\/wp\/v2\/comments?post=10510"}],"version-history":[{"count":0,"href":"https:\/\/funrecycler.com\/index.php\/wp-json\/wp\/v2\/posts\/10510\/revisions"}],"wp:attachment":[{"href":"https:\/\/funrecycler.com\/index.php\/wp-json\/wp\/v2\/media?parent=10510"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/funrecycler.com\/index.php\/wp-json\/wp\/v2\/categories?post=10510"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/funrecycler.com\/index.php\/wp-json\/wp\/v2\/tags?post=10510"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}