If this is indeed Access query then there is no significance of the forward slash and the problem is actually caused by something else. Forward slash in Access should not need any special handling. Usually what helps in the situations like this is to visually check the SQL statement, so the errors (if any) are visible to the naked eye. By the way, it might be easier to use single quotes instead of the double quotes, so there is no need to double every occurence of the double quote to ensure proper escaping. Please try this:
Dim strSQL as String
strSQL = "
SELECT Left([ARP],5) AS LRP,
Mid([ARP],7,4) AS LRT,
Right([ARP],4) AS NRT,
Mid([ARP],5) AS NRP,
Mid([Message],InStr([Message],'ARP'),50) AS ReportingPoint,
Abs(InStr([ReportingPoint],' ') -6) AS Length,
Mid([ReportingPoint],6,[length]) AS FN,
Mid([ReportingPoint],[length]+7,[length]+21) AS ARP,
dbo_tblRXMessages.RxDateTime
from dbo_tblRXMessages
WHERE (((dbo_tblRXMessages.RxDateTime)>Date()-7)
AND ((dbo_tblRXMessages.Message) Like '**ARP*'
And (dbo_tblRXMessages.Message) Not Like '*metservice*'
And (dbo_tblRXMessages.Message) Like '*" & CStr(Me.lstSelectFlight) & "*'))
ORDER BY dbo_tblRXMessages.RxDateTime;"
' Visually check how your strSQL looks like when passing the Me.lstSelectFlight
' value which causes the problem. Does it run in the query designer?, i.e.
Clipboard.Clear
Clipbioard.SetText strSQL, 1
' paste to query designer. Does it parse and run properly?
Me.lstARPs.RowSource = strSQL
Oleg
↧