我表有40条记录 我更新某条记录时 怎么半天没反映

Question

StrSql = "Select * From Std_tab where std='GB 111.2-2002'
Rcdset.Open StrSql, Cn, adOpenKeyset, adLockOptimistic, adCmdText 这么打开的
   Rcdset![cn_name] = RstStd![cn_name]
    Rcdset![en_name] = RstStd![en_name]
    Rcdset![cn_key] = RstStd![cn_key]
    Rcdset![en_key] = RstStd![en_key]
    Rcdset![std_kind] = RstStd![std_kind]Rcdset.Update '到这里半天没反映了
怎么办
游标是不是要换个方式用update Std_tab set ..是比上面方式快还是慢?
我这里如用update Std_tab set ..就不灵活了 我更新的字段每次可能不同

Answer 1

up 帮你顶一下 Rcdset![cn_name] = RstStd![cn_name]
    Rcdset![en_name] = RstStd![en_name]
    Rcdset![cn_key] = RstStd![cn_key]
    Rcdset![en_key] = RstStd![en_key]
    Rcdset![std_kind] = RstStd![std_kind]这是什么呀
你是从同一表里取出来再放进去呀有点意思

Answer 2

Rcdset.UpdateBatch 试一试
另外
    Rcdset![cn_name] = RstStd![cn_name]
    Rcdset![en_name] = RstStd![en_name]
    Rcdset![cn_key] = RstStd![cn_key]
    Rcdset![en_key] = RstStd![en_key]
    Rcdset![std_kind] = RstStd![std_kind]
可以直接用set Rcdset  = RstStd

Answer 3

StrSql = "Select * From Std_tab where std=@^#$^@%$#^%@$#'"
Rcdset.Open StrSql, Cn, adOpenKeyset, adLockOptimistic, adCmdText 这么打开的
Rcdset.AddNew   
Rcdset![cn_name] = RstStd![cn_name]
    Rcdset![en_name] = RstStd![en_name]
    Rcdset![cn_key] = RstStd![cn_key]
    Rcdset![en_key] = RstStd![en_key]
    Rcdset![std_kind] = RstStd![std_kind]
Rcdset.Update