Open Form, based on a table, to specific record from another form

[Markus_989]

I have a LOANS table that has a list of loan details for different
borrowers. I have a main switchboard with a LOANSELECT combo box
(that displays a list of borrower last names and loan numbers). I'd
like to be able to have a user click on the say, RECEIVE PAYMENT
button that will open the payments form. This form should open to the
loan that was selected from the LOANSELECT box. This form also has a
box on it to switch to different loan, so I can't use a query or a
DoCmd.OpenForm, as this only passes the selected record to the second
form.

I've been trying to get the FindFirst command to work, but can't seem
to do it. Here's what I've got as code for the second form.

Private Sub Form_Load()
' Find the record that matches the control.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[LoanID] = " & Str(Nz(Forms!SWITCHBOARD.LoanSelect,
0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

I greatly appreciate any help that anyone can give and forgive my
novice ability. Thanks!

[ruralguy via AccessMonster.com]

Is [LoanID] a number or a string?

Markus_989 wrote:

>I have a LOANS table that has a list of loan details for different
borrowers. I have a main switchboard with a LOANSELECT combo box
(that displays a list of borrower last names and loan numbers). I'd
like to be able to have a user click on the say, RECEIVE PAYMENT
button that will open the payments form. This form should open to the
loan that was selected from the LOANSELECT box. This form also has a
box on it to switch to different loan, so I can't use a query or a
DoCmd.OpenForm, as this only passes the selected record to the second
form.

I've been trying to get the FindFirst command to work, but can't seem
to do it. Here's what I've got as code for the second form.

Private Sub Form_Load()
' Find the record that matches the control.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[LoanID] = " & Str(Nz(Forms!SWITCHBOARD.LoanSelect,
0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

I greatly appreciate any help that anyone can give and forgive my
novice ability. Thanks!

--
HTH - RuralGuy (RG for short) acXP WinXP Pro
Please post back to this forum so all may benefit.

Message posted via AccessMonster.com
http://www.accessmonster.com/Uwe/For...ccess/200704/1

[ruralguy via AccessMonster.com]

Is [LoanID] a number or a string?

Markus_989 wrote:

>I have a LOANS table that has a list of loan details for different
borrowers. I have a main switchboard with a LOANSELECT combo box
(that displays a list of borrower last names and loan numbers). I'd
like to be able to have a user click on the say, RECEIVE PAYMENT
button that will open the payments form. This form should open to the
loan that was selected from the LOANSELECT box. This form also has a
box on it to switch to different loan, so I can't use a query or a
DoCmd.OpenForm, as this only passes the selected record to the second
form.

I've been trying to get the FindFirst command to work, but can't seem
to do it. Here's what I've got as code for the second form.

Private Sub Form_Load()
' Find the record that matches the control.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[LoanID] = " & Str(Nz(Forms!SWITCHBOARD.LoanSelect,
0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

I greatly appreciate any help that anyone can give and forgive my
novice ability. Thanks!

--
HTH - RuralGuy (RG for short) acXP WinXP Pro
Please post back to this forum so all may benefit.

Message posted via AccessMonster.com
http://www.accessmonster.com/Uwe/For...ccess/200704/1

[Markus_989]

On Apr 29, 3:36 pm, "ruralguy via AccessMonster.com" <u12102@uwe>
wrote:

Is [LoanID] a number or a string?

Markus_989 wrote:

I have a LOANS table that has a list of loan details for different
borrowers. I have a main switchboard with a LOANSELECT combo box
(that displays a list of borrower last names and loan numbers). I'd
like to be able to have a user click on the say, RECEIVE PAYMENT
button that will open the payments form. This form should open to the
loan that was selected from the LOANSELECT box. This form also has a
box on it to switch to different loan, so I can't use a query or a
DoCmd.OpenForm, as this only passes the selected record to the second
form.

I've been trying to get the FindFirst command to work, but can't seem
to do it. Here's what I've got as code for the second form.

Private Sub Form_Load()
' Find the record that matches the control.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[LoanID] = " & Str(Nz(Forms!SWITCHBOARD.LoanSelect,
0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

I greatly appreciate any help that anyone can give and forgive my
novice ability. Thanks!

--
HTH - RuralGuy (RG for short) acXP WinXP Pro
Please post back to this forum so all may benefit.

Message posted via AccessMonster.comhttp://www.accessmonster.com/Uwe/Forums.aspx/databases-ms-access/2007...- Hide quoted text -

- Show quoted text -

[LoanID] is an Autonumber from the LOANS table.

[ruralguy via AccessMonster.com]

There are several ways to achieve what you want and you are using one of them.
Why not put a MsgBox in your next form and see what you are looking up?

MsgBox Str(Nz(Forms!SWITCHBOARD.LoanSelect,0))


Markus_989 wrote:

>On Apr 29, 3:36 pm, "ruralguy via AccessMonster.com" <u12102@uwe>
wrote:

>Is [LoanID] a number or a string?

[quoted text clipped - 31 lines]

>>
- Show quoted text -

[LoanID] is an Autonumber from the LOANS table.

--
HTH - RuralGuy (RG for short) acXP WinXP Pro
Please post back to this forum so all may benefit.

Message posted via http://www.accessmonster.com

[Markus_989]

On Apr 30, 9:05 am, "ruralguy via AccessMonster.com" <u12102@uwe>
wrote:

There are several ways to achieve what you want and you are using one of them.
Why not put a MsgBox in your next form and see what you are looking up?

MsgBox Str(Nz(Forms!SWITCHBOARD.LoanSelect,0))

Markus_989 wrote:

On Apr 29, 3:36 pm, "ruralguy via AccessMonster.com" <u12102@uwe>
wrote:

Is [LoanID] a number or a string?

[quoted text clipped - 31 lines]

- Show quoted text -

[LoanID] is an Autonumber from the LOANS table.

--
HTH - RuralGuy (RG for short) acXP WinXP Pro
Please post back to this forum so all may benefit.

Message posted viahttp://www.accessmonster.com

I've done that and it returns the correct value (the LoanID from the
prior form). I just can't seem to get the FindFirst line to work
correctly. I always just retuns the first field in the Loans table...

[ruralguy via AccessMonster.com]

Use DAO:

Private Sub Form_Load()

' Find the record that matches the control.
Me.RecordsetClone.FindFirst "[LoanID] = " & Str(Nz(Forms!SWITCHBOARD.
LoanSelect,
0))
If Not Me.RecordsetClone.NoMatch Then
Me.Bookmark = Me.RecordsetClone.Bookmark
End If

End Sub
Markus_989 wrote:

>On Apr 30, 9:05 am, "ruralguy via AccessMonster.com" <u12102@uwe>
wrote:

>There are several ways to achieve what you want and you are using one of them.
Why not put a MsgBox in your next form and see what you are looking up?

[quoted text clipped - 16 lines]

>>
Message posted viahttp://www.accessmonster.com

I've done that and it returns the correct value (the LoanID from the
prior form). I just can't seem to get the FindFirst line to work
correctly. I always just retuns the first field in the Loans table...

--
HTH - RuralGuy (RG for short) acXP WinXP Pro
Please post back to this forum so all may benefit.

Message posted via http://www.accessmonster.com