Powerpoint with VBA

[vonoventwin]

I created a screen at the end of my powerpoint show that has 3 text boxes and a submit button. I want users to enter their data hit submit and the data be sent to a table inside of an access database. How do I write the code for this?

[AIS4U]

vonoventwin:

http://www.rdpslides.com/pptfaq/FAQ00004.htm

Also, check out the downloads at that site.

[vonoventwin]

Tried this but nothing happens:

Private Sub CommandButton1_Click()
Dim DB As database
Dim Records As recordset
 
Set DB = OpenDatabase("C:\Documents and Settings\brad.vonoven\Desktop\training.mdb")
Set Records = DB.OpenRecordset("training")
 
Do Until Records.EOF
    'Check Record Field
    If Records("SSN") = "003-46-8773" Then
         'EDIT IT
         Records.edit
             Records("LOAC1") = Format(Now, "mm/dd/yyyy")
         Records.Update
        Exit Do
 
   End If
   'Critical or it becomes an infinate loop
   Records.movenext
Loop
 
Records.Close
DB.Close
End Sub