Search results

I'm trying to disable the Shift Key Bypass functionality. I found the following methodology in an AI website. It seems simple enough but it doesn't work. Can anyone help? I want the autoexec macro to run even if the Shift key is held down. To disable the shift key bypass in Microsoft Access...

I wrote a procedure to rename a file and place it in a new directory. I am using the NAME statement to do this. I keep getting a "File not found" error on the first record. I tried it with the destination directory being blank. I tried it with the destination directory having the same files as...

I'm getting a type mismatch error in the following code on the "Set lstname = txt_CurrentListBox" line. I realize that lstname is an object (listbox) and txt_CurrentListBox is a textbox holding a string so the error makes sense. However, what can I do to use a variable for the listbox name so...

The user enters a date on a form: 2/18/2025 I need a query that will calculate the previous Monday and the coming Saturday. The result should look like this: I'm familiar with DatePart and DateAdd but just can't figure out the logic. ANy help will be appreciated.

I have a listbox whose rowsource is a table consisting of two columns. Works great. However, the user wants the data to be displayed as text in a text box so that they can copy/paste into a Word document. I already wrote the code to loop through the table and write the table's rows into a text...

cmb_Client is an acComboBox - but shouldn't this code prevent me from getting the "You can't hide a control that has the focus" error? For Each ctl In Me.Controls If ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox Then ctl.Value = Null cmb_Client.SetFocus...

I have a list box called lst_Goals. On the double-click event it should populate txt_Goal and txt_Comments with values. Here is the code: txt_Goal = lst_Goals.Column(0) txt_Comments = lst_Goals.Column(1) txt_Goal poplates as it should. txt_Comments remains blank. I put a msgbox in the...

I want to make certain command button captions to be in bold print when my form is opened. To determine which command buttons should be bold I open a recordset and run the following code: If rs.RecordCount > 0 Then Do Until rs.EOF Dim ctl As Control For Each ctl In...

‘If I run this query it returns what I expect. SELECT tbl_Note_COG_BasicInfo.Client_Id, tbl_Note_COG_BasicInfo.DateOfService, tbl_Note_COG_BasicInfo.Time_In FROM tbl_Note_COG_BasicInfo WHERE (((tbl_Note_COG_BasicInfo.Client_Id)="600045") AND ((tbl_Note_COG_BasicInfo.DateOfService)=#8/29/2024#))...

I finally succeeded in encrypting the user passwords in my back end Sql Server database Login table using SHA2_512. Can someone please point me in the right direction tp decrypt it via my front end Access interface? What would the query look like? Below is what the data in the linked Sql Server...

I just read in this article that Adobe no longer support MS Access pdf exports. I have many Access interfaces from which I export reports as PDFs using the following code: DoCmd.OutputTo acOutputReport, "r_Note", acFormatPDF, strFolder & "\" & OutputFileName, False, , , acExportQualityPrint I...

I have 10 combo boxes on a form. All of them are set to text align = center in the properties box. One of them always loads as left justifed. This only happens on load. If I choose another option in the same combo box the alignment is center as it should be. But on load it becomes left justified...

I have a report consisting of a few subreports. In certain instances a subreport will appear on the following page (or several spaces down from the sub above it) for no obvious reason. I changed Keep Together to "No" in the report footer and this resolved one occurrance. Does anyone know how I...

Okay, I admit I've had a long day and that my eyes and brain need a break. But - If Table1 has 2 entries each for Cust_Id (600145 & 600136), Payer (MLTSS) and Therapy (Structured Day) : {Total entries = 4} and If Table 2 has 2 entries each for Cust_Id (600145 & 600136), Payer (MLTSS) and...

See attached example. I would like to have a form that has three command buttons positioned next to each other (side by side) in the uppermost part of my form. They should always be visible. If the first command button is clicked I would like to have another specific form open in the lower part...

I have a report which has a query as its recordsource. The query sorts the "Task_No" field in ascending order. The query works fine but when the report opens the "Task_No" field is not always sorted properly. Sometimes it is and sometimes it isn't. This just started happening after we migrated...

The code below returns a null string (as it should) in query design. However, in my VBA code the vartype for rs("Number_UnitsBilled") is 9 which indicates that it is returning an object. Therefore, the program crashes with a "No current Record" error in the "Else" statement. How can this be...

I am trying to use a msgbox to debug a query I have written in VBA code. However, the msgbox is not large enough to display the whole query. Is there any way to expand the msgbox so that I can see the whole query? sql1 = "SELECT tbl_Authorizations.ID, [tbl_Authorizations].[client_LName] & ', '...

The controls in frm_Dashboard (see attached DB) are exactly where I want them in Design view. However, when I switch to Form view all of them shift to another location. I've already played around with all the properties and can't seem to figure out why this is happening. Does anyone know?

I have an Access 2016 accdb database that refuses to close when I click the X in the upper right corner. It will minimize when I click the minus sign but will not close when I click the X. I tried a Compact/Repair but no luck. I have to either end the task through Task Manager or right click the...