30-11-22, 12:18 AM
(28-11-22, 04:26 PM)احمد كبه كتب : السلام عليكم الاخوة الاعزاء لدي سؤال مهم بخصوص اداة الداتا كريد فيو ارجو من حضراتكم ان استطعتم ابداء المساعدةو عليكم السلام و رحمة الله و بركاته
سؤالي هو كالتالي::::
لدي قاعدة بيانات تحتوي ع 1000 سجل ...
وكذلك لدي فولدر يحتوي ع 1000 ملف pdf في مسار معين
اريد عند الضغط ع الخلية الاولى .. تفتح الملف الاول
و عند الضغط ع الخلية الثانية.. تفتح الملف الثاني
اريد عند الضغط ع الخلية الثالثة.. تفتح الملف الثالث .... وهكذا
علما اني استعملت الكود التالي لكن مشكلة الكود عند الضغط ع الخلية الاولى .. سوف يفتح جميع الملفات التي في الفولدر مرة واحدة
Private Sub DGV_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles DGV.CellClickDim dd As String() = Directory.GetFiles(path)For Each f As String In ddSystem.Diagnostics.Process.Start(f)
Next
End Sub
اتمنى من حضراتكم حل المشكلة لو سمحتم
اليك بمثال مبسط و ظفه حسب المعطيات لديك
PHP كود :
Imports System.IO
Public Class Form1
Dim Path = "D:\test"
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim fileFullNames() As String = Directory.GetFiles(Path)
For Each file As String In Directory.GetFiles(Path, "*.pdf*")
DataGridView1.Rows.Add(file)
Next
End Sub
Private Sub DataGridView1_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellClick
System.Diagnostics.Process.Start(DataGridView1.CurrentCell.Value)
End Sub
End Class

