removing the ";"

[Rich]

I am writing code that will edit an existing SQL statement
by adding a "WHERE" clause to the end of it, thus adding
user inputed criteria. Problem is, the existing SQL has
a ";" at the end of. To add the "WHERE" clause, and have
it work, I need the ; to go away. Please let me know if
there is a way to do this. Thank you for any help.

 

[Cheryl Fischer]

You could use:

strSQL = Left(strSQL, InStr(strSQL, ";") - 1)


hth,

 

[Guest]

For starters, you can use the Left() and Len() functions in tandem. Like this

MyNewSql=left(MyOldSql,Len(MyOldSql)-1) & ....add new code here

The Len() function will return the length of the entire string, the Left() function, with the "-1", will tell it to ignore the last byte (the ";"), and now you're ready to add new code

Good Luck

 

[Graham R Seach]

Sam,

You only need the ";" if you're running multiple sequential queries,
otherwise, it's redundant.

Regards,
Graham R Seach
Microsoft Access MVP
Sydney, Australia

Microsoft Access 2003 VBA Programmer's Reference
http://www.wiley.com/WileyCDA/WileyTitle/productCd-0764559036.html