Search results

just test if frmActivitiesEdit is open:\ If CurrentProject.AllForms("frmActivitiesEdit").IsLoaded = False Then DoCmd.OpenForm "frmActivitiesEdit" End If Forms!frmActivitiesEdit.RecordSource = "Select * from qryActivitiesEdit Where ActionID = " & Me.txtActionID

use your Control not the fields in your table: Private Sub GroupHeader1_Format(Cancel As Integer, FormatCount As Integer) Me.Lvl1Img.Visible = Me.Lvl1Chk Me.Lvl2Img.Visible = Me.Lvl2Chk Me.Lvl3Img.Visible = Me.Lvl3Chk End Sub

you may try this on the subform's Current Event: Private Sub Form_Current() Dim bolVisible As Boolean With Me bolVisible = (.Recordset.RecordCount > 1) !FirstRecord.Visible = bolVisible !NextRecord.Visible = bolVisible !PrevousRecord.Visible = bolVisible !LastRecord.Visible...

don't forget the blowout..

means a woman/girl/transgender. maybe attributed by Elvis Costello: She may be the face I can't forget A trace of pleasure or regret May be my treasure or the price I have to pay She may be the song that summer sings May be the chill that autumn brings May be a hundred different things Within...

then you already have Duplicate JR_ID on JR_TrClassesT table. what the code is doing is adding (if it does not already exists on JR_TrClassesT) the 12 records you are looking for. next it uses an INNER JOIN (meaning only those 12 JR_ID should be included). but you said more than 12 are being...

who is mr.B? i hope not the Mr.B with the Teddy bear.

will that mean we will see more of the "when i was in the navy.." thing? :LOL:

modify your code like this: Private Sub TrnType_AfterUpdate() Dim strSQL As String, frm As Form, subfrm As Form 'insert records to JR_TrClassesT table strSQL = "INSERT INTO JR_TrClassesT (JR_ID, TrnCnt) " & _ "SELECT Personnel.AFD_ID, 0 FROM Personnel " & _...

here's what AI has to say: No, JSON is not unstructured data; it is considered semi-structured data because it has an internal organizing principle (key-value pairs) but lacks the rigid, pre-defined schema of a traditional relational database. It is more organized than unstructured data, which...

Bye-bye Uncle G! "hope you have a lot of good friends out there.."

the Ai keeps generating test code (for export to json) on employee table which i dont have, so i just copy xompany table and rename the copy as employee. New_employee table is created from test code to import back from a json string to New table, which I provide as new_Employees.

Me.Dirty = False, means to save all your changes to the db.

it you need to save the last chckbox, do this On Top of your code: Me.Dirty = False ' your code below

another AI brilliance. create an xml Recordset-like class. see module TestModule for various test.

again, I asked AI to generate a json recordset class, that you can Apply Filter and Change Value just as you can with a normal recordset. this will become very handy if you have a consistent, single table, json file and you want the ability to show it in the form and perform Edit and Filter to...

I think when you change something in the combo and press Enter key, the Default behavior is to stay on the combo. unlike in the Textbox, when you press Enter key, you go to next Textbox/record.

you are Opening tmpCableTable and at the same time Updating The Same tmpCableTable using an Update Query. Can you not just Loop through this recordset and update it, since you said it is already Filtered correctly?

The code generated by our friendly AI. on the Module there are two test subs, one will create (or append to existing) table data from json string. while the other will create 3 related tables. if you see any error you can ask AI for code improvement by pasting the code to it.

No it will not happen, return a Null value. The subquery will return a Value or No record at all, but not Null value. Unless the OP has Null values on UserID field.