全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:807
推到 Plurk!
推到 Facebook!

兩個Query不同登入者的驗證,與基本元件用法

缺席
toyota362
一般會員


發表:2
回覆:1
積分:0
註冊:2011-08-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2011-08-13 15:08:34 IP:118.167.xxx.xxx 訂閱
請問大大們,我現在要驗證  登入者是否與該 課長V02AEMPID或     稽核者PA_MAIN_AUDITOR 才可以登入 否則show出不能登入等訊息
以下是我的程式碼 不知道是否能這樣寫 與Query元件等用法
我在button內寫了驗證等訊息,如果是 稽核者可以打開qryTemp1做存取 如果是課長可以打開qryTemp2做存取,否則show出非該主辦稽核員或課長不可修改 ,我不知道我語法是否有錯 大大們能幫我看一下嗎
begin
if qryTemp1.PA_MAIN_AUDITOR = ''' Paramstr(1) ''' then
begin
with qryTemp1, SQL do
begin
Close;
Clear;
Open;
else if qryTemp2.V02AEMPID = ''' Paramstr(1) ''' then
begin
with qryTemp2, SQL do
begin
Close;
Clear;
Open;
else
begin
Close;
ShowMessage('此案件已核定完成,非該主辦稽核員或課長不可修改!');
Abort;
end;
end;
end;
end;

在兩個Query元件內SQL語法分別寫了,我的想法是有先下語法選擇連到資料庫的Table才能做上面那段程式的判別
SELECT ''X'' '
' FROM PA_AUDIT_D A, PA_AUDIT_M B '
' WHERE B.PA_MAIN_AUDITOR = ''' Paramstr(1) ''' ' //登入使用者
' AND A.RESERVE_NO = B.PA_RESERVE_NO ';
SELECT ''X'' '
' FROM V02A_VIEW_PA '
' WHERE V02AEMPID = ''' Paramstr(1) ''' ' //登入使用者
' AND V02AEPTN = ''課長'' '
' AND V02ASORGIN = ''稽核組'' ' ;
系統時間:2024-03-29 19:23:49
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!