程式码塞流程文件资料.pdfVIP

程式碼控制流程說明文件 一、 用途 EasyFlow 流程大都由「流程設定精靈」或開啟表單之「流程設定」功能加以設定或修改。但若希 望流程會依表單欄位內容而變，如會自動寄發通知給表單上通知人欄位中的所有人，或讓使用者在表單 畫面上選擇要給哪些單位主管或員工，而不用開啟流程設定畫面自行拖拉流程。 二、原理 在 EasyFlow 流程資料尚未寫入至資料庫時，即讀取並變更之。 三、程式碼撰寫點 BeforeSendNewForm.asp 或 BeforeApproveForm.asp 皆可，時間點不同，BeforeSendNewForm.asp 是 新填表單時，按下傳送表單鈕後，表單欄位資料及流程資料都還存在暫存區中，尚未實際寫入資料庫裡； BeforeApproveForm.asp 是簽核者在表單上按下簽核鈕後，所有資料都還存在暫存區中，尚未實際寫入資 料庫裡。 在 BeforeSendNewForm.asp 中，原先程式碼如下，程式碼即是寫在灰色區塊範圍中。 dim strRedirectURL if Request(Flow_Refreshed) Y then 如果需要現在重新解析流程,則必須呼叫 Flow_Refresh.asp, 然後再將流程轉回來, 要達到此功能,請將下列 3 行的註解符號去除掉. 通常這樣做的目的是為了以程式的方式來組合流程, 且會將 Session(blnFlowChanged) 設定為 True 以免程式組合完成的流程又被重新解析了 strRedirectURL = ../Flow_Refresh.asp?strRedirectURL= Session(FormID) /BeforeSendNewForm.asp Response.Clear Response.Redirect strRedirectURL end if 您可以在這裡加上程式設定的流程或是其他的程式碼 如果將 Session(blnFlowChanged) 設定為 True, 則流程不會再重新解析. 通常不需要設定, 因為使用者如果有修改過, 自然會變成 True 除非您不管 [使用者] 是否有修改過流程,都 [要] 或 [不要] 重新解析流程, 否則不需要變更 Session(blnFlowChanged). Session(blnFlowChanged) = False 都 [要] 重新解析流程 Session(blnFlowChanged) = True 都 [不要] 重新解析流程 Response.Clear Response.Redirect ../SendForm.asp?CallBeforeNewForm=Y 四、核心程式碼說明 Dim rstTRFlow Set rstTRFlow = Session(rstTRFlow) Call InitFlow(0010,0001) Set Session(rstTRFlow) = rstTRFlow 此為核心程式碼的概觀，底下會詳細說明。 Dim rstTRFlow Set rstTRFlow = Session(rstTRFlow) 在此時間點，EasyFlow 的表單欄位資料及流程資料都還沒實際寫入到資料庫中，而流程資料是存在 Session(“rstTRFlow”)變數之中，所以要先把流程資料讀出來，放到 rstTRFlow 變數之中。 Call InitFlow(0010,0001) 這行程式碼會呼叫一個 InitFlow 的函式，來「新增」一個關號 10，支號1 的新關卡，底下為這個 InitFlow 函式的內容。 Sub InitFlow(aNewFlowNo,aNewBranchNo) rstTRFlow.AddNew rstTRFlow.Fields(resdb001).Value = Session(FormID) 表單代號 rstTRFlow.Fields(resdb002).Value = Session(SheetNo) 表單單號 rstTRFlo