Recent content by aingram

strSQL = "INSERT INTO Inspections([IDCode], [Route], [Gap],[Date_Done], [Due After], [Due Before],[Days_Gap],[Month],[Date_Last_Inspected]) " _ & "SELECT main_table.[IDCode], main_table.[Area], main_table.[Gap], main_table.[Date], me.DONE_AFTER...

Thanks For the DB i have found that using Like IIf([Forms]![Frm_Wards]![Ward1]=0,"*",-1) seems to work

I will have a read, Thanks In the mean time is there a way of making this bad job, good. as this is a historic database i have inherited rather than a new database im building from scratch

Im sorry im new to the access game. In what way do u mean normalize?

Hi All, Can anyone help me with the brain teaser ive been struggling with i have a table with 8 "ward" yes/no fields I want to query for everything that is in one of the 8 (say ward1) But records may have multiple entrys (ward 1,5,8) all ticked When i use this formula (Frm_wards is a search...

I'm trying to make the following code work. It basically adds up the check boxes if there are ticked so that i can display in a text box "multi fields selceted" am i using the right code? is there an easier way of doing this Private Sub Ward_2_AfterUpdate() Dim Multi_Count As Integer Dim...

Cheers allan!!!!! i had to change this though Select Case Target_Combo Case "Emergency" Me.target_completion_date = Me.ISSUE_DATE Case "3 Working Days" Me.target_completion_date = PlusWorkingDays(me.ISSUE_DATE, 3) Case "28 Days" Me.target_completion_date = PlusWorkingDays(me.ISSUE_DATE...

Thanks for the reply allan :) ive tryed your code and function ( i made a new module called plusworkingdays ) but when i chose the from the combo i get the attached message :confused: :confused: :confused:

Hi guys, im not sure if this is the right board to post this problem on, but what the hay ill give it a go. I have a database for issing work orders to our workers i have a issue date that is calculated by the computer date() function. I also have a combo box with different options for a target...

Perfect Thanks

Im trying to use the following code for a database i have (see pict.gif) Private Sub Command433_Click() Me.CF_Date = Me.DateENT_CF Dim strSQL As String strSQL = "INSERT INTO Inspections_CF([SBS_Code],[Date_done],[Route]) " strSQL = strSQL & "SELECT...

I have a master table setup just now for over 2000 records (each record has about 20 fields), which a form (through a query) picks up, i get that any change in the form will change the master table Im looking to make an extra tab in the same form that will have the ability to tranfer the id and...

Hi All, Im trying to make up a vb command to send date from a query based from to a table i have no clue how to even start. The database is to record when a item is inspected so a user would type the date in to a unbound box and then at a click of a button the date along with the id code will...

Hi All I have a database that everyone in the office uses daily I have made a small change to it, so that an order raised in this system can be canceld by a tick box, so i have a small code in the from "on current" If CANCELED_BOX = -1 Then Me.Label331.Caption = "Cancelled On"...

Thanks for your help But, i have tryed your code and it gives me the same error My list box is populated from the table "routes" through a query "Qry_Look" and double clicking on the list box should take you to a form which is based on "routes" Any other data u guys need to know