我想在VB.NET中使用我的代码进行事务处理

时间:2016-06-13 10:25:50

标签: vb.net

我正在使用SqlDataAdapterSqlCommandBuilder来插入和更新,我希望使用事务以这种方式插入到两个表中,但我已经尝试了很多而且我没有成功 感谢

Dim sql = "select * from ReceiptOfItems where receiptCode=N'" & receiptCode.Text & "'  "
            Dim dta As New SqlClient.SqlDataAdapter(sql, con)
            Dim ds As New DataSet
            dta.Fill(ds)
            Dim dt As DataTable
            dt = ds.Tables(0)
            If dt.Rows.Count > 0 Then
                ' MsgBox("اسم االتصنيفل او رقمه موجود مسبقا ", MsgBoxStyle.Exclamation, "رسالة تنبيه")
                receiptCode.Text = Format(Val(GetLastRecord("ReceiptOfItems", "receiptcode")) + 1, "REC0000000")
            End If
            Dim dr = dt.NewRow
            dr!receiptCode = receiptCode.Text
            dr!receiptDate = Format(receiptDate.Value, "yyyy/MM/dd")
            ' dr!receiptDate = receiptDate.Text
            dr!supplierCode = GetsupplierCode(supplierName.Text)
            dr!SupplierInvoiceCode = SupplierInvoiceCode.Text
            dr!supplierInvoiceDate = Format(supplierInvoiceDate.Value, "yyyy/MM/dd")
            'dr!supplierInvoiceDate = supplierInvoiceDate.Text
            dr!TotalDiscount = Val(TotalDiscount.Text)
            dr!TotalReceipt = Val(TotalReceipt.Text)
            dr!TotalArabic = TotalArabic.Text
            dr!SupplierInvoiceType = SupplierInvoiceType.Text
            dr!salesTax = Val(salesTax.Text)
            dr!note = note.Text
            dr!status = True
            dt.Rows.Add(dr)
            Dim cmd As New SqlCommandBuilder(dta)

1 个答案:

答案 0 :(得分:0)

这应该适合你:

public class Neo4jResourceResolver implements ResourceResolver {

    @Override
    public File resolve(URL resource) throws Exception {

        switch (resource.getProtocol()) {
            case "file":
                return new File(resource.toURI());
            case "jar":
            case "zip":
                String jarPath = resource.getPath().substring(0, resource.getPath().indexOf("!"));
                return new File(jarPath);
            default:
                return null;
        }
    }
}

DataAdapter类有一个UpdateCommand和一个DeleteCommand属性,如果你做的不是插入新行,那么必须适当地构建它。