Would any one happen to have a version of this for A2000 or even a A97 mdb not mde so I can convert it my self.
I would appreciate a copy if possible
Dave@mmvehiclerepairs.co.uk
Dave
Scott
I'm taking a different approach.
Private Sub cmdPicture_Click()
Me.cmdlgpicture.initdir = "L:\home"
Me.cmdlgpicture.Filter = "JPEG Image(*.jpg)|*.jpg"
Me.cmdlgpicture.showopen
Me.ImagePath = Me.cmdlgpicture.filename, "Path"
If Me.cmdlgpicture.filename <> "" Then
'Me.ImageFrame.SizeMode...
Hi Fizz.
Here's how I did it:
'This opens the form.
Private Sub Command14_Click()
DoCmd.OpenForm "frmImage"
End Sub
And this does the work:
Private Sub cmdPicture_Click()
If Me.RecordsetClone.RecordCount = 0 Then
If MsgBox("There are currently no records available." & vbCrLf & vbCrLf & "Do...
Simply Open the db with the shift key held down.
When you're more experienced, you can disable the shift key to lock out unwanted users.
Also go to tools-startup. uncheck the boxes.
you can still get in via the shift key.
DW
[This message has been edited by DW (edited 05-30-2002).]
Have you tried turning Auto Centre off in the properties of the form.
From their you can move the form to where you want it in form view, go to design view, press save.
When you open the form again, it should be where you left it.
DW
I'm trying to achieve something I'm not quite sure can be done.
I am working on part of my db which is a form with three fields.
[Ref1]-number
[Ref2]-number
[OlePic]-OleObject.
As you know, pictures bloat a db out of proportion, so here's what I've done to work around this.
Created a form...
Hi Fizz
I'm still having a problem with this.
I think it is the first line of code.
If Me.RecordsetClone.RecordCount <1 Then
When the form opens, a record is created from the previous mainform, by this the recordcount cannot be <1
Here's the code that opens the form :
Private Sub...
The following code is causing a problem in my db.
On Error GoTo Errtrap
DoCmd.GoToRecord acDataForm, "frmImage", acNewRec
Forms!frmImage!EstimateNo = Forms!frmdetails!EstimateNo
Forms!frmImage!Supp = Forms!frmdetails!Supp
Me.cmdlgpicture.InitDir = "L:\home"
Me.cmdlgpicture.Filter = " Image...
Yes Scott
This is the one I mean:-
The start menu is the menu in windows at the bottom named start.
Any help appreciated.
Dave
[This message has been edited by DW (edited 05-27-2002).]
Is it possible to prevent Microsoft Access from showing in the Windows Start Bar.
ie
When opening a form, the start bar shows;
Microsoft Access - [Whatever Form]
dave
Hello Scott
I have been looking for something like this to crop up and it seems to be exactly what I have been after.
I tried your example and it works great.
I added a reference number in the table also so as to tag the pic to a relevant file.
A new record button and a save button.
This now...
Try the following in between the buttons click event.
Dim intButSelected As Integer, intButType As Integer
Dim strMsgPrompt As String, strMsgTitle As String
strMsgPrompt = "Are you sure you want to save"
strMsgTitle = "!!"
intButType = vbYesNo + vbDefaultButton1...