Hi im trying to use a sql statement to save a record in a database the procedure is a follows
Form (name : frmBooking_Counter)
txtboxes(SS) (names : txtPassengerName;txtTicketNumber;txtArrival;txtDepartingAirport)
command button (name: cmdSave)
I have used this code but it doesnt work may someone help
Line2 is reporting a type mismatch
have used this code but it doesnt work may someone helpCode:Private Sub cmdSave_Click() Set rst3 = datReservationRecs.OpenRecordset("select * from Tickets where SS# ='" & [Form3s]!3)[Booking_Counter]![SS] & '";") rst3.Save rst3![PassengerName] = [Forms]![frmBooking_Counter]![txtPassengerName] rst3![TicketNumber] = [Forms]![frmBooking_Counter]![txtTicketNumbers] rst3![Arrival] = [Forms]![frmBooking_Counter]![txtArrival] rst3![DepartingAirport] = [Forms]![frmBooking_Counter]![txtDepartingAirport] rst3![Fare] = [Forms]![frmBoooking_Counter]![txtFare] rst3![Class] = [Forms]![frmBooking_Counter]![txtClass] rst3.Update End Sub




Reply With Quote