作者yauhh (喲)
看板Visual_Basic
標題[VB6 ] ADO Commnad會有side effect嗎?
時間Fri May 25 23:52:47 2012
各位好. 最近遇到一個情況,覺得好像發現到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