Re: Run Time Error 3075 Missing Operator

I've tried using the step into tool, however, it doesn't work for this
code, or I'm doing something wrong.

ManningFan wrote:
I have 2 words for you; STEP INTO.

Learn it, live it, love it.


fredindy wrote:
I have code that works on every from I have created except for the
latest. Here it is:

Private Sub cmdGo_Click()

Dim sSQL As String
Dim selector As String
Dim sText As String

sSQL = "SELECT qryFindRental.[EventID], qryFindRental.[Name],
qryFindRental.[FILENUMBER]," & _
" qryFindRental.[RENTALITEM], qryFindRental.[RENTALDATE],
qryFindRental.[RENTALTYPE]" & _
" FROM qryFindRental" & _
" WHERE qryFindRental." & selector & " LIKE '" & sText & "'"

Me.txtRentalItem.Visible = True
Me.txtRentalType.Visible = True
Me.txtName.Visible = True
Me.txtFileNumber.Visible = True
Me.txtRentalDate.Visible = True
Me.cmdEdit.Visible = True
Me.Line10.Visible = True
Me.RecordSource = sSQL
Me.Requery

End Sub

When I enter text in sText and select the value in my combo box and
click the button I receive the run time error. The difference between
this form and the others is that the code references a query whereas
the others reference a table. Help?

Fred

.

Relevant Pages

  • Re: Search and Replace parameter too long?
    ... Dim rText As String ... Dim sText As String ...
    (microsoft.public.word.vba.general)
  • Re: CAPITALIZE FIRST LETTER OF EACH WORD
    ... Public Function FirstCharUCAs String ... Dim sText As String ... Dim sTmp() As String ... Dim iCtr As Integer ...
    (microsoft.public.access.formscoding)
  • Re: Copy string array to string
    ... Dim al As New ArrayList ... Dim s As String ... >a tight loop. ... >dim sText as string ...
    (microsoft.public.dotnet.languages.vb)
  • Re: Return a Byte Array
    ... Private Sub Command1_Click ... Dim sText As String ... Private Function ByteFunc(sSource As String) As Byte ...
    (microsoft.public.vb.general.discussion)
  • Search pattern
    ... Dim strfile As String ... Dim bAddressFound As Boolean ... Dim strCurrentChar As String ...
    (comp.databases.ms-access)