كود نقل كل الملفات من الفولدرات داخل ليست بوكس - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182) +--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183) +--- الموضوع : كود نقل كل الملفات من الفولدرات داخل ليست بوكس (/showthread.php?tid=9836) |
كود نقل كل الملفات من الفولدرات داخل ليست بوكس - mazen - 29-07-13 انا عندي مجموعة فولدرات 20 بكل فولدر عدد6 من الملفات اريد نقل كل الملفات بكل الفولدرات داخل اليست بوكس كود نقل كل الملفات من الفولدرات داخل ليست بوكس - 3booody - 29-07-13 ضع هذه الطريقة كود : Private Sub GetFiles(ByVal path As String) وعند الاستدعاء ضع الكود في زر بوتون مثلآ كود : Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click كود نقل كل الملفات من الفولدرات داخل ليست بوكس - مبرمج بلا حدود - 29-07-13 الله يجزيك الف خير بارك الله فيك إقتباس :جب أن تضع للبعض سمعات قبل إعطائها إلى 3booody مرة أخرى. كود نقل كل الملفات من الفولدرات داخل ليست بوكس - 3booody - 29-07-13 وجزاك بمثله اسأل الله ان يعطيك الصحة والعافية كود نقل كل الملفات من الفولدرات داخل ليست بوكس - mazen - 29-07-13 الكود شغال تمام بس بيجيب اسم الفولدر كامل ممكن اسم الملفات فقط يعني d:\2003\exel\2006 حاولت اضع trim ("d:\2003\exel\") بس مظبطش الكود كود نقل كل الملفات من الفولدرات داخل ليست بوكس - 3booody - 29-07-13 استبدل هذا الكود كود : ListBox1.Items.Add(files) كود : ListBox1.Items.Add(files.Split("\")(files.Split("\").Count - 1)) كود نقل كل الملفات من الفولدرات داخل ليست بوكس - سعود - 29-07-13 استخدم كود : io.path.getfilename("full path here") كود نقل كل الملفات من الفولدرات داخل ليست بوكس - mazen - 30-07-13 الكود بة مشكلة في count ListBox2.Items.Add(files.Split("\")(files.Split("\").Count - 1)) كود نقل كل الملفات من الفولدرات داخل ليست بوكس - mazen - 30-07-13 انا حاولت بالكود دة واشتغل وشكرا جدا لاخي مسعود و3booody "جزاكم اللة كل خير" (files.Replace("H:\exel", Nothing)) |