On a Report, can I change any of the fields in the "Sorting and Grouping Dialog" from within Visual Basic??? Changing the OrderBy property of the Report doesn't change anything, nor does adding an "ORDER BY" clause to the RecordSource SQL Statement.
I have a table, named tInventory. It contains a text field called Item. There may be more than one row where Item is duplicated. I use a field called Year to distinguish them on the printed report. Of course there is a Primary Key field which is AutoNum, and therefore each row is unique.
I print a list of Item, with the Year added to the end. I want to list the Items alphabetically, grouped by the first letter of the Item. Originally, I listed the year as decending, as the newer of duplicate Items was the most important. I now want to give the user control of this, as the users are split on which order is best.
My report, would therefore have: -
RecordSource = "SELECT Left([Item],1) AS FirstLetter, " & _
-
"[Year], " & _
-
"[Item] & "" ("" & [Year] & "")"" AS PrintName" & _
-
"FROM tInventory;"
-
The "Sorting and Grouping Dialog is:
___Field/Expression___So rt Order
[{= FirstLetter____ _____Ascending
___Year________ _____Descending
___PrintName___ _____Ascending
The report has the appropriate PageHeader, GroupHeader, & Detail Sections. This all works very well.
Now I want to add an Option chkShowNewestFi rst, giving users a choice. How do I change the field in the "Sorting and Grouping Dialog" from 'Decending' to 'Ascending' if so checked?
The above code is a simplification of the actual problem. There are actually several GroupHeader levels, each with user choices. For this simple case, I could add a new field in my SELECT statement as either "[Year] AS SortYear" or "9999-[Year] AS SortYear" before assigning to RecordSource, but that gets very messy very fast. It also slows down the program.
10 7573 ADezii 8,834
Recognized Expert Expert
On a Report, can I change any of the fields in the "Sorting and Grouping Dialog" from within Visual Basic??? Changing the OrderBy property of the Report doesn't change anything, nor does adding an "ORDER BY" clause to the RecordSource SQL Statement.
I have a table, named tInventory. It contains a text field called Item. There may be more than one row where Item is duplicated. I use a field called Year to distinguish them on the printed report. Of course there is a Primary Key field which is AutoNum, and therefore each row is unique.
I print a list of Item, with the Year added to the end. I want to list the Items alphabetically, grouped by the first letter of the Item. Originally, I listed the year as decending, as the newer of duplicate Items was the most important. I now want to give the user control of this, as the users are split on which order is best.
My report, would therefore have: -
RecordSource = "SELECT Left([Item],1) AS FirstLetter, " & _
-
"[Year], " & _
-
"[Item] & "" ("" & [Year] & "")"" AS PrintName" & _
-
"FROM tInventory;"
-
The "Sorting and Grouping Dialog is:
___Field/Expression___So rt Order
[{= FirstLetter____ _____Ascending
___Year________ _____Descending
___PrintName___ _____Ascending
The report has the appropriate PageHeader, GroupHeader, & Detail Sections. This all works very well.
Now I want to add an Option chkShowNewestFi rst, giving users a choice. How do I change the field in the "Sorting and Grouping Dialog" from 'Decending' to 'Ascending' if so checked?
The above code is a simplification of the actual problem. There are actually several GroupHeader levels, each with user choices. For this simple case, I could add a new field in my SELECT statement as either "[Year] AS SortYear" or "9999-[Year] AS SortYear" before assigning to RecordSource, but that gets very messy very fast. It also slows down the program.
You modify Sorting and Grouping characteristics of any given Report via the GroupLevel Property where each Group Level is identified by an Index as in: - Reports![rptMovie].GroupLevel(0).KeepTogether = True '1st Level
-
Reports![rptMovie].GroupLevel(1).KeepTogether = True '2nd Level
-
Reports![rptMovie].GroupLevel(2).KeepTogether = True '3rd Level
Many thanks to both for this simple answer. It completely solves my problem.
The link by 'puppydogbuddy' is almost exactly like my program, except I use a series of toggle buttons and options groups instead of combo boxes (one less mouse click).
The post by 'ADezii' is short & sweet, enough to solve my problem after the amount of research done before posting my question. I had spent many hours in Access Help, Google, and this site searching for an answer. I found no reference to 'GroupLevel' and really felt that this was a feature kept from VB by Access.
Thank you again for your serious consideration to my questions?
OldBirdman
Anybody know how to modify to include group level in a dynamic report? There is no report saved in database so you can't go in on the report open sub.
ADezii 8,834
Recognized Expert Expert
Anybody know how to modify to include group level in a dynamic report? There is no report saved in database so you can't go in on the report open sub.
Just subscribing, I'll be back shortly.
ADezii 8,834
Recognized Expert Expert
Anybody know how to modify to include group level in a dynamic report? There is no report saved in database so you can't go in on the report open sub.
- How to create a Dynamic Report in VBA
http://bytes.com/forum/thread696050.html - The following code will create a Group Level on a [PayrollNumber] Field on a Report named rptEmployees. The Report on which the Group Level is to be created must initially be open in Design view.
- Dim varGroupLevel As Variant
-
Dim blnCreateHeaderAlso As Boolean
-
Dim blnCreateFooterAlso As Boolean
-
-
'Let's create a Group Header but no Group Footer on [PayrollNumber]
-
blnCreateHeaderAlso = True
-
blnCreateFooterAlso = False
-
-
'Critical that the Report is Open in Design View
-
DoCmd.OpenReport "rptEmployees", acViewDesign, , , acHidden
-
-
'Create new group level on the [PayrollNumber] Field.
-
varGroupLevel = CreateGroupLevel("rptEmployees", "PayrollNumber", _
-
blnCreateHeaderAlso, blnCreateFooterAlso)
-
-
'Set the Height of the Group Header to 400
-
Reports!rptEmployees.Section(acGroupLevel0Header).Height = 400
-
-
'Save our lovely work
-
DoCmd.Close acReport, "rptEmployees", acSaveYes
Great, that works (my code looks slightly different). Now I'm trying to put labels in the newly created group headers. The labels currently go in the page header and the text boxes are in the acDetail section.
I'm getting an error - either the grouping level doesn't exist or the report creates properly but the labels are nowhere to be found.
Below is my code. Any thoughts? Also, can anyone recommend a good guide to formatting reports? That is basically the last part of my project, I just need the data to look good and have no idea how to resize/move/get everything looking proper. - Case 16
-
group1 = CreateGroupLevel(rpt.Name, strCbo1, 0, 0)
-
group2 = CreateGroupLevel(rpt.Name, strCbo2, 0, 0)
-
group3 = CreateGroupLevel(rpt.Name, strCbo3, 1, 1)
-
group4 = CreateGroupLevel(rpt.Name, "Measure", 0, 0)
-
With rpt
-
.GroupLevel(group3).KeepTogether = 1
-
.GroupLevel(group4).SortOrder = False
-
End With
-
End Select
-
-
'create label on pageheader
-
For Each fld In rs.Fields
-
CreateReportControl rpt.Name, acLabel, acPageHeader, , fld.Name, 0, 0
-
CreateReportControl rpt.Name, acTextBox, acDetail, , fld.Name, 0, 0
-
-
Next fld
I've been trying acGroupLevel2He ader and acGroupLevelgro up3header, nothing seems to work
ADezii 8,834
Recognized Expert Expert
Great, that works (my code looks slightly different). Now I'm trying to put labels in the newly created group headers. The labels currently go in the page header and the text boxes are in the acDetail section.
I'm getting an error - either the grouping level doesn't exist or the report creates properly but the labels are nowhere to be found.
Below is my code. Any thoughts? Also, can anyone recommend a good guide to formatting reports? That is basically the last part of my project, I just need the data to look good and have no idea how to resize/move/get everything looking proper. - Case 16
-
group1 = CreateGroupLevel(rpt.Name, strCbo1, 0, 0)
-
group2 = CreateGroupLevel(rpt.Name, strCbo2, 0, 0)
-
group3 = CreateGroupLevel(rpt.Name, strCbo3, 1, 1)
-
group4 = CreateGroupLevel(rpt.Name, "Measure", 0, 0)
-
With rpt
-
.GroupLevel(group3).KeepTogether = 1
-
.GroupLevel(group4).SortOrder = False
-
End With
-
End Select
-
-
'create label on pageheader
-
For Each fld In rs.Fields
-
CreateReportControl rpt.Name, acLabel, acPageHeader, , fld.Name, 0, 0
-
CreateReportControl rpt.Name, acTextBox, acDetail, , fld.Name, 0, 0
-
-
Next fld
I've been trying acGroupLevel2He ader and acGroupLevelgro up3header, nothing seems to work
Is the Report Open in Design Mode, this Step is critical?
Yes, right before the Select Case statement I have: - DoCmd.reportOpen rpt.Name, acViewDesign
No luck.
If anybody is interested, here is all the nastiness: -
Private Sub FormButton_Click()
-
Dim strAVP, strBranch, strTC, strDrug, strPay, strTrend, strTime, strCbo1, strCbo2, strCbo3, strSQL As String
-
Dim rpt As Report
-
Dim lblNew As Access.Label
-
Dim txtnew As Access.TextBox
-
Dim db As DAO.Database
-
Dim rs As DAO.Recordset
-
Dim fld As DAO.Field
-
Dim rptReport As Access.Report
-
Dim strCaption As String
-
Dim varGroupLevel As Variant
-
Dim WhatToShow As String
-
-
'Loop to Grab AVPList Box entries. The loops are identical for all List Boxes.
-
For Each varItem In Me.AvpList.ItemsSelected
-
strAVP = strAVP & ",'" & Me.AvpList.ItemData(varItem) _
-
& "'"
-
Next varItem
-
-
'If user does not make a selection, select all choices in list box.
-
If Len(strAVP) = 0 Then
-
strAVP = "Like '*'"
-
Else
-
strAVP = Right(strAVP, Len(strAVP) - 1)
-
strAVP = "IN(" & strAVP & ")"
-
End If
-
-
'Loop to grab Branch List Box entries
-
For Each varItem In Me.BranchList.ItemsSelected
-
strBranch = strBranch & ",'" & Me.BranchList.ItemData(varItem) _
-
& "'"
-
Next varItem
-
-
If Len(strBranch) = 0 Then
-
strBranch = "Like '*'"
-
Else
-
strBranch = Right(strBranch, Len(strBranch) - 1)
-
strBranch = "IN(" & strBranch & ")"
-
End If
-
-
'Loop to grab TCList Box entries
-
For Each varItem In Me.TCList.ItemsSelected
-
strTC = strTC & ",'" & Me.TCList.ItemData(varItem) _
-
& "'"
-
Next varItem
-
-
If Len(strTC) = 0 Then
-
strTC = "Like '*'"
-
Else
-
strTC = Right(strTC, Len(strTC) - 1)
-
strTC = "IN(" & strTC & ")"
-
End If
-
-
'Loop to grab DrugList Box entries
-
For Each varItem In Me.DrugList.ItemsSelected
-
strDrug = strDrug & ",'" & Me.DrugList.ItemData(varItem) _
-
& "'"
-
Next varItem
-
-
If Len(strDrug) = 0 Then
-
strDrug = "Like '*'"
-
Else
-
strDrug = Right(strDrug, Len(strDrug) - 1)
-
strDrug = "IN(" & strDrug & ")"
-
End If
-
-
-
'loop for PayList Box entries
-
For Each varItem In Me.PayList.ItemsSelected
-
strPay = strPay & ",'" & Me.PayList.ItemData(varItem) _
-
& "'"
-
Next varItem
-
-
If Len(strPay) = 0 Then
-
strPay = "Like '*'"
-
Else
-
strPay = Right(strPay, Len(strPay) - 1)
-
strPay = "IN(" & strPay & ")"
-
End If
-
-
'loop for TrendList Box entries
-
For Each varItem In Me.TrendList.ItemsSelected
-
strTrend = strTrend & ",'" & Me.TrendList.ItemData(varItem) _
-
& "'"
-
Next varItem
-
-
If Len(strTrend) = 0 Then
-
strTrend = "Like '*'"
-
Else
-
strTrend = Right(strTrend, Len(strTrend) - 1)
-
strTrend = "IN(" & strTrend & ")"
-
End If
-
-
-
For Each varItem In Me.PPList.ItemsSelected
-
strTime = strTime & ", tblAvpBrDg.[" & Me.PPList.ItemData(varItem) & "]"
-
-
Next varItem
-
If Len(strTime) = 0 Then
-
MsgBox "You must select the dates you wish to see."
-
Exit Sub
-
Else
-
strTime = Right(strTime, Len(strTime) - 2)
-
End If
-
-
'Define strings to be used for sorting purposes later
-
strCbo1 = Me.cboSortOrder1.Value
-
strCbo2 = Me.cboSortOrder2.Value
-
strCbo3 = Me.cboSortOrder3.Value
-
strCbo4 = Me.cboSortOrder4.Value
-
strCbo5 = Me.cboSortOrder5.Value
-
-
If strCbo1 = "None" Then
-
S1 = 0
-
Else
-
S1 = 1
-
End If
-
-
If strCbo2 = "None" Then
-
S2 = 0
-
Else
-
S2 = 5
-
End If
-
-
If strCbo3 = "None" Then
-
S3 = 0
-
Else
-
S3 = 10
-
End If
-
-
If strCbo4 = "None" Or IsNull(strCbo4) = True Then
-
S4 = 0
-
Else
-
S4 = 20
-
End If
-
-
If strCbo5 = "None" Or IsNull(strCbo5) = True Then
-
S5 = 0
-
Else
-
S5 = 40
-
End If
-
-
WhatToShow = S1 + S2 + S3 + S4 + S5
-
WhatToGroup = S1 + S2 + S3
-
Select Case WhatToShow
-
Case 0
-
-
strSQL = "SELECT tblAvpBrDg.[AVP], tblAvpBrDg.[Branch], tblAvpBrDg.[THERAPY_CLASS], tblAvpBrDg.[DRUG_GROUP], tblAvpBrDg.[PayorCode], tblAvpBrDg.[Measure], " & strTime & " FROM tblAvpBrDg " & _
-
"Where AVP " & strAVP & " AND " & _
-
"Branch " & strBranch & " AND " & "THERAPY_CLASS " & strTC & _
-
" AND " & "DRUG_GROUP " & strDrug & " AND " & "PayorCode " & strPay & _
-
" AND " & "Measure " & strTrend & ";"
-
-
Case 1
-
strSQL = "SELECT tblAvpBrDg.[" & strCbo1 & "], tblAvpBrDg.[Measure], " & strTime & " FROM tblAvpBrDg " & _
-
"Where AVP " & strAVP & " AND " & _
-
"Branch " & strBranch & " AND " & "THERAPY_CLASS " & strTC & _
-
" AND " & "DRUG_GROUP " & strDrug & " AND " & "PayorCode " & strPay & _
-
" AND " & "Measure " & strTrend & ";"
-
-
Case 6
-
strSQL = "SELECT tblAvpBrDg.[" & strCbo1 & "], tblAvpBrDg.[" & strCbo2 & "], tblAvpBrDg.[Measure], " & strTime & " FROM tblAvpBrDg " & _
-
"Where AVP " & strAVP & " AND " & _
-
"Branch " & strBranch & " AND " & "THERAPY_CLASS " & strTC & _
-
" AND " & "DRUG_GROUP " & strDrug & " AND " & "PayorCode " & strPay & _
-
" AND " & "Measure " & strTrend & ";"
-
Case 16
-
strSQL = "SELECT tblAvpBrDg.[" & strCbo1 & "], tblAvpBrDg.[" & strCbo2 & "], tblAvpBrDg.[" & strCbo3 & "], tblAvpBrDg.[Measure], " & strTime & " FROM tblAvpBrDg " & _
-
"Where AVP " & strAVP & " AND " & _
-
"Branch " & strBranch & " AND " & "THERAPY_CLASS " & strTC & _
-
" AND " & "DRUG_GROUP " & strDrug & " AND " & "PayorCode " & strPay & _
-
" AND " & "Measure " & strTrend & ";"
-
-
Case 36
-
strSQL = "SELECT tblAvpBrDg.[" & strCbo1 & "], tblAvpBrDg.[" & strCbo2 & "], tblAvpBrDg.[" & strCbo3 & "], tblAvpBrDg.[" & strCbo4 & "], tblAvpBrDg.[Measure], " & strTime & " FROM tblAvpBrDg " & _
-
"Where AVP " & strAVP & " AND " & _
-
"Branch " & strBranch & " AND " & "THERAPY_CLASS " & strTC & _
-
" AND " & "DRUG_GROUP " & strDrug & " AND " & "PayorCode " & strPay & _
-
" AND " & "Measure " & strTrend & ";"
-
-
Case 76
-
strSQL = "SELECT tblAvpBrDg.[" & strCbo1 & "], tblAvpBrDg.[" & strCbo2 & "], tblAvpBrDg.[" & strCbo3 & "], tblAvpBrDg.[" & strCbo4 & "], tblAvpBrDg.[" & strCbo5 & "], tblAvpBrDg.[Measure], " & strTime & " FROM tblAvpBrDg " & _
-
"Where AVP " & strAVP & " AND " & _
-
"Branch " & strBranch & " AND " & "THERAPY_CLASS " & strTC & _
-
" AND " & "DRUG_GROUP " & strDrug & " AND " & "PayorCode " & strPay & _
-
" AND " & "Measure " & strTrend & ";"
-
-
End Select
-
-
MsgBox strSQL
-
-
-
'set the title
-
Title = "Title for the Report"
-
-
' initialise position variables
-
lngleft = 0
-
lngtop = 0
-
-
'Create the report
-
Set rpt = CreateReport
-
-
' set properties of the Report
-
With rpt
-
.Width = 8500
-
.RecordSource = strSQL
-
.Caption = Title
-
.Section(acDetail).Height = 100
-
-
End With
-
-
' Open SQL query as a recordset
-
Set db = CurrentDb
-
Set rs = db.OpenRecordset(strSQL)
-
-
DoCmd.OpenReport rpt.Name, acViewDesign
-
-
Select Case WhatToGroup
-
-
Case 0
-
group1 = CreateGroupLevel(rpt.Name, "AVP", 0, 0)
-
group2 = CreateGroupLevel(rpt.Name, "Branch", 0, 0)
-
group3 = CreateGroupLevel(rpt.Name, "THERAPY_CLASS", 0, 0)
-
group4 = CreateGroupLevel(rpt.Name, "DRUG_GROUP", 0, 0)
-
group5 = CreateGroupLevel(rpt.Name, "PayorCode", 1, 1)
-
group6 = CreateGroupLevel(rpt.Name, "Measure", 0, 0)
-
With rpt
-
.GroupLevel(group1).KeepTogether = 1
-
.GroupLevel(group6).SortOrder = False
-
End With
-
-
Case 1
-
group1 = CreateGroupLevel(rpt.Name, strCbo1, 1, 1)
-
group2 = CreateGroupLevel(rpt.Name, "Measure", 0, 0)
-
With rpt
-
.GroupLevel(group1).KeepTogether = 1
-
.GroupLevel(group2).SortOrder = False
-
End With
-
-
Case 6
-
group1 = CreateGroupLevel(rpt.Name, strCbo1, 0, 0)
-
group2 = CreateGroupLevel(rpt.Name, strCbo2, 1, 1)
-
group3 = CreateGroupLevel(rpt.Name, "Measure", 0, 0)
-
With rpt
-
.GroupLevel(group2).KeepTogether = 1
-
.GroupLevel(group3).SortOrder = False
-
End With
-
-
Case 16
-
group1 = CreateGroupLevel(rpt.Name, strCbo1, 0, 0)
-
group2 = CreateGroupLevel(rpt.Name, strCbo2, 0, 0)
-
group3 = CreateGroupLevel(rpt.Name, strCbo3, 1, 1)
-
group4 = CreateGroupLevel(rpt.Name, "Measure", 0, 0)
-
With rpt
-
.GroupLevel(group3).KeepTogether = 1
-
.GroupLevel(group4).SortOrder = False
-
End With
-
End Select
-
-
'create label on pageheader
-
For Each fld In rs.Fields
-
CreateReportControl rpt.Name, acLabel, acGroupLevelgroup3Header, , fld.Name, 0, 0
-
CreateReportControl rpt.Name, acTextBox, acDetail, , fld.Name, 0, 0
-
-
Next fld
-
-
-
'arrange fields
-
For Each Ctrl In rpt.Controls
-
-
Select Case Ctrl.ControlType
-
Case acTextBox
-
If TextCol Then
-
Ctrl.Name = Ctrl.ControlSource
-
Ctrl.Move TextWidth, 0, Ctrl.Width, Ctrl.Height
-
TextWidth = TextWidth + Ctrl.Width
-
Else
-
Ctrl.Name = Ctrl.ControlSource
-
Ctrl.Move TextWidth, 0, Ctrl.Width, Ctrl.Height
-
TextWidth = TextWidth + Ctrl.Width
-
End If
-
TextCol = False
-
Case acLabel
-
If FirstCol Then
-
Ctrl.Name = "lbl" & Ctrl.Caption
-
Ctrl.Move ColWidth, 0, Ctrl.Width, Ctrl.Height
-
-
Else
-
Ctrl.Name = "lbl" & Ctrl.Caption
-
Ctrl.Move TextWidth, 0, Ctrl.Width, Ctrl.Height
-
-
End If
-
Ctrl.FontSize = 8
-
Ctrl.FontWeight = 700
-
FirstCol = False
-
Case Else
-
-
End Select
-
-
Next Ctrl
-
-
' Create datestamp in Footer
-
Set lblNew = CreateReportControl(rpt.Name, acLabel, _
-
acPageFooter, , Now(), 0, 0)
-
-
' Create page numbering on footer
-
Set txtnew = CreateReportControl(rpt.Name, acTextBox, _
-
acPageFooter, , "='Page ' & [Page] & ' of ' & [Pages]", rpt.Width - 1000, 0)
-
txtnew.SizeToFit
-
-
DoCmd.OpenReport rpt.Name, acViewPreview
-
-
-
'reset all objects
-
rs.Close
-
Set rs = Nothing
-
Set rpt = Nothing
-
Set db = Nothing
-
End Sub
I'm very new to access and vba - I've pieced all this together from sites like this and tons of trial and error. I just need to figure out all the report formatting tricks.
Sign in to post your reply or Sign up for a free account.
Similar topics |
by: Matt |
last post by:
Hi all,
We recently upsized two Microsoft Access Databases to SQL. We're
using an ADP (2002) as the front end.
All the conversion issues have been resolved, except for one:
Whenever we insert a record into a table, the table isn't sorted by
primary key like I would expect. Instead, the record can be found at
the end of the table. This makes finding a particular record
(especially as time goes on) very difficult.
|
by: DerekM |
last post by:
I have a database project that I created with several forms and
reports. I would like to be able to declare a single title and be
able to change the title on all the forms and reports by changing a
single variable. I think this is possible, however I don't know
Visual Basic very well. I created a module named DBcommon with the
following statements in it:
Option Compare Database
Global Const DBname As String = "Title String"
|
by: James P. |
last post by:
Hello,
I have a report with the Priority field is used as sort order and
grouping. The problem is the data in this Priority field if sorted in
ascending order is: High, Low, and Medium. How could I sort it as:
Low, Medium, High?
Any suggestion is greatly appreciated,
James
|
by: Terri |
last post by:
The following query will give me the top ten states with the most callers.
SELECT TOP 10 Count(Callers.CallerID) AS CountOfCallerID, Callers.State
FROM Callers
GROUP BY Callers.State
ORDER BY Count(Callers.CallerID) DESC;
How can I return the same result set, the top ten states, but sort the
result set by state.
|
by: fecket |
last post by:
The following code is used in my db to change the sort order of the
report to various fields. I want to take this one stage further and
use maybe a Case Select to give 2 or 3 different options to sort the
report.
Is ther any way I can adress the report name as is used in strDocName
and strSQL so instead of having
Reports!.OrderBy = strSQL
| |
by: praful pathak |
last post by:
i
i am praful pathak,porbandar
i want to develop my own cross tab report in visual basic 6 i know what
developed query from ms access but how to coded in visual basic in
designing time and how to construct it
plz solve this problem
query from ms access
TRANSFORM Sum(Temp.SumOfS_Qty) AS SumOfSumOfS_Qty
|
by: Martin.Molch |
last post by:
Hello,
DB2 seems to do a SORT before every GROUP BY action. At least if I look
at the query plan (using Visual Explain in the Command Center) of
-- connected to the sample db
SELECT WORKDEPT, SUM(SALARY)
FROM EMPLOYEE
GROUP BY WORKDEPT
|
by: Henrootje |
last post by:
I have a lot of tables that hold a lot of numeric fields.
The names of all of these tables start with ' tblRO'
Now it turns out that all of the numeric fields with type double
precision have the property 'schaal' (<- dutch, the one above
'precision' ) set to zero. This should be '10' .
Is there a way to change this through VBA? Using a loop or so?
TIA Henro
|
by: thatguyNYC |
last post by:
Hey there--
I have a report with a one-to-many relationship on it. The EmployeeName field is grouped (by primary key) and shown in its own header and the EmployeeHistories are displayed in the detail section. Above the EmployeePkey grouping, I have several sorts - Dept, Title, Location and FullName.
Everything is working fine, until one day my boss asks if she can have different sort options. One day, she may want a report sorted by...
|
by: marktang |
last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However, people are often confused as to whether an ONU can Work As a Router. In this blog post, we’ll explore What is ONU, What Is Router, ONU & Router’s main usage, and What is the difference between ONU and Router. Let’s take a closer look !
Part I. Meaning of...
|
by: Oralloy |
last post by:
Hello folks,
I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>".
The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed.
This is as boiled down as I can make it.
Here is my compilation command:
g++-12 -std=c++20 -Wnarrowing bit_field.cpp
Here is the code in...
| |
by: tracyyun |
last post by:
Dear forum friends,
With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each protocol has its own unique characteristics and advantages, but as a user who is planning to build a smart home system, I am a bit confused by the choice of these technologies. I'm particularly interested in Zigbee because I've heard it does some...
|
by: isladogs |
last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM).
In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules.
He will explain when you may want to use classes instead of User Defined Types (UDT). For example, to manage the data in unbound forms.
Adolph will...
|
by: conductexam |
last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and then checking html paragraph one by one.
At the time of converting from word file to html my equations which are in the word document file was convert into image.
Globals.ThisAddIn.Application.ActiveDocument.Select();...
|
by: TSSRALBI |
last post by:
Hello
I'm a network technician in training and I need your help.
I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs.
The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols.
I succeeded, with both firewalls in the same network. But I'm wondering if it's possible to do the same thing, with 2 Pfsense firewalls...
|
by: adsilva |
last post by:
A Windows Forms form does not have the event Unload, like VB6. What one acts like?
|
by: 6302768590 |
last post by:
Hai team
i want code for transfer the data from one system to another through IP address by using C# our system has to for every 5mins then we have to update the data what the data is updated we have to send another system
| |
by: muto222 |
last post by:
How can i add a mobile payment intergratation into php mysql website.
| |