View Single Post
  #2  
Old February 12th, 2010, 04:35 AM posted to microsoft.public.access.forms
Arvin Meyer [MVP][_2_]
external usenet poster
 
Posts: 2,310
Default Custom Zoom Form Not Updating Data

If you use the Access Zoom box, you won't have that problem. If you have a
slick form that you want to keep, have a look at the way the code works in
my calendar form. Patterning your form on the way that it works should be
your ticket.

http://www.datastrat.com/Download/Calendar2K.zip
--
Arvin Meyer, MCP, MVP
http://www.datastrat.com
http://www.mvps.org/access
http://www.accessmvp.com


"ondvirg via AccessMonster.com" u45813@uwe wrote in message
news:a37e1488f954e@uwe...
I have some code tied to the double click event for a control that opens a
custom zoom form and displays the text as well as the label of that
control.
Right now, if I add to the text in the zoom form, it doesn't actually
update
the data in the table. I know I've read somewhere how to accomplish this,
but
my searching isn't finding it again.
The code I'm using is below. Any help would be appreciated. Thanks

Private Sub evnt_prblm_descr_txt_DblClick(Cancel As Integer)
strZoomPar = Me.name & ";" & Me.ActiveControl.name
strTitle = Me!Label16.Caption
DoCmd.OpenForm "frm_exp_txt", , , , , , strZoomPar
Forms("frm_exp_txt").Controls("text0") = Me.ActiveControl
Forms("frm_exp_txt").Controls("text5") = strTitle
End Sub

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