سلام. کد نمیخوام،راهنمایی میخوام.
میخوام مثلاً اسم یه سری اشخاص رو وارد دیتابیس اکسس vb کنم،بعد عکس هر شخص رو بتونم به برنامه معرفی کنم که آدرسش توی دیتابیس ذخیره بشه و هربار که مشخصات شخص رو باز کردم عکس رو هم نشون بده.
Printable View
سلام. کد نمیخوام،راهنمایی میخوام.
میخوام مثلاً اسم یه سری اشخاص رو وارد دیتابیس اکسس vb کنم،بعد عکس هر شخص رو بتونم به برنامه معرفی کنم که آدرسش توی دیتابیس ذخیره بشه و هربار که مشخصات شخص رو باز کردم عکس رو هم نشون بده.
خوب آدرسشو توی یکی از فیلدهای دیتابیس دخیره کن بعد وقتی مشخصات افرادو میاری یک کنترل Image بزار و ادرسشو از توی دیتابیس به مشخصه Picture بده.
دقیقاً میخوام همینکارو کنم:31:نقل قول:
منتها میخوام یه کادر open باز بشه،باهاش محل عکس رو پیدا کنم و دیتا بیس خودش مسیر رو بشناسه و ذخیره کنه.
درست مثل سایتهای آپلود عکس که browse میکنیم و مسیر عکس رو پیدا میکنیم.
Private Dlg_Open As OpenFileDialog = New OpenFileDialog()
Private Dlg_Open.InitialDirectory = "C:\YourPictureFolder"
If Dlg_Open.ShowDialog() = DialogResult.OK Then
[make and execute your insert query.... Dlg_Open.FileName....]
End If
سلام دوست عزیز برای این کار باید از کنترل CommonDialog استفاده کنی که این کنترل رو خود بیسیک داره فقط باید add کنی.امیدوارم منظورتون همین باشه اگه کمک خواستین بگید تا رهنمایی کنم:46:
ممنون.ولی فکر کنم این فقط واسه کادر Open file هستش؟آره؟نقل قول:
با چه کدی میشه همین مسیر رو توی یه فیلد ذخیره کرد؟
:11:
میشه بیشتر توضیح بدید؟نقل قول:
آره تکه برنامه فوق ديالوگ رو باز ميکنه و پس از browse و زدن OK در ديالوگ، بايد دستورات درج در ديتابيس رو که من داخل [براکت] بصورت توضيحي نوشته بودم، بنويسي. چون از طراحي و نوع ديتابيس شما اطلاعي نداشتم کلي واست نوشته بودم.نقل قول:
با فرض استفاده از ديتابيس اکسس، کد داخل براکت ميتونه کدهايي شبيه زير باشه:
myCon = New OleDbConnection("Your Connection String")
myCon.Open()
SqlStr = "INSERT INTO MyTbl VALUES(""" & Dlg_Open.FileName & """)"
Command = New OleDbCommand(SqlStr, myCon)
cmd.ExecuteNonQuery
myCon.Close
ممنون.تست میکنم:11: