Search results

it seems to me the vb code would be in outlook, scanning the folder, then if needed post updates to the database via ADO.

Put the BackEnd on a server folder relink the FrontEnd to this spot using UNC paths (\\server\folder\) not Drive Letters (f:\folder) then give each person a copy of the FE to use.

You can copy it from a PC that has it, then put it in the System32 folder, then register it. regsvr32.exe myObj.ocx then add it to the db registry: (Alt-F11), tools , references, browse to it

Q1 : select iif([field]='Y',1,0) as YesFld, iif([field]='N',1,0) as NoFld from table Q2, count the results from Q1

set the subform default property .LOCKED =true then when user alters a box, do the check to unlock. It also checks when you load the record. Function IsValidMasterFrm() as boolean IsValidMasterFrm = not isnull(FIELDa) and not isnull(FIELDb) and not isnull(FIELDc) and not isnull(FIELDd)...

the combo should be bound to a table/query. Do NOT use hardcoded value list add items by entering them into the table refresh the combo if it was left open to get the new values.

just run the Dlookup against the table: vVal = DLookup("OrignalInvoiceNumber", "tblCustomerInvoice", "[InvoiceID]= " & Me.CboEsdInvoices) not sure what your TRANSACTION does, but my plain sql dlookups run fast.

make a list box in a form that uses a query of the data needed a RUN button on the form to cycle thru a listbox exporting each record sub btnSend_click() Dim i As Integer dim vItm, vDir, vFile For i = 0 To lstBox.ListCount - 1 vItm= lstBox.ItemData(i) 'get next item in list data...

Any office (or other ) references to older programs in the app will fail. if the app had ref to office 15 and the pc has off.16 and win11 then it will NOT update the reference. we are experiencing this. Win10 would automatically update the ref, but not Win11. so I must make 2 (or more)...

yes, it has PTRSAFE to run on both OS types. The red is for you to notice.

Paste this code into a module, then its usage is: OpenNativeApp txtBox if the path in the text box is a audio file, it will open in the audio player if the item in the text box is a URL, it will open in default explorer etc... OpenNativeApp "c:\folder\file.doc" 'whatever path is in the...

cant you just select the record then press the keyboard Delete key? or you could add a field MARK (checkbox) ,the user checks all recs to delete then press your delete button which runs a delete query: delete * from table where [mark]=true

without using the 2nd query, just use a Age formula, but you still need to join Q1 to the person table to get the birthdate.

paste this code into a module, then in the debugger window (ctl-G) type: FindInSql "tMyTable" it will then show all queries using the parameter given. Public Sub FindInSql(pvFind, Optional ByVal pvQType) 'Dim db As Database Dim qdf As QueryDef Dim vFind Dim sSql As String 'qtype can be...

what do you mean doesnt work? what kinda field type is it? integer/boolean/etc is it not showing data on the form or the query??

You can’t. The print command is internal to access and you must wait for it to finish. but you could try putting code in the ON PRINT event in the report.

you need a table to store the roster of the event and what place they came in, keyed (*) so there’s no dupes tEventRoster: *EventRef *RunnerRef Place

select case frame1.value case 1 txtBox1.visible = true case 2 txtBox1.visible = false txtBox2.visible = true case 3 txtBox1.visible = true txtBox2.visible = false 'etc end select

If you use a variant,it can be either string or number. you can’t assign a string to a variable defined as number.

if [Mtest].Enabled Then [Mexam4] = [Msample1] & ".PDF" [Mexam5] = [Msample2] & ".PDF" endif