Hello,
Although, I have seen many threads in regards to displaying images in forms, I have not been able to find exactly what I'm looking for.
The solution I am looking for is to give the user the ability to browse for an image, select it and insert it into the form. From reading these forums and playing around with Access, one thign I am sure about is that I want to link the image (I couldn't believe how bloated access gets when embedding an image).
I thought of a great solution for linking images, but I have no idea how to achieve this. (This solution, in my opinion would be great not just for images, but for all kind of objects).
Since I am linking the image, I would like to be able to store the image in a "private database" folder, that way the image will not be tempered with. It is my understanding that if I wanted to do that, I would have to first place the images in that folder and then actualy insert them into the form. This seems kind of pointless to me, since it will create extra work for the user.
So basically what I would like to do in pseudo code is:
On Click, browse for image
on image select, save image to \database image folder
link image to \data image folder
display image in form
I think this would work really well for all kinds of document management (not just images) allowing the users to attach pdfs/images/documents to records with out worrying where they are stored, and knowing they will not be tempered with (I'm planning to place the folder somewhere on the server)]
Any ways, any help woudl be greatly appreciated, and if I do manage to come up with a solution on my own, I will be sure to post it here.
i have database with products and i want to add a picture for each one In the table of products i have a field "Image path" D:dun.jpeg how can i insert this text-path from the form and not manually from table? for example :with a button ADD IMAGE from the form and browse file.......
I have a access table with a OLE Object field that is storing a small signature .bmp image. I have a form that loads that image into a bound object frame. I made a command button that lets you choose a new .bmp image and it then loads the new image into the bound object frame. I am them doing update query on a save button that then save the new image into the table. The form works great. You can pick any .bmp and it shows up good in the bound object frame. When I click the save button and it runs the update query it run it 8 of 10 times fine. Problem is when it does run it the images gets inserted into the table and its destorted. Like its all static or have of the image turns black. Sometime when I run the same update query with out any code changes I get a access error that shuts down access or it inserts the image into the table and when you click on the cell to view it, it says the OLE data is not valid.
So Im not sure if the method Im using is ok or if there is a better way. I do need to store these images in the table tho. Below is the code im using.
code that loads new image picked into bound object frame Code: Dim MyFolder As String Dim MyExt As String Dim MyPath As String Dim MyFile As String Dim strCriteria As String MyPath = vrtSelectedItem'vrtSelectedItem is the path to the image from the file picker Me.OLE_Sig.Enabled = True Me.OLE_Sig.Locked = False OLEPath = MyPath Me.OLE_Sig.OLETypeAllowed = acOLEEmbedded Me.OLE_Sig.SourceDoc = OLEPath Me.OLE_Sig.Action = acOLECreateEmbed Me.button_load_sig.SetFocus Me.OLE_Sig.Enabled = False Me.OLE_Sig.Locked = True
Then I run this for the save command Code:DoCmd.SetWarnings FalseDoCmd.OpenQuery "qry_user_edit_update"DoCmd.SetWarnings True
This is the query to save the image. Code:UPDATE tbl_Users SET tbl_Users.Signer_Sig = [forms]![frm_admin_users_edit]![OLE_Sig]WHERE (((tbl_Users.User_ID)=[forms]![frm_admin_users_edit]![field_userid_info]));
Any help would be great.... Been trying everything and no luck.
I have database where users can produce a quote. Each new quote gets a quote number, when users add a item to the quote, they also add a DHR (daily hire rate) The table records the item and adds the quote and the DHR.
I want to run a query so it shows the quote number and adds all the DHR's for that quote. Can this be done in a query as an expression.
An individual posted a new thread today (3/14/08) (believe it was in the General Section) asking for a help with a UDF that wouldn't process. He received one response, then I came in with another response which I later edited to include more info. Saved it, checked back to ensure it was what I wanted -- it was.
Closed the browser, shut down the computer. When I later reopened this site, the thread was missing entirely. Did a search on my recent posts -- it's not there.
hello once again, i'm using this code to go to a certain record in a table:
Dim strRecord As String strRecord = Me.List26.Value DoCmd.GoToRecord acActiveDataObject, "Stopwatch", acGoTo, strRecord
the problem with this code is that it goes to the record number, not the id.... how can I tell it to go to the record it (primary key) instead of the absolute position number of that record?
I have a form that I would like to update a picture on using VBA. The source of the picture path is in part a query that is not bound to the form. So far I have the following code that is pretty much working, but with a couple flaws.
Code: Private Sub Form_Current() LoadDefaultPicture End Sub Sub LoadDefaultPicture() Dim db As DAO.Database
[Code] ....
This is working. However, when I change the record the picture flashes the current picture once and then loads the new picture. It is like it reloads the current picture then loads the new one. I'm hoping there is a way to get rid of the flash.
Also, the code fails here: strDefaultPictureName = rs.Fields("AttachmentName")
When the query does not return a record. I can definitely fix this by adding an if statement to check for a record, but I'm kind of perplexed at why it is failing at that line. I would expect it to assign an empty string to that variable name and then fail on the next command where I try and set the ".Picture" property of the image.
Hi all , Can anyone tell me about how to embedd image in image control using imagelist. I added the 5 images in imagelist at design time and added the following code. image.picture=imagelist.listimages(1).picture but iam getting error.error no :2110,cannot open the file . thank u, Siva
I have a Customer table in an Accounts Receivable late-payments database that has very basic fields:
CustomerNumber, Name, BillToAddress1, BillToAddress2, City, State, Zip, Phone
As we get changes from new invoicing activity, I need the table to update the contact info. So, we get a spreadsheet each day with new invoicing activity, some of which will already have customers in our database. I need to capture any new addresses or other contact information to update my current records. We append the new info to the Invoices table, then need to grab the new addresses and update the Customer table.
I don't know why I don't know how to do this, as it seems so simple. Any help is greatly appreciated.
I'm in desperate need of help and want to know if it is possible to load an image on a form once a hyper link is created.
For example, I have a form with a hyper link to an image created, currently, when you click on the hyperlink, it opens the picture in the browser, can you change it so that it loads teh image embedded into the form instead of loading it into a browser?
I am at work, and I have acquired a database that prints labels. They now want the database to be coded so that after certain labels are printed the database will print a blank label. I have the code figured out as a Do While statement in order to print the blank label. The problem I am having is that I am trying to use the Insert Into command to insert the filepath into the table that adds the blank label.
|DoCmd.RunSQL "INSERT INTO Rod_tmakLabels ( Print, [Order] ) SELECT Yes AS Expr1, 'Rods Labels' AS Expr2"|
If I run the above command, it just adds the text "Rods Labels" at the end of the table. Is there anyway with the INSERT INTO command that I can insert the new label between the 2nd and 3rd row and add another row? Or is the command designed only to add a new row to the end? I haven't had any luck searching for this yet.
I need to devise a query to append data for a particular Department_ID from TBL_NEWDATA to TBL_PERSON_ALLOCATIONS where that data does not already exist there. i.e. for Department_ID 'Research', I would want to append 'Person_ID', 'Department_ID' (in this case: 'Research') to TBL_PERSON_ALLOCATIONS for any tuples not already held.
INSERT INTO TBL_PERSON_ALLOCATIONS (Person_ID, Department_ID) SELECT Person_ID, Department_ID FROM TBL_NEWDATA WHERE TBL_NEWDATA.Department_ID='Form...'
[code]...
This Query takes a single argument from a control (Forms!Main!IN_Department), and this is the Department_ID to be updated.Is there any way to do this using a single query or will I have to use sub queries? I'd hoped not to as to keep the database as concise as possible.
I have a normalized DB with one to many relationships, using Primary and Foreign Keys.
I need to do inserts and maintain the PK/FK relationship, which means when I add a new PK I need to insert that PK as FK in other tables in the same transaction.
How do I do this in Access? SQL Server I use transactions, but I can't lock up the tables in Access like that.
I did a bunch of searching and found nothing, which leads me to believe I am way off in my thinking. Below are the dirty details
I have 2 tables, tblName and tblPhone. 1 name can have many phones.
tblName has PKName. tblPhone has PKPhone, FKName.
I have a form where user enters a new Name and PhoneNumber.
Name gets inserted to tblName, assigned with PKName = 100
Phone should get inserted into tblPhone with PKName.
IE Insert into tblPhone (FKName, PhoneNum) VALUES (100,"212-555-1212").
The dumb way I am doing it now is I insert to tblName, query tblname for the PK, then write to tblPhone. This can't be right.
I need to update a graphic on my form as part of the record information. Specifically, I have a graphic of the human body, and need the user to be able to mark the area where it hurts-scribble or put an "X" there-whatever. This modified graphic then needs to be stored somewhere and associated with that particular record.
Has anybody done this? Any suggested starting places?
How can I get an animated image on my switchboard? I found an animated image on the internet and I copied it. I went into design view and pasted it onto the switchboard then I went back to form view. I can see the image but it is not animated. How do I animate it?
i have a cars database because it is difficult to add 4000 pictures i want to know if is it possible to add a field that opens an ie page in google images to show results of images for that car? ex : model : Ferrari foto link :http://images.google.com.gr/images?hl=el&lr=&q=Ferrari&btnG=%CE%91%CE%BD%CE%B1%CE%B6%CE%AE%CF%84%CE%B7%CF %83%CE%B7
i have a form with the fields PhotoID PhotoName PHotoPath PhotoDate PhotoSize ImageFrame
my Imageframe is showing the image image format .jpg and size 200kb each
Problem
when i click next record , my mouse is flashing and my db is freezing for 2sec. I have place a code by www.mvps.org which hide the insert dialog message. Also , i have change the registry to No (read the article at the www.mvps.org).
I need something that will make my photo to load faster.
Private Sub Form_AfterUpdate() On Error Resume Next If IsNull(Me![ImagePath]) Then Me![ImageFrame].Picture = "" Else Me![ImageFrame].Picture = Me![ImagePath] End If End Sub
Private Sub Form_Current() On Error Resume Next If IsNull(Me![ImagePath]) Then Me![ImageFrame].Picture = "" Else Me![ImageFrame].Picture = Me![ImagePath] End If End Sub
To make a form which will show a picture (different for each record) if the field 'ImagePath' has an entry in it. If not, it does not show.
The table containing the image is 'tblAnimal' and the field name where the path is stored is 'ImagePath.'
I would like my user to be able to click a button on the form 'frmAnimal' which says 'Add/Change Picture.'
This would then open a File Dialog window where they can navigate to an image (.jpg or .bmp) and select it.
The file path of this image will be subsequently placed into the 'ImagePath' field of the current record that the form is showing (based on 'tblAnimal.'
I saw a similar technique on the Northwind example database but this uses an extra part and I am a little confused as to which VBA code I need as the OnClick Event of the button.
I have a form that has an image name. The image is stored on a web server. The image can be accessed through a URL. The problem is how can I show the image on my form. When I try to change the picture property of my image control it tells me that it cannot use a web address. Any help would be greatly appriciated
Private Sub Form_Load() DoCmd.Maximize Me.Image56.Picture = "K:Staff FoldersJinLongNew Folderdefault.jpg" End Sub
Private Sub Image56_Click() Dim DBpath As String If [Yield Trend Chart].Value Is Not Null Then DBpath = [Yield Trend Chart] Me.Image56.Picture = DBpath Else Me.Image56.Picture = "K:Staff FoldersJinLongNew Folderdefault.jpg" End If
End Sub
what is wrong with my codes? there is an error over at [cod]If [Yield Trend Chart].Value Is Not Null Then[/code]
what i need to do is that when the field [Yield Trend Chart] is empty, then set a default image as the image..
