看板 Visual_Basic 關於我們 聯絡資訊
各位好. 最近遇到一個情況,覺得好像發現到ADO物件會遇到Side Effect. 平台是VB6 + SQL Server 2000, ADO程式庫版本大概是2.8吧. 預存程序是希望給一個可省略的參數,所以寫成這樣: create proc some_proc( ..., @d datetime = null ) begin insert into table1 ( ..., d ) values ( ..., @d ) end VB6程式中,是將Command物件包起來做: public sub update_some( ..., optional d as string = "" ) ... set global_module.cmd = new Command ... if d <> "" then global_module.cmd.parameters("@d") = d global_module.cmd.execute update_some = global_module.parameters("@RETURN_VALUE") end sub 內容主要是說, update_some 函數引用了外部Command物件, 並且參數 @d 是 在需要的時候才給值. 我不曉得在這裏如果 @d 參數沒給值是否如我所想的 是一個預設值. 所發現的問題是,我有個迴圈呼叫 update_some 這個函數好多次,而每次給的參數 都是獨立的參數: for i = 1 to N ... dim d as string d = lstData.ListItem(i).SubItem(k) ... update_some( ..., d) ... next i 一般較多時候 d 是空字串所以沒事. 不過,當 d 拿到一個日期文字時,這整個迴圈 執行之後,發現資料庫中填的 d 欄位值,從放入了 d 日期值之後,接下來放進去的 其他筆記錄的 d 日期值全都是同樣那個日期值. 看樣子像是 side effect. 這是 side effect 嗎? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 59.112.231.66
JacobTai:if d <> "" then ...... <-- 檢查一下這一行吧... 05/26 12:20
yauhh:沒錯,因為我有時沒有給值; 但我想不出為何沒有給值,預存程序 05/26 19:17
yauhh:執行的結果就是複製之前執行過的參數.明明Command物件是新的 05/26 19:17
yauhh:迴圈中提供的d值也都是新的. 05/26 19:18
yauhh:後來我的確是修改了if d<> "" then那邊的程式,使它若不拿到 05/26 19:19
yauhh:日期值就拿到NULL.但主要的問題:它有沒有side-effect,仍未解 05/26 19:20