数据窗口小结
数据窗口进行删除数据时:
int zgxx_id=integer(sle_3.text)
PREPARE SQLSA
FROM "DELETE FROM ZGXX WHERE id=?";
EXECUTE SQLSA USING :zg_id2;
messagebox("提示","删除完毕!")
应用场景:主要注意分号的使用不加上会报错误
int s,zgxx_id,zg_id2
zgxx_id=integer(sle_3.text)
s=dw_1.getrow()
zg_id2=dw_1.getitemNumber(s,"id")
st_4.text="当前数据:(现有"+string(dw_1.rowcount())+"条)"
if zgxx_id<>0 then
if messagebox("删除","是否真要删除工号为"+string(zgxx_id)+"的数据",Question!,YesNo!,2)=1 then
PREPARE SQLSA
FROM "DELETE FROM ZGXX WHERE id=?";
EXECUTE SQLSA USING :zgxx_id;
messagebox("提示","删除完毕!")
end if
ELSE
if s>0 then
//如果有数据
//让用户确定是否真要删除数据
if messagebox("删除","是否真要删除姓名为"+dw_1.getitemstring(s,"xm")+"数据",Question!,YesNo!,2)=1 then
//dw_1.deleterow(s)
PREPARE SQLSA
FROM "DELETE FROM ZGXX WHERE id=?";
EXECUTE SQLSA USING :zg_id2;
messagebox("提示","删除完毕!")
end if
else
Beep(1)
MessageBox("提示","请选择要删除的数据")
end if
END IF