I have looked at this but it would be better for me to have a button
version
as i said.
"Pete D." wrote:
> Look at Password Protecting A Microsoft Access Tab Control
> http://www.databasedev.co.uk/tab-control.html
>
> "jackrobyn1" <jackrobyn1@[EMAIL PROTECTED]
> wrote in message
> news:AD5C3E24-1A33-401C-9B4D-06CF60B2331D@[EMAIL PROTECTED]
> >I have a basic continuous form that a user can enter basic info about
an
> > accident eg Reference number, employee name, vehicle number etc etc.
next
> > to
> > each record there is a button that takes me to a larger form conected
to
> > the
> > same table, this is so a manager can add a more complete picture of
the
> > accidents events, i want this button to ask for a password before
opening
> > the
> > form. how can i do this? the buttons on click code is as follows:
> >
> > Private Sub Command154_Click()
> > On Error GoTo Err_Command154_Click
> >
> > Dim stDocName As String
> > Dim stLinkCriteria As String
> >
> > stDocName = "IncidentsEntryFRM"
> >
> > stLinkCriteria = "[Ref_No]=" & "'" & Me![Ref_No] & "'"
> > DoCmd.OpenForm stDocName, , , stLinkCriteria
> >
> > Exit_Command154_Click:
> > Exit Sub
> >
> > Err_Command154_Click:
> > MsgBox Err.Description
> > Resume Exit_Command154_Click
> >
> > End Sub
> >
> > Can you just add the code required to ask for a password please
> >
> > Thanks
>
>
>
|
