{"id":1044,"date":"2015-01-21T13:40:46","date_gmt":"2015-01-21T12:40:46","guid":{"rendered":"http:\/\/www.symablog.de\/blog\/?p=1044"},"modified":"2015-01-21T17:50:37","modified_gmt":"2015-01-21T16:50:37","slug":"vbscript-letztes-element-in-einem-string-array","status":"publish","type":"post","link":"https:\/\/www.symablog.de\/blog\/vbscript-letztes-element-in-einem-string-array\/","title":{"rendered":"VBScript &#8211; letztes Element in einem String-Array"},"content":{"rendered":"<p>Beispiel: Es soll aus einem absoluten Pfad der Dateiname herausgeschnitten werden.<br \/>\nDiese Anforderung stellt sich oft bei der Verwendung von <strong>object.Files<\/strong> .<br \/>\nEs liefert meist etwas wie &#8222;C:\\Dir1\\Dir2\\Dir3\\Dateiname.Ext&#8220; .<br \/>\nWie kann man aus diesem String den Dateinamen herausschneiden?<br \/>\na) <b>Split<\/b> den String an &#8222;\\&#8220; in ein Array<br \/>\nb) ermittle das letzte Element des Array mit der Funktion <b>UBound<\/b><\/p>\n<pre lang=\"VB\" line=\"1\">Set objFolder = objFSO.GetFolder(\"C:\\Dir1\\Dir2\\Dir3\")\r\nFor Each absFilePath in objFolder.Files\r\n arrFile = split(absFilePath,\"\\\")\r\n FileName = arrFile(UBound(arrFile))\r\nNext\r\n<\/pre>\n<p>liefert aus &#8222;C:\\Dir1\\Dir2\\Dir3\\Dateiname.Ext&#8220; -&gt; &#8222;Dateiname.Ext&#8220;<\/p>\n<p>&nbsp;<\/p>\n<div id=\"attachment_539\" style=\"width: 810px\" class=\"wp-caption aligncenter\"><img loading=\"lazy\" decoding=\"async\" aria-describedby=\"caption-attachment-539\" class=\"wp-image-539 size-full\" src=\"http:\/\/www.symablog.de\/blog\/wp-content\/uploads\/Schneetreiben1.jpg\" alt=\"Schneetreiben1\" width=\"800\" height=\"600\" srcset=\"https:\/\/www.symablog.de\/blog\/wp-content\/uploads\/Schneetreiben1.jpg 800w, https:\/\/www.symablog.de\/blog\/wp-content\/uploads\/Schneetreiben1-400x300.jpg 400w\" sizes=\"(max-width: 800px) 100vw, 800px\" \/><p id=\"caption-attachment-539\" class=\"wp-caption-text\">Schneetreiben &#8211; Arbeit am Gleis in D\u00fcsseldorf-Derendorf<\/p><\/div>\n<p>&nbsp;<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Beispiel: Es soll aus einem absoluten Pfad der Dateiname herausgeschnitten werden. Diese Anforderung stellt sich oft bei der Verwendung von object.Files . Es liefert meist etwas wie &#8222;C:\\Dir1\\Dir2\\Dir3\\Dateiname.Ext&#8220; . Wie kann man aus diesem String den Dateinamen herausschneiden? a) Split &hellip; <a class=\"more-link\" href=\"https:\/\/www.symablog.de\/blog\/vbscript-letztes-element-in-einem-string-array\/\">Weiterlesen <span class=\"meta-nav\">&rarr;<\/span><\/a><\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"jetpack_post_was_ever_published":false,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":true,"jetpack_social_options":{"image_generator_settings":{"template":"highway","enabled":false}}},"categories":[78,184],"tags":[183,186,182,185,181],"class_list":["post-1044","post","type-post","status-publish","format-standard","hentry","category-praxis","category-vbscript","tag-letztes-element","tag-split","tag-string-array","tag-ubound","tag-vbscript"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/p37Rzq-gQ","_links":{"self":[{"href":"https:\/\/www.symablog.de\/blog\/wp-json\/wp\/v2\/posts\/1044"}],"collection":[{"href":"https:\/\/www.symablog.de\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.symablog.de\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.symablog.de\/blog\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.symablog.de\/blog\/wp-json\/wp\/v2\/comments?post=1044"}],"version-history":[{"count":7,"href":"https:\/\/www.symablog.de\/blog\/wp-json\/wp\/v2\/posts\/1044\/revisions"}],"predecessor-version":[{"id":1051,"href":"https:\/\/www.symablog.de\/blog\/wp-json\/wp\/v2\/posts\/1044\/revisions\/1051"}],"wp:attachment":[{"href":"https:\/\/www.symablog.de\/blog\/wp-json\/wp\/v2\/media?parent=1044"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.symablog.de\/blog\/wp-json\/wp\/v2\/categories?post=1044"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.symablog.de\/blog\/wp-json\/wp\/v2\/tags?post=1044"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}