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 SkipVought 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: *

  1. amrizvi

    What is Microsoft Jet-connected ODBC data source?

    Actually I am using MS Access Database and working with VBA and want to use object.EXECUTE dbSeeChange which is only available with Microsoft Jet workspaces and also want to work with External MS Access Database defined in ODBC (Data Source). As per help What is Microsoft Jet-connected ODBC...
  2. amrizvi

    All fields to be filled before adding new record

    avoid earlier as I missed 'Exit Sub' in that If IsNull(Me.FIELD01) = True then Me.NEW_RECORD.Enabled = False Exit Sub End if If IsNull(Me.FIELD02) = True then Me.NEW_RECORD.Enabled = False Exit Sub End if If IsNull(Me.FIELD03) = True then Me.NEW_RECORD.Enabled = False Exit Sub End if...
  3. amrizvi

    All fields to be filled before adding new record

    Try this..... If IsNull(Me.FIELD01) = True then Me.NEW_RECORD.Enabled = False End if If IsNull(Me.FIELD02) = True then Me.NEW_RECORD.Enabled = False End if If IsNull(Me.FIELD03) = True then Me.NEW_RECORD.Enabled = False End if Me.NEW_RECORD.Enabled = True
  4. amrizvi

    Huge IF statement I suspect should be a lot simpler

    I earlier gave u the right syntax of using Select Case, now its depend on logic to simplify the code for checking value. I suggested Select Case as through this u dont have to use multiple operators like "=><" and "Or/And" And In your case, many numbers of comparison required multiple and...
  5. amrizvi

    Huge IF statement I suspect should be a lot simpler

    It will be more easy if you initialize [PASSFAIL1.value] as "Pass" in the start of Select Case then Check through Select only possibily of 'Fail' and change the value as "Fail" in that checked. If I get the time, I will right the complete code
  6. amrizvi

    How to count records after filtering a recordset

    It is better to use On No Data <event procedure> in Report Private Sub Report_NoData(Cancel As Integer) MsgBox "No Record", vbOKOnly + vbInformation, "NO Data" 'Set Cancel = True for preventing opening report if not set as true then message will display and report will open Cancel =...
  7. amrizvi

    Huge IF statement I suspect should be a lot simpler

    USE Select Case - End Select Example sizecombo = "LAC_BP_13025" PASSFAIL1 = "NONE" AVG_3SIGM = 18 Select Case sizecombo Case Is = "LAC_BP_13010", "LAC_BP_13015", "LAC_BP_13020", "LAC_BP_13025" Select Case AVG_3SIGM Case Is = 18...
  8. amrizvi

    ODBC Failed - No key columns are specified for the update table

    I am trying to Add two records in {Dbase III DBF file connected through ODBC} by using batch update in order to handle the Collision in multiusers environment. BUT receiving following error “ODBC--call failed.” on line dbUpdateBatch Details errors are as below: DAO Error 12: Client Cursor: 12...

Part and Inventory Search

Back
Top