Search results

ok, fortunately this is a standalone db :D

Hi when my form opens, the combo box shows blank until a user selects a value. I want the combo box to be blank each time a new record is selected. So that the last selection for the previous record doesnt get used in error. WD

thanks for the reply this does the job runs first... DoCmd.RunSQL "INSERT INTO clientservices ( serviceid, stuid, orgid ) VALUES ( " & serviceid & ", " & stuid & "," & orgid & " )" then this.... DoCmd.RunSQL "INSERT INTO invoice ( clientid, [date], total ) SELECT Max...

I have an insert query that inserts to a table that has an autonumber as pkey, the pkey is auto incremented when query runs. I then want to insert that new pkey value in another table. Both these insert queries run off the same button, after the first query runs I need some code or query that...

Thank you Pat, it was that simple!! WD

Hi thanks for the reply, this what I got to work. Dim invdate As Variant Dim stuid As Variant Dim total As Variant invdate = Me.txtdate.Value stuid = Me.txtstuid.Value total = Me.txttotal.Value DoCmd.RunSQL "INSERT INTO invoice ([date], total, stuid) VALUES (#" & invdate &...

I have a form that is populated from a combo box selection (userid) another combo box selects a value which is then multiplied by the value in another text box, the total is then displayed in a second textbox. This value along with several other fields is then inserted into a table. I want to...

Hi, can anyone tell me why this query isn't working? the error message is: runtime error 3134 Syntax error in insert statement. Private Sub btncommit_Click() Dim invdate As Variant Dim sid As Variant Dim total As Variant invdate = Me.txtdate.Value sid =...

Thanks for the replies, have sorted it out Private Sub txtlessonnum_AfterUpdate() Dim numlessons As Variant Dim total As Integer numlessons = Me.txtlessonnum & "" If (Me.cmblesson = 1) Then total = ((50 / 3) * numlessons) ElseIf (Me.cmblesson = 2) Then...

Hi, I have a form where I enter student data and lesson details such as lesson type number of lesson and total cost the following code is supposed to do the calculation to provide the total cost and display it in the txttotal text box. It doesn't :( Private Sub txtlessonnum_Exit(Cancel As...