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!

Register Log in
  • Congratulations derfloh 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 Hafa1961

  1. Hafa1961

    View report as PDF

    Duane, You are a life-saver, works perfect. I was getting close with this code except I still could not preview the report. Yours was right on the money. blRet = ConvertReportToPDF("repDeliveryDocketSingle", vbNullString, "C:\Access\repDeliveryDocketSingle" & ".pdf", False, False) Many thanks...
  2. Hafa1961

    View report as PDF

    Hi Duane, Thanks for the feedback, although I don't think this is what I am looking for. I basically have a form with a cmdButton that when clicked previews the report for this record. Once in preview I send this via email in either rtf or snp form. But instead of previewing this report in...
  3. Hafa1961

    View report as PDF

    Using Access 2000 and need help opening report as a PDF using Lebans A2000ReportToPDF which uses this code to open a report in a listbox of a form: Private Sub cmdReportToPDF_Click() Dim blRet As Boolean blRet = ConvertReportToPDF(Me.lstRptName, vbNullString, _ Me.lstRptName.Value & ".pdf"...
  4. Hafa1961

    Combo Box Issue

    In the Combo Box property, Format. You need to set the Column Count to 2 and the Column Widths to something like 1.0cm; 3.0cm.
  5. Hafa1961

    If checkbox checked display message...

    You could try: Private Sub NameOfCheckbox_AfterUpdate() If Me.Checkbox = True Then MsgBox "You need to fill out the quantity" Me.Quantity.SetFocus Exit Sub End If End Sub
  6. Hafa1961

    Find record, add record or do nothing

    Yes, I corrected that part already. When a number is entered in the SpecNo field (e.g. a number that would not have a match (DLookup)in the table CodeLook)the "Invalid use of Null" error occurs. When a text is entered "You canceled the previous operarion" error occurs. When a number is...
  7. Hafa1961

    Find record, add record or do nothing

    Thanks Remou But I am getting a "Invalid use of Null" error Appreciate your help....
  8. Hafa1961

    Find record, add record or do nothing

    I have an AfterUpdate code that uses the DLookup function to find the matching record in a corresponding table. If the matching record exists, the field is changed to the correct value based on DLookup of corresponding table. Here is my problem: If matching record does not exists the current...
  9. Hafa1961

    populate order items

    Take a look at the Northwind example - Orders Subform, After Update event of the Product Field: http://www.microsoft.com/downloads/thankyou.aspx?familyId=C6661372-8DBE-422B-8676-C632D66C529C&displayLang=en
  10. Hafa1961

    Running Sum of Sales Quantities

    Try this: http://www.rogersaccesslibrary.com/Otherdownload.asp?SampleName='RunningCountSum_2K.mdb'
  11. Hafa1961

    Best Way to handle stock.

    Read Allen Browne's Inventory Control: Quantity on Hand http://allenbrowne.com/AppInventory.html
  12. Hafa1961

    Hide Key? But it won't stay hidden!!

    Have you tried going to the properties of this field(e.g combobox), Format and setting the column widths to hide the autonumber? Format Column Widths...... 0cm; 5cm 0cm for your phone_type_id 5cm for your phone_type 0cm hides your phone_type_id
  13. Hafa1961

    DLookup for duplicate entry

    Thanks for the reply AceMan, I figured it out.... Private Sub SupplierRef_AfterUpdate() Dim intAnswer As Integer Dim txtSupplierRef As Variant txtSupplierRef = DLookup("[BoughtInChargeID]", "Bought In Charges", "[SupplierRef] = Forms![Bought In Charges]![SupplierRef]") If Not...
  14. Hafa1961

    DLookup for duplicate entry

    I have a form After Update event for a field that checks to see if a Supplier Ref has been used before. If so, it alerts the user of a duplicate entry. But what I need the code to do is to check the Supplier Ref against the SupplierID for that record. If the duplicate Supplier Ref was not used...
  15. Hafa1961

    track form open and close events by workstation

    DrBob, I don't know if this will help, but try: Transaction Log for Ms. Access faq181-291
See more

Part and Inventory Search

Back
Top