Search results

i somewhat modified some codes.

you can easily create the report in MS Acess with two textboxes. The English contract will be left justified while the text in Arabic, right-justtified.

image refered on post #6

there is also (i did not test it) an open source on Github: https://github.com/Dijji/XstReader

see your database and the formula on the 2 Unbound textbox.

if you want to show the 2 Sum values in your form, add 2 Unbound textbox. for the Total Payment, put this as Controlsource: =DSum("PaymentAmount","PaymentTable", "PaymentDate >=#" & Format$(Nz([txtFrom],1),"m/d/yyyy") & "# And PaymentDate <= #" & Format$(Nz([txtTo],2958465),"m/d/yyyy") & "#")...

I did not add another field. I added another Image control and using VBA and set the ControlSource to: =GetLogo() see the GetLogo() function on the report's VBA code.

what happened then?:unsure:

you can try this SQL (somebody might have a better sql) Replace "YourTableName" with the name of your table. SELECT TOP 1 fnFinancialYearStart(1) & " - " & Date() AS Period, (SELECT SUM(FarmerShareAmount) FROM YourTableName WHERE FarmerShareRcvdDate BETWEEN fnFinancialYearStart(1) AND DATE())...

Can't you just Format it without passing it to dataSQL() function: Me.Filte = "REGISTRATION_DATE >= #" & Format$(DateAdd("m", -1, Now), "mm/dd/yyyy") & "#"

you can only Aggregate each amount fields from Starting fiscal year up to Ending fiscal year.

IMO, you don't need to define the PARAMETERS. If you pass a wrong parameter type it will be ignored (Null value will be saved).

same demo as in post #18 also the db on post #6 of this thread, you can click on the Record-selector to select the record. https://www.access-programmers.co.uk/forums/threads/unbound-check-box-on-continuous-subform-for-selecting-records.309846/#post-1867836

fnAnySQL uses Querydefs() so you can use the form's value directly and it will handle the Nulls. so there is no special need to convert them to string or delimited string.

i created a UDF here called fnAnySQL() https://www.access-programmers.co.uk/forums/threads/fnanysql-parameter-query.297170/ if you use the function, you modify your SQL to: AID = Me.Parent.fAccountID '0 NID = Me.Parent.cboFullName.Value '1 CDt = Me.Parent.CkDate...

it is a minor issue, imo. actually the records are complete, you just need to Add sort Order to your form/subform. Sort it by RepNo ASC.

you can create a function that will Move the file once a Hyperlink has been selected from the screen. copy the code in a Module: Public Function fnMoveHyperLink(ByVal hyperLnk As String, ByVal TargetPath As String) Dim lnk As String Dim fil As String Dim newPath As String Dim...

you would have said that to ChatGPT:rolleyes:

IMO, you should first check the "Date To" string and parse the date? strDateTo = (Cdate("theParsedDateTo") & "")=> will give you the string date in English(EN) then compare the resulting string to "theparsedDateTo". if they are the same, re-format the date column as Englisjh(EN), otherwise as...

you need to revise the code that causes the error, eg: Dim Result As long Result = Clng(giCl) * Clng(anyValue)