How can I save my results?

[dbruzzese84]

I am creating a DB that contains 2 listboxes in my form and a command button to return results based on both selections in the listboxes. I need a save button to save the reults that are shown in a table. Can anyone tell me if this is possible? If so, how can I create the button so it is enabled after the results are showed?

[MMcCarthy]

I am creating a DB that contains 2 listboxes in my form and a command button to return results based on both selections in the listboxes. I need a save button to save the reults that are shown in a table. Can anyone tell me if this is possible? If so, how can I create the button so it is enabled after the results are showed?

Firstly behind the save button you will need code somthing like the following:

Dim strSQL As String
 
   strSQL = "INSERT INTO TableName (Field1, Field2) VALUES ('" & _
      Me!Listbox1 & "', '" & Me!Listbox2 & "')"
   DoCmd.RunSQL strSQL
 

I have assumed in the above code that both listboxes are returning string values. If they are numbers then remove the single quotes.

As for enabling the button. Set the button to

Me!BtnName.Enabled = False 

in the Form open event.

In the After Update event of both listboxes set the following:

If IsNull(Me!Listbox1) Or IsNull(Me!Llistbox2) Then
   Me!BtnName.Enabled = False
Else
   Me!BtnName.Enabled = True
End If