Search results

  1. A

    Display subform when no data

    This might work Hi Livvie If the report you’re working with isn’t too complex, this might not be too difficult to fix. Suppose the table your main report is based on (table_1) on has primary key tbl_1_ID. Suppose also, the table your subReport is based on (table_2) has primary key tbl_2_ID...
  2. A

    Display subform when no data

    quick fix? Try checking this in your queries: I'm guessing your subform queries are "Group By" queries. Open them in design View and have a look at the date fields that set the date criteria. Suppose you have a date_Fld_1 as one of these date fields. If underneath this, there's a Group By...
  3. A

    Form, import

    Wow Neat trick. How did you get the form to go full screen like that? Modal, Popup and then DoCmd.Maximize? I think test_2 sort of works. You might find it a lot easier to use only recordsets rather than recordsets plus queries. If you want to move something from the top of a recordset to...
  4. A

    Using info entered in textboxes in a form

    Inventory Hi Deb, Pat’s right. If you want to produce a decent Inventory system, you should think about setting up a table to log all transactions. Every time stuff is put into stock or taken out, an entry should be written to this table. I looked through the forum for tips on transaction...
  5. A

    Timer in Textbox

    Here's one approach The zip files contains an Access 2000 mdb with a table and a couple of forms. You can stop the timer if you want to edit employee data. When the timers is on, ticking the break check box will start the countdown for that employee.
  6. A

    Using info entered in textboxes in a form

    Try an update query? Suppose your combo box (cbo_Record) lets you get hold of something that will identify the record uniquely, record_ID, say. Also, suppose your text box (txt_Quantity) will have an amount entered into it. Plus, there's maybe a button (cmd_DoIt) that the user will click to...
  7. A

    Cascading Comboboxes on Form Close

    Not sure but maybe this might help It's a bit of a fuss to do this, but it might be worth it. Put code on the After Update events of the Manufacturer and EquipType combos. The code on the AfterUpdate event for the EquipType combo might look something like this: Private Sub...
  8. A

    Automatic folders

    Maybe this will help you solve the folder problem The code below runs through the records in the employee_table and creates a folder for each employee. To test the code, you'll need a table called "employee_table" with a field called "badge_name". You'll aslo need to set two references in the...
  9. A

    Two word form coding problem

    how about this? Maybe this would be worth a try: Private Sub ocpick_AfterUpdate() Dim msg, Style, Title, Response, MyString Style = vbYesNo + vbDefaultButton1 Title = "Import OC Number?" msg = "By Pressing YES, You will import this OC serial number and mark it as taken in...
  10. A

    Running a Macro from another DB.

    Running a macro in another Access DB You'll probably need to use VB code to do this. You could start a new module then put this code into it. Public Sub run_Server_Macro() Dim servDB_path_name Dim servAPP As Access.Application servDB_Path_Name = "\\path\server_db_name.mdb"...
  11. A

    Two word form coding problem

    Not isNull() Hi Timoty, I guess the line I suggested didn't work for you. Sorry about that. I think something along the following lines definitely should work: If Response = vbYes Then If IsNull(Forms("officer comments")("expire")) Then 'Put code here for what to do...
  12. A

    Two word form coding problem

    Does this work? If Response = vbYes And Not IsNull(Forms("officer comments")("expire")) Then This should work, I think. I've never really used the "Bang" syntax (Forms![o c] ...) although there should be a way of getting it to work. It could also be that [officer comments] was OK and the...
  13. A

    Info from Subform to main form

    How do you get the best price? If you're using DMin then that could make things a bit tricky. An approach that might work would be to write a function to get the information you want. Something like this: Public Function get_Best_Price(orderID as Long, Lead_Week) Dim pSQL as String...
  14. A

    default value

    default values If you'll be using a form to input data into the table then it's not too hard to do this. Suppose data will be entered in a subform of a main form that will be open when your user is filling in the text box that sets the default. This code should do what you want...
  15. A

    Subforms-within-form references

    Maybe something like this will work: To refer to the other subform from the subform with the combo box: Forms("M_F_N")("N_O_T_O_S_C").Form.RecordSource = whatever M_F_N should be replace by the name of your Main_Form N_O_T_O_S_C should be replaced the the Name_Of_The_Other_Subform_Control...
  16. A

    Slow forms...

    Link Form Here's a zip with the link form stuff. It should only take a couple of minutes to import the objects into the front end you're designing. I came across another tip which you might want to try. From the database container, select the menu options - Tools, Options... and, when the...
  17. A

    Dlookup Help

    Tricky one The input masks currently on AO numbers and on CP numbers (in the tables but maybe not in the forms) now store the "A0" or "CP" part too. But, the original input mask you set on CP numbers stored only the numeric part of the user's input, not the "CP" prefix. This means that...
  18. A

    Slow forms...

    I've had this problem too Access can be weird. I've been developing a database that runs on a Windows 2000 network. It's split into a front end and a back end. The back end is on the server, while for most users, the front end .mde file is local. Over several weeks, the main form on most...
  19. A

    Dlookup Help

    Maybe this will work On the Proposals form: Private Sub CP_AO_Number_Exit(Cancel As Integer) If Me.CP_AO_Number Like "CP*" Then [Description] = DLookup("[CP_Description]", "CP_Numbers", "[cp_number] = " & "'" & Me.CP_AO_Number & "'") Else [Description] =...
  20. A

    Matching text and inserting into a Subform

    Maybe this'll work strCriteria = "[field_to_look_in] ='" & Me.numberInput & "'" The first piece of code would probably be fixed if you changed it to: c_match = DCount("*", "other_table_name", "field_to_look_in='" & check_Num & "'") When you want to specify a string as a condition in Access...
Back
Top Bottom