怎么执行文本框中的SQL语句？但是只限于查询语句，如果有delete或者zap或者replace等修改记录语句都将不执行？多谢

如何执行文本框中的SQL语句？但是只限于查询语句，如果有delete或者zap或者replace等修改记录语句都将不执行？？谢谢！
如何执行文本框中的SQL语句？但是只限于查询语句，如果有delete或者zap或者replace等修改记录语句都将不执行？？谢谢！

------解决方案--------------------
cSqlCommand = ThisForm.TextBox1.Value

&&执行VFP的SQL
&cSqlCommand

&&执行SQL Server的SQL
nResualt = SQLEXEC(nSqlHandle, cSqlCommand, "curSqlResualt")


------解决方案--------------------
lcCommandStr=UPPER(ThisForm.TextBox1.Value)
if 'DELE'$lcCommandStr or 'ZAP'$lcCommandStr OR 'REPL'$lcCommandStr
return
endif
&lcCommandStr. &&执行语句
------解决方案--------------------
信息不够详细，只能有SELECT，一条还是多条命令、运行环境？