我直接在main視窗的open里寫的:
select emp,pay2,title into :iv_emp,:lv_pay2,:lv_title //實體變數
from popedom
where id=:g_uno; //全域變數
if iv_emp='0' and lv_pay2='0' and lv_title='0' then
messagebox('提示','請先設定權限再進入')
halt close
end if
if iv_emp='1' then
m_main.m_學生管理.m_增加.enabled=true
else
m_main.m_學生管理.m_增加.enabled=false
end if
if lv_pay2='1' then
m_main.m_學生管理.m_洗掉.enabled=true
else
m_main.m_學生管理.m_洗掉.enabled=false
end if
if lv_title='1' then
m_main.m_學生管理.m_修改.enabled=true
else
m_main.m_學生管理.m_修改.enabled=false
end if
結果用賬號登進去,不管我在SQL里emp,pay2,title三個值寫0還是1,系統進去后主選單的增加、洗掉、修改都是灰的,求解
uj5u.com熱心網友回復:
除錯跟蹤一下按你的代碼及執行結果可知:iv_emp、lv_pay2、lv_title 不可能同時為'0',但是結果是同時為灰色,說明很有可能此處的代碼并沒有對主選單產生作用。
你直接插個按鈕,在clicked事件中寫:m_main.m_學生管理.m_洗掉.enabled=true 試試,看有沒有效果
uj5u.com熱心網友回復:
可友在select 陳述句后寫:if sqlca.sqlcode <> 0 then
messagebox('SQL 執行錯誤', sqlca.sqlerrtext)
return
end if
看看SQL 是否執行成功。
uj5u.com熱心網友回復:
你的iv_emp,lv_pay2,lv_title的值可能是null!轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/79280.html
標籤:腳本語言
下一篇:pb 模糊查詢
