استفاده از کلید برای انتخاب فایل و درج آدرس آن در فیلد

[Mehr@ban]

سلام

فکر کنم به قدر کافی توی عنوان تاپیک توضیح دادم
من میخوام برای نمایش تصویر با فرمت jpg آدرس عکس مورد نظر رو در یک فیلد ذخیره کنم و سپس با یک نمایشگر عکس یا Imag اون آدرس رو نمایش بدم

حالا میخوام کاربر با کلیک بر روی یک باتن بتونه با browser که باز میشه یا فایل خودش رو انتخاب بکنه و بعد از انتخاب اون و زدن کلید open یا insert آدرس اون فایل انتخابی توی فیلد مربوطه ثبت بشه

[Mehr@ban]

سلام مجدد

توی اکسس 2003 کد زیر جواب میداد ولی توی 2013 جواب نمیده
میشه راهنمایی کنید؟

Private Sub Browse_Click()
DoCmd.GoToControl "Picture"
DoCmd.RunCommand acCmdInsertObject
End Sub

[Mehr@ban]

سلام مجدد

توی این تاپیک (http://barnamenevis.org/showthread.php?352932-%D8%B0%D8%AE%DB%8C%D8%B1%D9%87-%D8%B9%DA%A9%D8%B3-%D8%AF%D8%B1-%D8%AC%D8%AF%D9%88%D9%84&p=1568213&viewfull=1#post1568213)یه نمونه دیدم

ولی نتونستم کد رو تفسیر کنم. از دوستان زحمت میکشن ببینم این چی بچی هست:اشتباه:


Private Sub cmdOpenImage_Click()
Dim dlg As FileDialog, strFile As String
Set dlg = Application.FileDialog(msoFileDialogFilePicker)
With dlg
.AllowMultiSelect = False
.Filters.Add "Images", "*.gif; *.jpg; *.jpeg; *.png; *.bmp", 1
.Title = "ÇäÊÎÇÈ ÝÇíá"
.InitialFileName = MyPrj("Images")
.ButtonName = "ÇäÊÎÇÈ"
If dlg.Show = True Then
txtLogoPath = .SelectedItems(1)
Me.imgLogo.Picture = txtLogoPath
cmdSaveLogo.Enabled = True
End If
End With
Set dlg = Nothing

End Sub

[saeed28541]

سلام
با کد بالا که مربوط به رفرنس Microsoft Office 11.0 Object Library هست میتونید واردهاردبشید
انتخاب چندتایی را غیرفعال میکنه .AllowMultiSelect = False

محدودیت نمایش فایلها .Filters.Add "Images", "*.gif; *.jpg; *.jpeg; *.png; *.bmp", 1

تایتل پنجره انتخاب فایل .Title = "ÇäÊÎÇÈ ÝÇíá"
نهایتا آدرس فایل داخل متغیر ذخیره میشه strFile

[Mehr@ban]

سلام
با کد بالا که مربوط به رفرنس Microsoft Office 11.0 Object Library هست میتونید واردهاردبشید
انتخاب چندتایی را غیرفعال میکنه .AllowMultiSelect = False

محدودیت نمایش فایلها .Filters.Add "Images", "*.gif; *.jpg; *.jpeg; *.png; *.bmp", 1

تایتل پنجره انتخاب فایل .Title = "ÇäÊÎÇÈ ÝÇíá"
نهایتا آدرس فایل داخل متغیر ذخیره میشه strFile

ممنونم دوست عزیز

آیا راه حل دیگه ای هم هست برای این کار؟

[saeed28541]

اگر نخواید از رفرنس استفاده کنید یک ماژلی هم تو همین سایت دیدم که کار BROWSEرا انجام میداد.
پیداش کردم براتون میزارم

[Mehr@ban]

اگر نخواید از رفرنس استفاده کنید یک ماژلی هم تو همین سایت دیدم که کار BROWSEرا انجام میداد.
پیداش کردم براتون میزارم

از لطفت خیلی ممنونم

حالا میشه مزایا و معایب استفاده از رفرنس یا ماژول رو هم بگین
که به نظر شما بهتره از کدوم یکی از این موارد استفاده کنم؟

[bemilove]

سلام
از این برنامه کمک بگیرید
http://barnamenevis.org/attachment.php?attachmentid=142487&d=1473499914

[Mehr@ban]

سلام
از این برنامه کمک بگیرید
http://barnamenevis.org/attachment.php?attachmentid=142487&d=1473499914

ازت ممنونم دوست عزیز
ولی نتونستم نمونه رو باز کنم
مشکل 32 بیت و 64 بیتی دارم
سیستم من 64 بیت هست و باز نمیشه برام

[Mehr@ban]

دوستان سلام

ما هنوز چشم انتظار راهنمایی شما هستیم ...

[mohsen1393]

سلام نمونه ای برای تبدیل ۳۲ به ۶۴ بیتی وجود داره
جستجو کنید

[Mehr@ban]

سلام نمونه ای برای تبدیل ۳۲ به ۶۴ بیتی وجود داره
جستجو کنید

با تشکر

نمونه مورد نظر رو برای تبدیل 32 بیتی به 64 بیت رو پیدا کردم
گفتم اول تشکر کنم بعد برم برای تست

اینم لینکش که دوستان استفاده کنند (http://barnamenevis.org/showthread.php?495010-%D8%AA%D8%B7%D8%A8%DB%8C%D9%82-%D8%B9%D8%A8%D8%A7%D8%B1%D8%A7%D8%AA-Declare-%D9%81%D8%A7%DB%8C%D9%84-%D9%87%D8%A7%DB%8C-%D8%A7%DA%A9%D8%B3%D8%B3-%D8%A8%D8%A7-%D8%B3%DB%8C%D8%B3%D8%AA%D9%85-%D9%88%DB%8C%D9%86%D8%AF%D9%88%D8%B2&p=2261957&viewfull=1#post2261957)