Search results for query: *

That did the trick! Thanks for your help Much appreciated,

...As Control Me.cTemp.SetFocus Dim pic As Variant For Each ctl In Me.Controls If TypeOf ctl Is CommandButton Then If ctl.Name Like "cmdOrder*" Then ctl.Visible = True ctl.Caption = DLookup("[cmdCaption]", "tblCmds", "[cmdID]='" & ctl.Name & "'") pic =...

...Dim pic As Variant Me.cTemp.SetFocus For Each ctl In Me.Controls X = 1 If TypeOf ctl Is CommandButton Then If ctl.Name Like "cmdOrder*" Then ctl.Visible = True ctl.Caption = DLookup("[cmdCaption]", "tblCmds", "[cmdID]='" & ctl.Name & "'") pic =...

@ OzFoxy - This worked perfect many thanks for your help and everyone's input, You can see attachment and idea of what I/m trying to achieve, still more work to do

Yes, the file can be open by different users but it shouldn't make a difference. I have attached the file so you can view it yourself

Its the full path C:\SomeFolder\Images\MyPicture.bmp that's on the table field cmdPhotoUrl tblCmds cmdID Short Text cmdCaption Short Text cmdPhotoUrl Short Text

Hi Duane, Ive been doing that exactly. I've managed to the pictures to show if the the link field for the photo is not null. But if the field is empty and null I get the error for the command button with the empty field e.g. cmdOrder2 which has no data "cmdOrder02-SampleDB can't open tje file...

Ive attached the file for viewing hope this might help

I've tried using the BMP file format but still no avail Regards

Primo

...Dim ctl As Control Me.cTemp.SetFocus For Each ctl In Me.Controls If TypeOf ctl Is CommandButton Then If ctl.Name Like "cmdOrder*" Then ctl.Visible = True ctl.Caption = DLookup("[cmdCaption]", "tblCmds", "[cmdID]='" & ctl.Name & "'") If ctl.Caption = "Empty"...

Hi Duane / Andy, It's been awhile but I did use the the DLookup Function and it's working perfect! Many thanks for the suggestion much appreciated, Steve

After playing around decided to stay with the Button Control instead of the Image Control. Must have been a bug or something I just copied and paste the table again and added new data. Seems to be working just fine now both in my personal and work pc. Thanks all,

Hello All, I have an unbound form called Recs with 2 unbound textboxes Textbox1 called ProductNo Textbox2 called ProductCode Textbox1 has the ProductID from the Products Table already filled in I am trying to fill in Textbox2 with the ProductCode corresponding to the ProductID from the...

Hi C, I've also tried coding below replacing it with Value but I was getting a Run-time error '438': Object doesn't support this property or method with below line ' Caption for the TextBox control Me.Controls("ProductName" & z).Value = Nz(Me.Products.Column(1), "") Thanks

Ok, so I have replaced the Button Control with an Image Control it's working now. Except on the Button Control I was able to add both a caption from a field on the table called ProductName along with the Image from another field on the table called ProductImage, I'm getting a Run-time error...

Hi Duane, Typical Values in Column(2) is an Attachment like a BMP, GIG, PNG , This is the Data Type TABLE Products ProductID - Autonumber CategoryID Number - Number ProductName -ShortText ProductImage - Attachment Description -ShortText The product...

I have a form that displays a Gridview-like with 20 button controls (displays different products with the name and image) I have several other button controls which represents Categories and when click calls this function "Call Display_Products" Function Display Products w = 0 q = 0 For z = 1...

Hi, I have a Main form "ManuF" and a subform which is a Tab form "Jobs". I have no problem printing this report "repFileCover" from the Jobs form when this form is opened by itself OnClick event: DoCmd.openReport "repFileCover", acViewPreview Query behind the "repFileCover" below SELECT...