Recent content by Studentos

  1. S

    Saved Query Modification

    CurrentDb.QueryDefs("Query1").SQL="SELECT 0;"
  2. S

    Access 97's capacity...

    Specifications F1 (for XP): Table size 2 gigabyte minus the space needed for the system objects If you need to store 3000 records per day and make a realtime backup you should use SQL server such as MS SQL
  3. S

    VBA for Excel Code

    ..."=Sum(" & .Worksheets(3).Cells(p, i).Address & ":" & .Worksheets(3).Cells(p+2, i).Address & ")"
  4. S

    Creating a Random Number

    Rnd F1: To produce random integers in a given range, use this formula: Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
  5. S

    I Need a database for work

    Here you go
  6. S

    Too many Ifs

    It would be better for you to post code of your button here.
  7. S

    I Need a database for work

    Reading inbuild Access Help is very useful. Try start reading from "Creating and Working with Databases". Start learning with books and tutorials on Microsoft Access, VBA (Visual Basic For Applications) and SQL. Look through this tutorial: http://www.fgcu.edu/support/office2000/access/ Read...
  8. S

    Populating field based on previous field criteria

    Suppose you have form RefRbl and controls ACCT - Number, LastName Make control ACCT AfterUpdate Event with Private Sub ACCT_AfterUpdate() Me.LastName = DLookUp("LastName","PatTbl","ACCT = " & Nz(Me.ACCT,0)) End Sub()
  9. S

    I Need a database for work

    Suppose you have 2 tables: JOBS (job_id, job_name), EMPLOYEES (emp_id, emp_name, emp_hire_date, emp_job1_id, emp_job2_id, emp_job3_id) Suppose also you have an EMPLOYEE single form where you edit current employee To see all employees selected particular job (identified by job_id) is this...
  10. S

    FormatPercent Mismatch problem

    Percent3 is integer ... fix it to Double
  11. S

    FormatPercent Mismatch problem

    Of course you do - FormatPercent returns string.
  12. S

    Is This Impossible???

    If you will have compile errors then in VBA editor go Tools -> References and mark "Microsoft DAO ..."
  13. S

    Is This Impossible???

    Create a form, place a button on form and then double click it to create OnClick event. Write following code (with your names): Dim rs As Recordset Set rs = CurrentDb.OpenRecordset("YOUR_TABLE") Dim i As Integer i = 1 While Not rs.EOF rs.Edit rs.Fields("START INVOICE NUMBER") = i...
  14. S

    Yet another keypress/input mask question for the forum

    Make this field a combobox with list of values and set LimitToList = Yes in properties
  15. S

    My Stupid Loop Idea

    brr.. For i = 1 to 20 If IsNull(Blah) Then Me.Controls("chkQuestion" & i).Visible=False End If Next i
Back
Top Bottom