Abfrage+Bericht konvertieren Access 2003 zu 2007
eagle
Gesendet: 27.11.11 11:18
Betreff: RE: Abfrage+Bericht konvertieren Access 2003 zu 2007


Hallo Gunter,

habe inzwischen weiter gesucht was es sein könnte. Schätze, es liegt an der Where Bedingung und/oder dem Ampersand??

Quote Abfrage/Bericht A26

Private Sub Report_Open(Cancel As Integer)
Me.RecordSource = "Select * From A26_U"
If Len(GL_szReportWhere) > 0 Then
Me.RecordSource = Me.RecordSource & " Where " & GL_szReportWhere
End If
End Sub

Quote Abfrage/Bericht A26_U

Private Sub Report_Open(Cancel As Integer)

Dim szRecSrc As String

szRecSrc = _
"SELECT [Beruf], CLngNull(Sum([1])) AS Maennlich, CLngNull(Sum([2])) AS Weiblich " & _
"FROM [A26_U] "
'
If GL_szReportWhere <> "" Then
szRecSrc = szRecSrc & _
"WHERE " & GL_szReportWhere & " "
End If
'
szRecSrc = szRecSrc & _
"GROUP BY [Beruf] "
'
On Error Resume Next
Me.RecordSource = szRecSrc

End Sub

Habe aber noch keinen Hinweis irgendwo gefunden, was man anstelle setzen kann oder muss.
Gruß Gitta und danke Dir für noch einmal drüber schauen

Top of the page Bottom of the page