表单的 load
PUBLIC nhandle
&&在表单需要读取数据的时候才连接.
nhandle=sqlstringconnect("driver={MySQL ODBC 8.0 Unicode Driver};server=49.224.177.117;uid=root;pwd=123456;database=wssry;PORT=3306;CHARSET=gb2312")
sqlexec(nhandle,'select * from byhmc','byhmc') &&读取远程表数据
open data gl && 打开gl 数据库
REQUERY("styhmc")&& 刷新视图表
**************************************
command1 click
USE styhmc
&&编译后就在这里出错
SELECT styhmc
locate for ALLTRIM(styhmc.grdm) == ALLTRIM(thisform.edit1.Value)
if found()
thisform.label1.caption=ALLTRIM(styhmc.dwmc)+styhmc.yhxm
ELSE
thisform.label1.caption="对不起!查无此人。"
continue
ENDIF
[此贴子已经被作者于2019-7-25 08:03编辑过]