Originally Posted by
ssanfu
I don't have A2K7, but AFAIK, a report is view only - buttons don't activate on it (the report).
2007 introduced a new "Report" view that is interactive.
Steven, you want something like this:
Code:
Option Compare Database
Option Explicit
Private Sub Command10_Click()
Dim rstPositive_Packetslst As DAO.Recordset
Set rstPositive_Packetslst = CurrentDb().OpenRecordset("SELECT * FROM [positive packets] WHERE [Case Number]='" & Me![Case Number] & "'", dbOpenDynaset)
rstPositive_Packetslst.Edit
rstPositive_Packetslst![RX 2nd Request Date] = Date
rstPositive_Packetslst.Update
Set rstPositive_Packetslst = Nothing
End Sub