PDA

View Full Version : سوال: ذخیره اطلاعات در فایل تکست



ly.comeng
سه شنبه 08 اسفند 1391, 10:48 صبح
سلام دوستان عزیز
برای آموزش های مفیدتون ممنونم
من تا الان یاد گرفتم که چطور از طریق یک تکست باکس متنی رو در فایل ذخیره کنم
اما الان نیاز دارم بدونم که چطور میشه از یک view یا TABLE اطلاعاتی رو در همون فایل متنی ذخیره کرد؟
مثلا من یک فایل تکست ی باید بسازم که
شماره حساب پرسنل , مبلغ حقوق , ...
رو ذخیره کنه
و من این اطلاعات رو در view و یا جدول دارم
لطفا راهنمایی بفرمایید
تشکر

zahedi121
سه شنبه 08 اسفند 1391, 11:30 صبح
http://barnamenevis.org/showthread.php?369482-پر-کردن-دیتا-ویو-از-فایل-تکست؟


http://barnamenevis.org/showthread.php?342327-آموزش-کامل-کار-با-فایل-ها-و-فولدرها-در-VB.NET

جستجو :متفکر:

tolid123456789
سه شنبه 08 اسفند 1391, 11:33 صبح
سلام دوست عزيز
ابتدا يك ديتا گريد در فرم قرار دهيد
اطلاعات رو در ديتا گريد لود كنيد طوريكه وقتي كاربر فرم رو باز كرد درون ديتاگريد داده وجود داشته باشه
بعد كد زير رو براي رويداد كليك دكمه جهت ذخيره داده هاي داخل ديتاگريد در فايل متني وارد كنيد
Dim numCols As Integer = DataGridView1.ColumnCount
Dim numRows As Integer = DataGridView1.RowCount - 1
Dim strDestinationFile As String = "c:\\output.txt"
Dim tw As TextWriter = New StreamWriter(strDestinationFile)

'writing the header
For count As Integer = 0 To numCols - 1
tw.Write(DataGridView1.Columns(count).HeaderText)
If (count <> numCols - 1) Then
tw.Write(", ")
End If
Next
tw.WriteLine()

For count As Integer = 0 To numRows - 1
For count2 As Integer = 0 To numCols - 1
tw.Write(DataGridView1.Rows(count).Cells(count2).V alue)
If (count2 <> numCols) Then
tw.Write(", ")
End If
Next
tw.WriteLine()
Next
tw.Close()

اگر سئوالي بود در خدمتم