Local cSql As String,; nResult As Integer,; nAlias As Integer,; cCheckName As String,; cCheckAddProperty As String,; cCheckSqlString AS String cSql = [Select * From X313CheckBoxRules] nResult = SQLExec(lnSql,cSql,[CheckBoxRules]) nAlias = Select() Select CheckBoxRules Scan cCheckName = [.] + Alltrim(CheckBoxRules.Checkname) With Thisform.Pages1._Page1 cCheckAddProperty = cCheckName + [.Addproperty('cSqlString')] Try lRetVal = Evaluate(cCheckAddProperty) && Executes ok! cCheckSqlString = cCheckName + [.cSqlString = ] + '[' + Alltrim(CheckBoxRules.Rules) + ']' lRetVal = Evaluate(cCheckSqlString) && Error operator / operand type mismatch Catch To oException oException = Null Endtry Endwith Endscan Use In CheckBoxRulesBut I still get errors.
>>Local cCheckName AS String >> >>Scan >> cCheckName = [.] + Alltrim(CheckBoxRules.Checkname) >> With Thisform.Pages1._page1 >> ? &cCheckName && evaluates to _Check1 of type object >> &cCheckName..Addproperty('cSqlString',&Rules) && Error >> Endwith >>Endscan >>>>