منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
سؤال في اداة ال SaveFileDialoge - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : سؤال في اداة ال SaveFileDialoge (/showthread.php?tid=32327)



سؤال في اداة ال SaveFileDialoge - Emam emam - 03-12-19

السلام عليكم اخوتي الكرام
عندي داتا جريد فيو
واريد عند الضغط علي صف معين يظهرلي ال SaveFileDialoge فيقوم المستخدم باختيار مكان معين لحفظ الملف فيه ووضع اسم الملف
معالعلم ان اسم الملف هو العمود الاول من الداتا فيو
الي هنا لا توجد مشاكل
ولكن السؤال هو :
عند ظهور ال  SaveFileDialoge   اريد ان يظهر اسم العمود الاول من الداتا جريد فيو في ال File name بتاع SaveFileDialoge 
يعني اسم الملف يكون مكتوب جاهز


RE: سؤال في اداة ال SaveFileDialoge - معاند الحظ - 03-12-19

(03-12-19, 03:24 AM)Emam emam كتب : السلام عليكم اخوتي الكرام
عندي داتا جريد فيو
واريد عند الضغط علي صف معين يظهرلي ال SaveFileDialoge فيقوم المستخدم باختيار مكان معين لحفظ الملف فيه ووضع اسم الملف
معالعلم ان اسم الملف هو العمود الاول من الداتا فيو
الي هنا لا توجد مشاكل
ولكن السؤال هو :
عند ظهور ال  SaveFileDialoge   اريد ان يظهر اسم العمود الاول من الداتا جريد فيو في ال File name بتاع SaveFileDialoge 
يعني اسم الملف يكون مكتوب جاهز

نفس الصنف SaveFileDialog يحتوي خاصية هي FileName قم بتعديل قيمتها قبل ان تفتح الـSaveFileDialog 
كود :
SaveFileDialog.FileName="The name you want"



RE: سؤال في اداة ال SaveFileDialoge - malek369 - 03-12-19

Dim saveTo As New SaveFileDialog
saveTo.Filter = "Text files (*.txt)|*.txt "


If saveTo.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim W As IO.StreamWriter
Dim i As Integer
W = New IO.StreamWriter(saveTo.FileName, True)

For i = 0 To ListBox2.Items.Count - 1
W.WriteLine(ListBox2.Items.Item(i))
Next
W.Close()
End If
MessageBox.Show("all saved!")


RE: سؤال في اداة ال SaveFileDialoge - Emam emam - 04-12-19

(03-12-19, 05:15 AM)معاند الحظ كتب :
(03-12-19, 03:24 AM)Emam emam كتب : السلام عليكم اخوتي الكرام
عندي داتا جريد فيو
واريد عند الضغط علي صف معين يظهرلي ال SaveFileDialoge فيقوم المستخدم باختيار مكان معين لحفظ الملف فيه ووضع اسم الملف
معالعلم ان اسم الملف هو العمود الاول من الداتا فيو
الي هنا لا توجد مشاكل
ولكن السؤال هو :
عند ظهور ال  SaveFileDialoge   اريد ان يظهر اسم العمود الاول من الداتا جريد فيو في ال File name بتاع SaveFileDialoge 
يعني اسم الملف يكون مكتوب جاهز

نفس الصنف SaveFileDialog يحتوي خاصية هي FileName قم بتعديل قيمتها قبل ان تفتح الـSaveFileDialog 
كود :
SaveFileDialog.FileName="The name you want"
الف مليون شكر اخي
جزاك الله خيرا
فعلا اشتغلت كويس  معايا

(03-12-19, 07:19 AM)malek369 كتب : Dim saveTo As New SaveFileDialog
       saveTo.Filter = "Text files (*.txt)|*.txt "


       If saveTo.ShowDialog = Windows.Forms.DialogResult.OK Then
           Dim W As IO.StreamWriter
           Dim i As Integer
           W = New IO.StreamWriter(saveTo.FileName, True)

           For i = 0 To ListBox2.Items.Count - 1
               W.WriteLine(ListBox2.Items.Item(i))
           Next
           W.Close()
       End If
       MessageBox.Show("all saved!")

اشكرك اخي شكرا كثيرا علي اهتمامك
وبارك الله فيك