DataTables("临时版本跟踪表").ReplaceFor("已确认可以发布", "True", "需求编号 = '" & r("需求编号") & "'")
DataTables("临时版本跟踪表").SQLReplaceFor("已确认可以发布", "True", "需求编号 = '" & r("需求编号") & "'")
改成
DataTables("临时版本跟踪表").ReplaceFor("已确认可以发布", True, "需求编号 = '" & r("需求编号") & "'")
DataTables("临时版本跟踪表").SQLReplaceFor("已确认可以发布", 1, "需求编号 = '" & r("需求编号") & "'")