Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations bkrike on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by Debbie37

  1. Debbie37

    Increment Number Problem

    Hi, I am trying to get a row number for each record in a group using MD_ID and CreateDate (date/time). For some MD_ID groups it works and others it does not. Can anyone tell me what I am doing wrong? Thanks in advance! SELECT A.MD_ID, A.CreateDate, Count(*) AS [DefCt] FROM tblAll AS A INNER...
  2. Debbie37

    Recalculate/Update next records based on new value

    What exactly are you referring to? I am not unfamiliar with basic dbase structure, but am wanting some options in performing update calculations on specific record sets.
  3. Debbie37

    Recalculate/Update next records based on new value

    (Acess 97) I am having trouble recalculating and updating census records based on changing values. Census is determined by Date, Unit, Admits, Discharges, etc. Everyday you have a BeginCensus and EndCensus total (adding and subtracting the admits and discharges) for each day, by unit. The...
  4. Debbie37

    Open to selected criteria in subform

    What I mean is when I change it to look for (match the value) the [ReqID] in the subform it open blank, like this: Private Sub Form_Click() Dim stDocName As String Dim stLinkCriteria As String stDocName = "frmmainform" stLinkCriteria = "[ReqID]=" & Me![ReqID]...
  5. Debbie37

    Open to selected criteria in subform

    I have a form that I set the OnClick event to the following: Private Sub Form_Click() Dim stDocName As String Dim stLinkCriteria As String stDocName = "frmmainform" stLinkCriteria = "[ReqID]=" & Me![ReqID] '[ReqID] actually refers to a field name in the...
  6. Debbie37

    Calculate DateDiff between two different records

    Thank you pwise, it works like a charm!!! I gave you a star for the simplicity of the solution :) Super-fantastic! Thanks tons....
  7. Debbie37

    Calculate DateDiff between two different records

    The main form is patient admission info and the subform tracks ventilator data. Two date fields, [DateOnVent] and [DateWean], contain one ventilator record. However, when/if the patient returns to vent support I need to calculate days weaned (date returning to vent support [DateOnVent]new vent...
  8. Debbie37

    Word fixed image frame size, w/ no sizing handles in VBA?

    I would like to create a form or template for users to add up to four images (separate frames), picture set to zoom or stretch to fit within size (frame size)I determine. It has to be in Word as people at sister facilities would be unlikely to have MS Access, which is where i would like to...
  9. Debbie37

    Change all fields backcolor on Got Focus

    I know you can change the backcolor of a field on the Got Focus event, but is there a way to change the backcolor when any field on a form (or database) has the focus that does not include code on the Got Focus (13434879-yellow) AND Lost Focus (16777215-back to white) events? .....thanks!
  10. Debbie37

    Loading more than one image on a form

    Just to make things more complicated, ughhh, I wasn't thinking, each time a physician comes up for reappointment he will have a new set of image files associated with his record. The main form will include demo/license info w/ photos(subform w/ signature card images, linked form w/ signed...
  11. Debbie37

    Loading more than one image on a form

    Hi Bob - I don't think I can use a common image name, as each physician will have multiple images associated with their record (did I understand you correctly?). The MDid consists of one character and a 7 number string (i.e. B7890345). If each image was named consecutively and uniquely...
  12. Debbie37

    Loading more than one image on a form

    How can I display more than one picture linked to a unique ID for a record with either more than one image control or advancing through a single image control with navigation buttons? Since a saved image file cannot have the same name I am not sure how to proceed. I even tried using wildcard...
  13. Debbie37

    If no match image file found fo record, last image displays

    Perfect! You were right, I needed to repaint the object. I added the following: Private Sub Form_Current() If Not Me.NewRecord then Me.Image14.Visible = _ IIF(DIR(strPathToPhoto & Me.ID & ".jpg") ="",False,True) If Me.Image14.Visible then...
  14. Debbie37

    If no match image file found fo record, last image displays

    Perfect! You were right, I needed to repaint the object. I added the folowing: Private Sub Form_Current() If Not Me.NewRecord then Me.Image14.Visible = _ IIF(DIR(strPathToPhoto & Me.ID & ".jpg") ="",False,True) If Me.Image14.Visible then...
  15. Debbie37

    If no match image file found fo record, last image displays

    I used the below example and it works, but if a record does not have a picture on file to load, the last picture remains in the image control. How can I make this control not visible if there is no image file matching the unique ID requested? It only changes when there is a different picture...

Part and Inventory Search

Back
Top