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 TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: ddevil
  • Content: Threads
  • Order by date
  1. ddevil

    Form Display Using Tabs

    I have a form with three tab controls on it. Each tab control holds a different form, which runs a different query. There is no data to display on the first and second tab, but there is data on the third tab, but all I get is a blank page. The different tabs aren't showing up. If even one...
  2. ddevil

    Syntax to Compare Dates

    I have the following date comparison: If stStat2 = "Open" And Year(stSchedDate) > Today Then do something..... What I really want is if the stSchedDate > the beginning of the month prior to the month we are in. If the stSchedDate was 11/24/2008 then this statement would be true...
  3. ddevil

    Joining Tables to Exclude Records

    I have a table which contains records that I want to exclude from a query, but I don't see an option in the join criteria to give me all the records in one table except the records that equal from the table with the records I want to exclude. I was thinking I could do a not in in the criteria...
  4. ddevil

    Lock Down Edit on one Form Based on Action from Another

    I want to be able to set the allow edits property on a different form when a button is selected on the current form. The code is below and it runs without error, but when I open the form I'm trying to set, the allow edits property is Yes and not No. Any ideas would be great. Thanks! Private...
  5. ddevil

    Sending Email to Multiple People

    I have written the code below that sends and email to a person when someone changes a task that the person needs to attend to. Now, I'd like to send an email to a list of people. I have a query that complies the list, but I don't know how to loop though that list to send to multiple people. If...
  6. ddevil

    DoCmd.SendObject Problem

    I'm trying to send an email from Access using the code below, but when it's executed, the Internet Connection Wizard comes up. Outlook is our current email client, do you know why this would happen? DoCmd.SendObject acSendNoObject, , , ToReceiver, , , "Test", "TestData", , False
  7. ddevil

    Data type mismatch in criteria expression error

    I keep getting a data runtime error 3464 "data type mismatch in criteria expression" when clicking on the Print AP Report button. I'm just trying to print a report where the ParentChild field in the query (text field) matches the ChildParentValue field on the form (text field also). Any ideas...
  8. ddevil

    vbOKCancel - Not Working Like Expected

    I'm stuggling with how to know what the user pressed with the vbOKCancel message box. I thought that vbOK was 1 and vbCancel was 2, but no matter what I select 1 is always the value. Private Sub GetDataBtn_Click() If Saved = 1 Then On Error GoTo Err_GetDataBtn_Click DoCmd.SetWarnings False...
  9. ddevil

    Checking Records in Another Table Efficiently

    I have a table that I create using a DAO recordset. Users can pull records up from this table and then manipulate certain fields, when they click the save button, then the record gets writen to the permanent table. What would be the most efficient way to check to see if the record they are...
  10. ddevil

    Calendar for Combo Box

    I have the code below in the mousedown field of a combo box control. The first field works great, the calendar pops up and when you select a date it populates the start date. However, when you click in the end date box, the start date box populates also. Does anyone know what I'm doing wrong...
  11. ddevil

    DLookup Multiple Records

    I'm trying to either enable for disable the save button on a form based on a security table. SecCheck = DLookup("[AreaCode]", "Security_Table", "[Text57]=[AdministratorID]") SecCheckResults = IIf([Area] = [SecCheck], True, False) If (SecCheckResults = True) Then SaveBtn.Enabled =...
  12. ddevil

    Handling Invalid Entries Myself

    When the user enters and invalid WR#, they get a runtime error 3021, no current record, which fails at CurrentDb.Execute strSQL. Is there a way to let the user know, via an input box and eliminate the system error from occurring? Part of the code is below. strSQL = "INSERT INTO...
  13. ddevil

    Marking a record as printed

    Can anyone tell me what would be the best way to mark that a record has been printed. This would be just a reminder to the user to print the record if they didn't. So, when they go to enter another record or exit the form and they didn't print the current record, then I want to prompt them to...
  14. ddevil

    How to handle a Null Date

    I get a run time error "invalid use of Null" on the dtCompleteDate field. Any ideas how I would handle this? Sub GetRefundData(CriteriaWR) Dim dbs As DAO.Database Dim rst As DAO.Recordset Dim strSQL As String Dim intEnterWR As Variant intEnterWR = [CriteriaWR] strSQL = "SELECT WRInquiry.*...
  15. ddevil

    In Statement in VBA

    When writing a query, I can use an in statement to check for many conditions of a variable, such as Not In ("96833","3228256"). Can I do the same thing in VBA with an if statement or something else? Such as: Public Function CheckProject() As String If (ProjectID not in "011082"...

Part and Inventory Search

Back
Top