Here's some code I have to generate a SQL statement Public Function BuildRepSQL(ByRef clsRepLine As CRepLine, eType As aiDBStatus) As String
Dim sReturn As String
With clsRepLine
Select Case eType
Case aidbstatusdelete
sReturn = "DELETE * FROM tblRepLine WHERE [...] Read More...