Recent content by DuMont

MarkK - How would I go about doing that - Would you have an example perhaps? Also the code works (if I take out set rst = db.OpenRecordset(strSQL) ...as in I go an open the query *Group1-CAN Top*, the only thing is that I have to open the query in design view, deselect a field, reselect...

That makes sense MarkK but the reason I have that there is to select the top values that are entered in the textbox - which is labeled "Required" on the form (Granted instruction will also have to be given as well...)

Like this...? [CAN - NAME.Name]

Hi Guys, I'm receiving the run-time error '3141' - The SELECT statement includes a reserved word or an argument name..." Here's the full code... Dim db As DAO.Database Dim rst As DAO.Recordset Dim strSQL As String Set db = CurrentDb strSQL = "SELECT TOP " & Me.Text140.Value &...

Full code is... Dim qdf As QueryDef Set db = CurrentDb Set qdf = CurrentDb.QueryDefs("Group1-CAN Top") strSQL = "SELECT TOP " & Me.Text140.Value & " [CAN - NAME].Name, [CAN - CPT/VOUCHER].Voucher_Number, " & _ "[CAN - CPT/VOUCHER].Procedure_Code, [CAN -...

Hi Guys, I have a textbox & button that when entered & pushed - run a query for the top values randomly depending on the value entered into the textbox. My code is... strSQL = "SELECT TOP " & Me.Text140.Value & " [CAN - NAME].Name, [CAN - CPT/VOUCHER].Voucher_Number, " & _ "[CAN -...

You too big guy.

Syntax error. The "..." is because I have 20+ fields - why would I post all of them? If can get the first 3 to work, more than likely able to make the rest work. Thanks for reply though.

I currently have a command button to run the following... DoCmd.OpenQuery "Credit Card Report", , acAdd Which is an appended query. However, I don't want it to add the whole table each time this is pushed but when trying to use... DoCmd.RunSQL "INSERT INTO [Credit Cards] ([Provider's Name]...

How can I add a full row of color, if let's say I have 5 columns when a user clicked a button? Docmd.runsql "INSERT INTO tbl ("blank","blank","blank","blank","blank") ... tablerow.backcolor = green ? Let me know if I need to clarify a bit more. Thanks!

Hi Guys, I have a form in which is used as two separate things - one being a patient lookup & the other being a credit card form.Once they search for a patient all that patients info populates & if they chose to make a payment they fill out the second side of the form ... My question is -...

Yes I did do that...

Hi Guys, I'm trying to follow Allen Browne's - Combos with Tens of Thousands of Records (http://allenbrowne.com/ser-32.html) However, I keep getting the error... Compile Error: Invalid use of Me keyword (This being a new module) That's how it shows in his code (the use of...

My apologies. I have a column bound to a query which populates a few textboxes using the onchange event for my form. I created this button for users to be able to go to the NEXT record in the row of the query IF the patient name is the same, but not the DB (have it sorted by patient...

Hey Guys, I'm having an issue with this code... Private Sub Find_Next_Patient() PatientName.SetFocus If PatientName.ListIndex <> PatientName.ListCount - 1 Then PatientName.ListIndex = PatientName.ListIndex + 1 Else PatientName.ListIndex = 0 End If End Sub...