1. 程式人生 > >PB資料視窗

PB資料視窗

資料視窗小結
資料視窗進行刪除資料時:

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