Toby - I stand in Awe of your VB knowledge, it is nothing short of amazing!!!
--- In [email protected], "Hoffman, Tobi K \(DYS\)" <[EMAIL PROTECTED]> wrote: > > Private Sub Doneby_BeforeUpdate(Cancel As Integer) > Dim strCriterias As String > Dim rst As Recordset > Set rst = Me.RecordsetClone > > if not IsNull(Me.txtDoneBy) then > strCriteria = "Doneby = " & Me!Doneby & _ > " AND IsNull(StopTime)" > rst.FindFirst strCriteria > Me.Bookmark = rst.Bookmark > end if > End Sub > > First of all, you need the right test on DoneBy; I've made the > assumption that you have a textbox, txtDoneBy, which holds that value. > > Second, you need both pieces in strCriteria, and your second line simply > drops the DoneBy part and replaces it. Also, you cannot test something > "= Null", use the IsNull() function. > > Tobi > > -----Original Message----- > From: [email protected] > [mailto:[EMAIL PROTECTED] On Behalf Of brazilianbound > Sent: Thursday, December 08, 2005 2:54 PM > To: [email protected] > Subject: [AccessDevelopers] Launching a FindRecord from an event > > > HI guys > > I am attempting to execute a search on a before_Update event. But this > is not working below. > > Basically, when i scan the "Doneby" field, I want it to look in that > field to see if there is a value in it. IF there is a value there and > the "StopTime" field is Null, then search for the value in the "doneby" > field and populate the StopTime & StopDate fields. > > Private Sub Doneby_BeforeUpdate(Cancel As Integer) > Dim strCriterias As String > Dim rst As Recordset > Set rst = Me.RecordsetClone > strCriteria = "Doneby = " & Me!Doneby > strCriteria = "StopTime" = Null > rst.FindFirst strCriteria > Me.Bookmark = rst.Bookmark > End Sub > > > As Always, Grateful, Clayton > > > > > > > > Please zip all files prior to uploading to Files section. > Yahoo! Groups Links > ------------------------ Yahoo! Groups Sponsor --------------------~--> AIDS in India: A "lurking bomb." Click and help stop AIDS now. http://us.click.yahoo.com/VpTY2A/lzNLAA/yQLSAA/q7folB/TM --------------------------------------------------------------------~-> Please zip all files prior to uploading to Files section. Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/AccessDevelopers/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
