主题：关于后台表的数据更新问题（一）

写了什么代码？

原因：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=69632

Select Case e.DataCol.Name 

    Case "类别", "名称" , "比率系数", "备注" 

        Dim bms() As String = {"全隐框玻璃幕墙单价分析表", "全明框玻璃幕墙单价分析表"}'最后整体拷贝修改

Dim cmd As New SQLCommand

        For Each bm As String In bms

                cmd.CommandText = "UPDATE {" & bm  & "} SET  " & e.DataCol.Name  & "= ?    WHERE  项目构成 = ?  辅助列1  = ?"  

cmd.Parameters.clear

                cmd.Parameters.Add("@p1", e.newvalue)

                cmd.Parameters.Add("@项目构成", e.datarow("名称"))

                cmd.Parameters.Add("@辅助列1", e.datarow("类别"))

                cmd.ExecuteNonQuery

        Next   

End Select