lcSql = [SELECT User.* FROM User WHERE Usrname LIKE '] + tuUsrname + [']It explicitly uses single quote as string literal delimiter which may or may not work with all backends.
> FUNCTION GetUserByUsrname( tuUsrname ) > *----------------------------------------------------- > LOCAL loADO > loADO = THIS.GetADOAggregateParameter() > WITH loADO.oCommand > .ActiveConnection = loADO.oConnection > > *********************************** > *---------------------------------- > .CommandText = [ SELECT User.* FROM User WHERE Usrname LIKE ? ] > .PARAMETERS.APPEND(.CreateParameter( "Usrname", adChar, adParamInput, 18 ,tuUsrname )) > *********************************** > ENDWITH > > THIS.ExecuteSQLQuery( loADO ) > RETURN loADO.oRecordSet > > ENDFUNC > >>
> FUNCTION GetUserByUsrname( tuUsrname ) > *----------------------------------------------------- > LOCAL loADO, lcSql > loADO = THIS.GetADOAggregateParameter() > WITH loADO.oCommand > .ActiveConnection = loADO.oConnection > > lcSql = 'SELECT User.* FROM User WHERE Usrname LIKE ' + tuUsrname > .CommandText = lcSql > ENDWITH > > THIS.ExecuteSQLQuery( loADO ) > RETURN loADO.oRecordSet > > ENDFUNC > >