Hi Boris,

Some SQL statement stored in a table.

I know I shold not put the & in front of Rules and I got a bit further with this

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 CheckBoxRules

But I still get errors.




>>Can somebody please tell me what's wrong with this code?
>>
>>

>>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
>>

>>
>>I also tried &cCheckName.Addproperty('cSqlString',&Rules) with similar results.
>>
>>TIA & BR
>>
>>Peter
>
>What is Rules?

Hi Boris,

Some SQL statement.