21-05-15, 01:37 PM
اريد ان اضيف مجموعة من الملفات دفعة واحده الى ListView
على ان يظهر الاسم والمسار .. الخ
سويتها والمشكلة انه لا يقبل الا ملف واحد
على ان يظهر الاسم والمسار .. الخ
سويتها والمشكلة انه لا يقبل الا ملف واحد
21-05-15, 02:33 PM
إستخدم folderbrowserdialog
21-05-15, 06:04 PM
تفضل هاذا الكود كامل
If FolderBrowserDialog1.ShowDialog() Then
sel = FolderBrowserDialog1.SelectedPath
End If
For Each aa As String In IO.Directory.GetFiles(sel)
ListView1.Items.Add(aa)
Next
اول شي ضيف اداة FolderBrowserDialog
If FolderBrowserDialog1.ShowDialog() Then
sel = FolderBrowserDialog1.SelectedPath
End If
For Each aa As String In IO.Directory.GetFiles(sel)
ListView1.Items.Add(aa)
Next
اول شي ضيف اداة FolderBrowserDialog
21-05-15, 06:08 PM
سلام
لازم من تحديد الخاصية multiselect والملفات المتعددة تقلاها في filenames وليس في filename لاحظ يفرق حرف s
وهذا مثال بالكود
لازم من تحديد الخاصية multiselect والملفات المتعددة تقلاها في filenames وليس في filename لاحظ يفرق حرف s
وهذا مثال بالكود
كود :
Dim op As New OpenFileDialog
op.Filter = "Images (*.jpg,*.png)|*.jpg;*.png"
op.Multiselect = True
If op.ShowDialog = vbOK Then
For Each f As String In op.FileNames
MsgBox(f)
Next
End If
op.Dispose()22-05-15, 11:22 AM
اشكركم على المرور
وبخصوص لازم من تحديد الخاصية multiselect و filenames جاهزة انا سويتها في الجريد فيوا وشغاله ما في اي مشكلة ولكن حين حاولت اجعلها على ليست فيو ظهارات المشاكل راح اجربها او ارفق لك المثال .
وجمعتكم مباركة .
وبخصوص لازم من تحديد الخاصية multiselect و filenames جاهزة انا سويتها في الجريد فيوا وشغاله ما في اي مشكلة ولكن حين حاولت اجعلها على ليست فيو ظهارات المشاكل راح اجربها او ارفق لك المثال .
وجمعتكم مباركة .