Recent content by xenos132

  1. X

    How do I save the data from a calculation.

    On my form I have calculated fields based on information from my sub forms. I have the calculations all working fine however I can seam to figure out how to save them in the table that my form is linked to as my control source is the calculation. Should I be using my calculations in an area...
  2. X

    Help with Sum for a Subform value

    All I had to do was allow edit's :(
  3. X

    Help with Sum for a Subform value

    Thank you When dealing with a simple query like. =Sum([Hours]) If my Hours is a null value I get an error, How would I write this to allow null values?
  4. X

    Help with Sum for a Subform value

    It's OK I just figured it out... :(
  5. X

    Help with Sum for a Subform value

    I am trying to sum a value on my main form based on a value in a queried sub form. I know if I use =[QueTimeSheets subform].Form!Hours it will display the first record, however I want to sum all the hours displayed on my sub form. Regard less of what I try I always seam to get an error...
  6. X

    Need help with my design.

    My god you guys rock. One day, Yes one day I will see.
  7. X

    Need help with my design.

    Thank you for pointing that out. I have decided to use Pat’s original code. I have just added a new column called WoNum and use WoNum = [Type] & "" & [WOSeqNum] to get the number I need.
  8. X

    Need help with my design.

    Pat if i rewrite it to. WOSeqNum = Me.Type & (Nz(DMax("WOSeqNum", "TblPO_numbers", "Type = '" & Me.Type & "'"), 0) + 1) I will get B1, M1... however on the next run I get a "type mismatch" error. Can I not use letters in the WWOSeqNum with Dmax ?
  9. X

    Need help with my design.

    Pat, I’m getting close. I have made a command button and in the VB editor I have. Private Sub Command156_Click() On Error GoTo Err_Command156_Click WOSeqNum = Nz(DMax("WOSeqNum", "TblPO_numbers", "Type = '" & "Me. Type" & "'"), 0) + 1 Now I am returning the number 1 to my WOSeqNum column...
  10. X

    Need help with my design.

    Pat, I’m feeling stupid now, I don’t know where to use it. In my table I added a new column called “WOSeqNum”, on my form I made a text box with the same name. In the box control source I used “= Nz(DMax("WOSeqNum", " TblPO_numbers ", "Type = '" & Me. Type & "'"), 0) + 1” And I get and...
  11. X

    Need help with my design.

    OOps, Thank you
  12. X

    Need help with my design.

    The idea of the 4 tables are just for generating the numbers, these numbers will be stored in one table called TblWorkOrders. Right now I have it all in the same table like you mention. The problem is the construction manager requires his work orders in sequential order. Right now I use the...
  13. X

    Need help with my design.

    I am trying to automate our work order system and incorporate into my data base. Just having a bit of trouble with the design. I have 4 different system for work orders depending on their use, each has a distinct beginning. Construction for example is BCx , Maintence is Mx, service is SJx… I...
  14. X

    Help Emailing form information

    Thankyou, that got me thinking, I just deleted "acSendForm" and it works. If I could ask one other question. When a combo box is populated and run a query to fill in some list boxes, how can I instead fill in text boxes with this information? The reason I need to do this is my email is...
  15. X

    Help Emailing form information

    Using the following code, I send email and it operates fine however, it also builds an attachment. How can I change the code so only the fields are emailed and not an attachment? On Error GoTo Err_Command85_Click Dim email, ref, origin, destination, notes As String email =...
Back
Top Bottom