Search results

if it is alreay Solved on that thread, stick to that thread.

on query qryCDpayrolltaxesWI, you are only processing Single status, for Married what formula do you use? so after combining all of these into 1 function, you have no need for query qryStateTax?

show us your Query SQL string.

what is the code you are using to check if an item has available stock?

Me.TxtTextSummary = "<strong>" & UCase([Forms]![FRM_TBLALL_FullDetails]![SFRM_TBL_StaffDetails].[Form]![LblComplaintRef]) & "</strong>"

create a query for your table and add the Calculated column (the 1 and 0). use the Query as recordsource of your continuous form, then you can sum the Calculated column.

the &amp comes when you highlight the code and copy/paste it, instead of using the Clipboard button to copy.

you need to Loop through each record of the subform's recordset" With Me.subformName.Form.RecordsetClone If Not (.BOF And .EOF) Then .MoveFirst Do Until .EOF 'check if item has .MoveNext Loop End If End With

must have uploaded the wrong version. here again.

"Shell.application" will only open the file and has no way to open the SubAddress. just use FollowHyperlink. FollowHyperlink can only be used on MS apps that has SubAddress (Excel, Word, PP).

you open the the query in design view and see the Expressions on the Computed columns of MarSM2, MarSM, MarLG, etc.

somewhere in this forum, there is a case where you can change the Labels of Controls to simulate multi language. orientation of Text Input can be change also by changing the Keyboard language via VBA.

i think there is no advantage of using a Function on your case. see BasTaxCompute module and query QryStateTax_arnelgp that uses ComputeTax function.

using this method will not show any warning: Dim sPath As String sPath = "E:\Images\ALL RAW Images\Herbanium_Collection\Group_E\Ericaseae-eric-1\DMHN010962A.nef" CreateObject("Shell.Application").NameSpace(0).ParseName(sPath).InvokeVerb "Open"

maybe the db was created for Arabic audience, the reason for the orientation. and the client approved of such. before you do any modification, create a copy of the db and keep in a safe place, in case it got worse than before. i may hint you are also not an ms access programmer yourself. if you...

you drag tblUser, 2 times and join them on appropriate field: SELECT tblTaskAssignment.taskAssignmentID, tblTaskDefinition.TaskDescription, tblTaskAssignment.TaskAssignmentStatusUpdated, tbluser.username, tbluser.UserID, tbluser.UserTypeID, tblTaskAssignment.TaskAssignmentStatus...

don't use Dlookup. use Query designer and drag those 4 tables and join them on their appropriate related fields. test the query and use it instead of your SQL string. SELECT tblTaskAssignment.taskAssignmentID, tblTaskDefinition.TaskDescription, tblTaskAssignment.TaskAssignmentStatusUpdated...

you may also try: Public Sub CreatePathFromRoot(Byval sNewPath as string) Dim drv As String drv = GetDrive() sNewPath = Replace$(drv & "\" & sNewPath, "\\", "\") On Error Resume Next MkDir sNewPath End Sub Public Function GetDrive() As String Dim f As Object, fso As Object Set fso =...

as suggested in post #3 if the comboboxex are Bound and the textbox get their values from the combos, set the textbox values using the Current Event of the Form, eg: Private Form_Current() Me!Textbox1 = Me!Combo1.Column(1) End Sub

again i will ask you, did you Download the rectified db i uploaded. You should try it not your version.