ذخیره عکس در پوشه کناری

[hossin74]

سلام من یک قطعه کد می خوام که عکس رو از OpenFileDialog بخونه و در یک پوشه ذخیره کنه
گشتم توسایت نبود
لطفا اگر کسی بلده جواب بده
من اینجوری نوشتم ارور داد:


Dim path As String = "PicKarbar\" & 1 & ".jpg"
picbox.Image.Save(path)



یکی کمک کنه.....

[A_1397]

سلام. احتمالا باید بشه با دستور copy، یه نسخه از عکس موردنظرتون رو به فولدر دیگه ای انتقال بدین. از دستور my.computer.fileSystem استفاده کنید. البته بقیه دوستان واردتر هستن، :لبخندساده:

[ROSTAM2]

سلام من یک قطعه کد می خوام که عکس رو از OpenFileDialog بخونه و در یک پوشه ذخیره کنه
گشتم توسایت نبود
لطفا اگر کسی بلده جواب بده
من اینجوری نوشتم ارور داد:


Dim path As String = "PicKarbar\" & 1 & ".jpg"
picbox.Image.Save(path)



یکی کمک کنه.....



اون عدد 1 كه نوشتيد بايد به رشته تبديل بشه:
Dim path As String = "C:\PicKarbar\1.jpg"

picbox.Image.Save(path)

اينم هست:


Dim SFD As New SaveFileDialog With {.Filter = "(*.jpg)|*.jpg"}
With SFD
If .ShowDialog(Me) = Cancel Then Exit Sub
picbox.Image.Save(.FileName)
End With


آدرس پوشه هاي پوشه والد (Parent):

اگر در كنار پوشه برنامه ژوشه اي با نام Images داشته باشيم

Dim Path As String = Application.StartupPath + "\..\Images"

[hossin74]

آقا ممنون ولی بازم ارور داد
میشه کامل بگید چیکار کنم
از اول تا آخر
برای نمایش چجوریه؟
لطف کنید بگید ممنون می شم

[ROSTAM2]

مگه قرار نبود تصوير رو ذخيره سازي كنيد يه جا ديگه پس موضوع
برای نمایش چجوریه؟ چيه؟


آقا ممنون ولی بازم ارور داد
میشه کامل بگید چیکار کنم

كجا ارور مي ده ؟ شما كه نگفتيد كه ... !

[hossin74]

مهندس حل شد ولی برای نمایش :
می خوام از گرید ویو ستون صفرشو بخونه و تو pictureBox نشون بده

picbox.ImageLocation = "../../Images/" & introw

introw شماره ستون صفر رو داره که عکس با همان نام تو فولدر ذخیره شده . ولی نشون نمیده مال من . نگاه بنداز درست نوشتم
یک سوال دیگه : برای ذخیره عکس بهتره باچی ذخیره کنم. کد کاربر؟ایم کاربر؟ چطوری همون لحظه کد کاربر رو که منحصر بفرده پیدا کنم.
دستت درد نکنه موفق باشید

[ROSTAM2]

از اين دستور استفاده كنيد:


PictureBox1.Image = Image.FromFile(Application.StartupPath + "\..\..\Images\" + DataGridView1.SelectedRows(0).Cells(0).Value.ToStr ing + ".jpg")


يا


PictureBox1.ImageLocation = Application.StartupPath + "\..\..\Images\" + DataGridView1.SelectedRows(0).Cells(0).Value.ToStr ing + ".jpg"


پوشه Images اگر در پوشه پرو‍ژه (كنار پوشه bin البته موقع Debug) باشه و تصوير با نام مد نظر كه از خانه DataGridView خونده مي شه وجود داشته باشه در PictureBox نمايش داده مي شه

[hossin74]

تشکر
جهت حذف عکس چکار کنم؟
فیلد رو حذف می کنم چطور عکس داخلپوشه رو حذف کنم
دستورش؟

[ROSTAM2]

IO.File.Delete(FilePath)