Expected End Statement

  • Thread starter Thread starter Joe
  • Start date Start date
J

Joe

Hello,

My vb code is giving me an error after I enter and underscore to seperate my
lines...

Any ideas why? I receive the Error: Expected End Statement...

Function

Dim strSQL As String

strSQL = "Select [mast].acct_nbr, [mast].bank, _
INTO portfolio FROM mast WHERE balance > 0"

DoCmd.RunSQL strSQL

Thanks
 
Joe said:
Hello,

My vb code is giving me an error after I enter and underscore to seperate
my
lines...

Any ideas why? I receive the Error: Expected End Statement...

Function

Dim strSQL As String

strSQL = "Select [mast].acct_nbr, [mast].bank, _
INTO portfolio FROM mast WHERE balance > 0"

DoCmd.RunSQL strSQL
Click to expand...


You can't break your line in the middle of a string literal. Try this
instead:

strSQL = "Select [mast].acct_nbr, [mast].bank " & _
"INTO portfolio FROM mast WHERE balance > 0"

I also took out the extra comma you had after "[mast].bank", which would
have made the SQL statement fail when executed.
 
Thanks Dirck... That worked just fine

Dirk Goldgar said:
Joe said:
Hello,

My vb code is giving me an error after I enter and underscore to seperate
my
lines...

Any ideas why? I receive the Error: Expected End Statement...

Function

Dim strSQL As String

strSQL = "Select [mast].acct_nbr, [mast].bank, _
INTO portfolio FROM mast WHERE balance > 0"

DoCmd.RunSQL strSQL
Click to expand...


You can't break your line in the middle of a string literal. Try this
instead:

strSQL = "Select [mast].acct_nbr, [mast].bank " & _
"INTO portfolio FROM mast WHERE balance > 0"

I also took out the extra comma you had after "[mast].bank", which would
have made the SQL statement fail when executed.

--
Dirk Goldgar, MS Access MVP
www.datagnostics.com

(please reply to the newsgroup)
Click to expand...
 
Back
Top