Loadin the PATH of a file in a field

[pakiyabhai]

--

reposted again with appropriate subject

---




Ok ,

I have a small database with fields

Name | Item Code | Picture ,

now using Me![PictureImage].Properties("Picture&quot= Me![imagepath]

I am able to load , picture in PictureImage , without storing it in database,Now the problem , I have to manaually type n the path of the image in imagepath , everytime,

Is there any way by which I can create a browse button , by which I can load the path of the image directly in imagepath or atleast somewhere else , from where I can cut and paste ???


I have ONLY ONE EXTENSION .JPG nothign else to load


there's a link i found from this forum ,which I think may apply , take a look here

http://209.68.48.119/access/api/api0001.htm

---

My database is located at

http://briefcase.yahoo.com/

login - pakiyab
password - coolshit

-------

please do check it out , also I have included 3 pics for sample , u wil lhafta extract em to c:\pics for the datbase to work

thanx in adavace


thegame_ya@yahoo.com / pakiyabhai@hotmail.com

 

[chrissie1]

thread705-457897 is an echo in here Christiaan Baes
Belgium
"What a wonderfull world" - Louis armstrong

 

[pakiyabhai]

hi ,

i saved the module and got when i complied it i got an error on

msaof.strFilter = MSA_CreateFilterString _ 'File Filters

syntax error it says it is

this line , any ideaz ??

 

[BillPower]

If you are only going to be using this routine for importing jpeg's then replace the existing Function Find_File with this. Will only show jpeg's.

Function Find_File(strSearchPath) As String
Dim msaof As MSA_OPENFILENAME
msaof.strDialogTitle = "Select An Image"
msaof.strInitialDir = strSearchPath
msaof.strFilter = MSA_CreateFilterString _
("Image Files (*.jpg*;*.jpeg)", "*.jpg;*.jpeg", _
"All Files (*.*)", "*.*&quot
MSA_GetOpenFileName msaof
Find_File = Trim(msaof.strFullPathReturned)
End Function