منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
لوسمحتو اريد كود لتنزيل ملف يكون به شي معين - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=17569)

لوسمحتو اريد كود لتنزيل ملف يكون به شي معين - ddemed - 06-10-16

السلام عليكم 
اريد عند النق علي زر button 1 يقوم بتنزيل ملف بصيغه ini
به تايخ النقر علي الزر واي شي اخر اريد ان يكون به

RE: لوسمحتو اريد كود لتنزيل ملف يكون به شي معين - silverlight - 06-10-16

ماذا تقصد بكلمة تنزيل ؟

هل تريد تنزيل الملف من علي موفع معين أو تريد إنشاء ملف في مكان معين و ذلك عند الضغط علي الباتون

رجاء التوضيح قليلا .....

RE: لوسمحتو اريد كود لتنزيل ملف يكون به شي معين - ddemed - 06-10-16

(06-10-16, 09:07 PM)silverlight كتب : ماذا تقصد بكلمة تنزيل ؟

ها تريد تنزيل الملف من علي موفع معين" أو تريد إنشاء ملف في مكان معين و ذلك عند الضغط علي الباتون

رجاء التوضيح قليلا .....

انشاء ملف

RE: لوسمحتو اريد كود لتنزيل ملف يكون به شي معين - silverlight - 06-10-16

يمكنك ان تستخدم الروتين التالي

PHP كود :
   Private Sub WritetValue(value As String, fileName As String)
        Dim action As Action(Of System.IO.BinaryWriter, String) = (Sub(writer As System.IO.BinaryWriter, s As String)
                                                                       Using writer
                                                                           writer.Write(s)
                                                                       End Using
                                                                   End Sub)


        action(New System.IO.BinaryWriter(System.IO.File.Open(fileName, System.IO.FileMode.Create)), value)
    End Sub 



في الحدث Click الخاص ب الباتون يمكنك أن تكتب الكود التالي
هنا انا حددت مكان الملف ليكون علي فهرس المشروع.....أيضا حددت اسم الملف
يمكنك بالتأكيد ان تتلاعب بهذه البيانات و تحدد مكان الملف و اسمه كيفما تريد

PHP كود :
       Dim stringtoWrite As String = "Any String"
        Dim filelocation As String = ".\Data.dat"

        WritetValue(stringtoWrite, filelocation) 


RE: لوسمحتو اريد كود لتنزيل ملف يكون به شي معين - ddemed - 06-10-16

شكرا جزيلا اخر سوال لوسمحت اريد كود يقرا مابداخله

RE: لوسمحتو اريد كود لتنزيل ملف يكون به شي معين - silverlight - 06-10-16

PHP كود :
       Dim filePath As String = ".\Data.dat"
        ' نقرأ جميع السطور 
        Dim values As String() = New Lazy(Of String())(Function() System.IO.File.ReadAllLines(filePath)).Value
        '  هنا تقرأ السطر الأول فقط
        Dim s As String = values(1)