摘要： Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click Dim Dremployee As DataSet1.employeeRow Dim Updateemployee As DataSet1.employeeDataTable Dim Trans As SqlTransaction If SqlCnn.State = ConnectionState.Closed Then SqlCnn.Open() End If If Dst.employee.Rows.Count = 0 Then Exit Sub Trans = SqlCnn.BeginTransaction Try '===事务== SqlDa.Se 阅读全文

摘要： Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click Dim Dremployee As DataSet1.employeeRow Dim Updateemployee As DataSet1.employeeDataTable Dim Trans As SqlTransaction If SqlCnn.State = ConnectionState.Closed Then SqlCnn.Open() End If If Dst.employee.Rows.Count = 0 Then Exit Sub Trans = SqlCnn.BeginTransaction Try '===事务== SqlDa.S 阅读全文