defaultvb.aspx.vb

Telerik是很大的第三方软件制造商

            Me.oleDbUpdateCommand3.Parameters.Add(New OleDbParameter("Quantity", OleDbType.SmallInt, 0, ParameterDirection.Input, False, 5, 0, "Quantity", DataRowVersion.Current, Nothing))
            Me.oleDbUpdateCommand3.Parameters.Add(New OleDbParameter("UnitPrice", OleDbType.Currency, 0, ParameterDirection.Input, False, 19, 0, "UnitPrice", DataRowVersion.Current, Nothing))
            Me.oleDbUpdateCommand3.Parameters.Add(New OleDbParameter("Original_OrderID", OleDbType.Integer, 0, ParameterDirection.Input, False, 10, 0, "OrderID", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand3.Parameters.Add(New OleDbParameter("Original_ProductID", OleDbType.Integer, 0, ParameterDirection.Input, False, 10, 0, "ProductID", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand3.Parameters.Add(New OleDbParameter("Original_Discount", OleDbType.Single, 0, ParameterDirection.Input, False, 7, 0, "Discount", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand3.Parameters.Add(New OleDbParameter("Original_Quantity", OleDbType.SmallInt, 0, ParameterDirection.Input, False, 5, 0, "Quantity", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand3.Parameters.Add(New OleDbParameter("Original_UnitPrice", OleDbType.Currency, 0, ParameterDirection.Input, False, 19, 0, "UnitPrice", DataRowVersion.Original, Nothing))
            Me.daOrders.DeleteCommand = Me.oleDbDeleteCommand2
            Me.daOrders.InsertCommand = Me.oleDbInsertCommand2
            Me.daOrders.SelectCommand = Me.oleDbSelectCommand2
            Dim mappingArray3 As DataTableMapping() = New DataTableMapping(1 - 1) {}
            Dim mappingArray4 As DataColumnMapping() = New DataColumnMapping() {New DataColumnMapping("OrderID", "OrderID"), New DataColumnMapping("CustomerID", "CustomerID"), New DataColumnMapping("EmployeeID", "EmployeeID"), New DataColumnMapping("OrderDate", "OrderDate"), New DataColumnMapping("RequiredDate", "RequiredDate"), New DataColumnMapping("ShippedDate", "ShippedDate"), New DataColumnMapping("ShipVia", "ShipVia"), New DataColumnMapping("Freight", "Freight"), New DataColumnMapping("ShipName", "ShipName"), New DataColumnMapping("ShipAddress", "ShipAddress"), New DataColumnMapping("ShipCity", "ShipCity"), New DataColumnMapping("ShipRegion", "ShipRegion"), New DataColumnMapping("ShipPostalCode", "ShipPostalCode"), New DataColumnMapping("ShipCountry", "ShipCountry")}
            mappingArray3(0) = New DataTableMapping("Table", "Orders", mappingArray4)
            Me.daOrders.TableMappings.AddRange(mappingArray3)
            Me.daOrders.UpdateCommand = Me.oleDbUpdateCommand2
            Me.oleDbDeleteCommand2.CommandText = "DELETE FROM Orders WHERE (OrderID = ?) AND (CustomerID = ? OR ? IS NULL AND CustomerID IS NULL) AND (Freight = ? OR ? IS NULL AND Freight IS NULL) AND (OrderDate = ? OR ? IS NULL AND OrderDate IS NULL) AND (RequiredDate = ? OR ? IS NULL AND RequiredDate IS NULL) AND (ShipAddress = ? OR ? IS NULL AND ShipAddress IS NULL) AND (ShipCity = ? OR ? IS NULL AND ShipCity IS NULL) AND (ShipCountry = ? OR ? IS NULL AND ShipCountry IS NULL) AND (ShipName = ? OR ? IS NULL AND ShipName IS NULL) AND (ShipPostalCode = ? OR ? IS NULL AND ShipPostalCode IS NULL) AND (ShipRegion = ? OR ? IS NULL AND ShipRegion IS NULL) AND (ShippedDate = ? OR ? IS NULL AND ShippedDate IS NULL)"
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_OrderID", OleDbType.Integer, 0, ParameterDirection.Input, False, 10, 0, "OrderID", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_CustomerID", OleDbType.VarWChar, 5, ParameterDirection.Input, False, 0, 0, "CustomerID", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_CustomerID1", OleDbType.VarWChar, 5, ParameterDirection.Input, False, 0, 0, "CustomerID", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_Freight", OleDbType.Currency, 0, ParameterDirection.Input, False, 19, 0, "Freight", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_Freight1", OleDbType.Currency, 0, ParameterDirection.Input, False, 19, 0, "Freight", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_OrderDate", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "OrderDate", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_OrderDate1", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "OrderDate", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_RequiredDate", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "RequiredDate", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_RequiredDate1", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "RequiredDate", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipAddress", OleDbType.VarWChar, 60, ParameterDirection.Input, False, 0, 0, "ShipAddress", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipAddress1", OleDbType.VarWChar, 60, ParameterDirection.Input, False, 0, 0, "ShipAddress", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipCity", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipCity", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipCity1", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipCity", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipCountry", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipCountry", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipCountry1", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipCountry", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipName", OleDbType.VarWChar, 40, ParameterDirection.Input, False, 0, 0, "ShipName", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipName1", OleDbType.VarWChar, 40, ParameterDirection.Input, False, 0, 0, "ShipName", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipPostalCode", OleDbType.VarWChar, 10, ParameterDirection.Input, False, 0, 0, "ShipPostalCode", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipPostalCode1", OleDbType.VarWChar, 10, ParameterDirection.Input, False, 0, 0, "ShipPostalCode", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipRegion", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipRegion", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShipRegion1", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipRegion", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShippedDate", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "ShippedDate", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand2.Parameters.Add(New OleDbParameter("Original_ShippedDate1", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "ShippedDate", DataRowVersion.Original, Nothing))
            Me.oleDbInsertCommand2.CommandText = "INSERT INTO Orders(CustomerID, EmployeeID, Freight, OrderDate, RequiredDate, ShipAddress, ShipCity, ShipCountry, ShipName, ShippedDate, ShipPostalCode, ShipRegion, ShipVia) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)"
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("CustomerID", OleDbType.VarWChar, 5, "CustomerID"))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("EmployeeID", OleDbType.Integer, 0, ParameterDirection.Input, False, 10, 0, "EmployeeID", DataRowVersion.Current, Nothing))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("Freight", OleDbType.Currency, 0, ParameterDirection.Input, False, 19, 0, "Freight", DataRowVersion.Current, Nothing))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("OrderDate", OleDbType.DBDate, 0, "OrderDate"))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("RequiredDate", OleDbType.DBDate, 0, "RequiredDate"))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("ShipAddress", OleDbType.VarWChar, 60, "ShipAddress"))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("ShipCity", OleDbType.VarWChar, 15, "ShipCity"))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("ShipCountry", OleDbType.VarWChar, 15, "ShipCountry"))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("ShipName", OleDbType.VarWChar, 40, "ShipName"))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("ShippedDate", OleDbType.DBDate, 0, "ShippedDate"))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("ShipPostalCode", OleDbType.VarWChar, 10, "ShipPostalCode"))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("ShipRegion", OleDbType.VarWChar, 15, "ShipRegion"))
            Me.oleDbInsertCommand2.Parameters.Add(New OleDbParameter("ShipVia", OleDbType.Integer, 0, ParameterDirection.Input, False, 10, 0, "ShipVia", DataRowVersion.Current, Nothing))
            Me.oleDbSelectCommand2.CommandText = "SELECT CustomerID, EmployeeID, Freight, OrderDate, OrderID, RequiredDate, ShipAddress, ShipCity, ShipCountry, ShipName, ShippedDate, ShipPostalCode, ShipRegion, ShipVia FROM Orders WHERE CustomerID IN (SELECT CustomerID FROM Customers)"
            Me.oleDbUpdateCommand2.CommandText = "UPDATE Orders SET CustomerID = ?, EmployeeID = ?, Freight = ?, OrderDate = ?, RequiredDate = ?, ShipAddress = ?, ShipCity = ?, ShipCountry = ?, ShipName = ?, ShippedDate = ?, ShipPostalCode = ?, ShipRegion = ?, ShipVia = ? WHERE (OrderID = ?) AND (CustomerID = ? OR ? IS NULL AND CustomerID IS NULL) AND (Freight = ? OR ? IS NULL AND Freight IS NULL) AND (OrderDate = ? OR ? IS NULL AND OrderDate IS NULL) AND (RequiredDate = ? OR ? IS NULL AND RequiredDate IS NULL) AND (ShipAddress = ? OR ? IS NULL AND ShipAddress IS NULL) AND (ShipCity = ? OR ? IS NULL AND ShipCity IS NULL) AND (ShipCountry = ? OR ? IS NULL AND ShipCountry IS NULL) AND (ShipName = ? OR ? IS NULL AND ShipName IS NULL) AND (ShipPostalCode = ? OR ? IS NULL AND ShipPostalCode IS NULL) AND (ShipRegion = ? OR ? IS NULL AND ShipRegion IS NULL) AND (ShippedDate = ? OR ? IS NULL AND ShippedDate IS NULL)"
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("CustomerID", OleDbType.VarWChar, 5, "CustomerID"))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("EmployeeID", OleDbType.Integer, 0, ParameterDirection.Input, False, 10, 0, "EmployeeID", DataRowVersion.Current, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Freight", OleDbType.Currency, 0, ParameterDirection.Input, False, 19, 0, "Freight", DataRowVersion.Current, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("OrderDate", OleDbType.DBDate, 0, "OrderDate"))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("RequiredDate", OleDbType.DBDate, 0, "RequiredDate"))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("ShipAddress", OleDbType.VarWChar, 60, "ShipAddress"))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("ShipCity", OleDbType.VarWChar, 15, "ShipCity"))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("ShipCountry", OleDbType.VarWChar, 15, "ShipCountry"))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("ShipName", OleDbType.VarWChar, 40, "ShipName"))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("ShippedDate", OleDbType.DBDate, 0, "ShippedDate"))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("ShipPostalCode", OleDbType.VarWChar, 10, "ShipPostalCode"))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("ShipRegion", OleDbType.VarWChar, 15, "ShipRegion"))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("ShipVia", OleDbType.Integer, 0, ParameterDirection.Input, False, 10, 0, "ShipVia", DataRowVersion.Current, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_OrderID", OleDbType.Integer, 0, ParameterDirection.Input, False, 10, 0, "OrderID", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_CustomerID", OleDbType.VarWChar, 5, ParameterDirection.Input, False, 0, 0, "CustomerID", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_CustomerID1", OleDbType.VarWChar, 5, ParameterDirection.Input, False, 0, 0, "CustomerID", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_Freight", OleDbType.Currency, 0, ParameterDirection.Input, False, 19, 0, "Freight", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_Freight1", OleDbType.Currency, 0, ParameterDirection.Input, False, 19, 0, "Freight", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_OrderDate", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "OrderDate", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_OrderDate1", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "OrderDate", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_RequiredDate", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "RequiredDate", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_RequiredDate1", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "RequiredDate", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipAddress", OleDbType.VarWChar, 60, ParameterDirection.Input, False, 0, 0, "ShipAddress", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipAddress1", OleDbType.VarWChar, 60, ParameterDirection.Input, False, 0, 0, "ShipAddress", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipCity", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipCity", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipCity1", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipCity", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipCountry", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipCountry", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipCountry1", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipCountry", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipName", OleDbType.VarWChar, 40, ParameterDirection.Input, False, 0, 0, "ShipName", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipName1", OleDbType.VarWChar, 40, ParameterDirection.Input, False, 0, 0, "ShipName", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipPostalCode", OleDbType.VarWChar, 10, ParameterDirection.Input, False, 0, 0, "ShipPostalCode", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipPostalCode1", OleDbType.VarWChar, 10, ParameterDirection.Input, False, 0, 0, "ShipPostalCode", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipRegion", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipRegion", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShipRegion1", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "ShipRegion", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShippedDate", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "ShippedDate", DataRowVersion.Original, Nothing))
            Me.oleDbUpdateCommand2.Parameters.Add(New OleDbParameter("Original_ShippedDate1", OleDbType.DBDate, 0, ParameterDirection.Input, False, 0, 0, "ShippedDate", DataRowVersion.Original, Nothing))
            Me.daCustomers.DeleteCommand = Me.oleDbDeleteCommand1
            Me.daCustomers.InsertCommand = Me.oleDbInsertCommand1
            Me.daCustomers.SelectCommand = Me.oleDbSelectCommand1
            Dim mappingArray5 As DataTableMapping() = New DataTableMapping(1 - 1) {}
            Dim mappingArray6 As DataColumnMapping() = New DataColumnMapping() {New DataColumnMapping("CustomerID", "CustomerID"), New DataColumnMapping("CompanyName", "CompanyName"), New DataColumnMapping("ContactName", "ContactName"), New DataColumnMapping("ContactTitle", "ContactTitle"), New DataColumnMapping("Address", "Address"), New DataColumnMapping("City", "City"), New DataColumnMapping("Region", "Region"), New DataColumnMapping("PostalCode", "PostalCode"), New DataColumnMapping("Country", "Country"), New DataColumnMapping("Phone", "Phone"), New DataColumnMapping("Fax", "Fax")}
            mappingArray5(0) = New DataTableMapping("Table", "Customers", mappingArray6)
            Me.daCustomers.TableMappings.AddRange(mappingArray5)
            Me.daCustomers.UpdateCommand = Me.oleDbUpdateCommand1
            Me.oleDbDeleteCommand1.CommandText = "DELETE FROM Customers WHERE (CustomerID = ?) AND (Address = ? OR ? IS NULL AND Address IS NULL) AND (City = ? OR ? IS NULL AND City IS NULL) AND (CompanyName = ?) AND (ContactName = ? OR ? IS NULL AND ContactName IS NULL) AND (ContactTitle = ? OR ? IS NULL AND ContactTitle IS NULL) AND (Country = ? OR ? IS NULL AND Country IS NULL) AND (Fax = ? OR ? IS NULL AND Fax IS NULL) AND (Phone = ? OR ? IS NULL AND Phone IS NULL) AND (PostalCode = ? OR ? IS NULL AND PostalCode IS NULL) AND (Region = ? OR ? IS NULL AND Region IS NULL)"
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_CustomerID", OleDbType.VarWChar, 5, ParameterDirection.Input, False, 0, 0, "CustomerID", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_Address", OleDbType.VarWChar, 60, ParameterDirection.Input, False, 0, 0, "Address", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_Address1", OleDbType.VarWChar, 60, ParameterDirection.Input, False, 0, 0, "Address", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_City", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "City", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_City1", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "City", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_CompanyName", OleDbType.VarWChar, 40, ParameterDirection.Input, False, 0, 0, "CompanyName", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_ContactName", OleDbType.VarWChar, 30, ParameterDirection.Input, False, 0, 0, "ContactName", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_ContactName1", OleDbType.VarWChar, 30, ParameterDirection.Input, False, 0, 0, "ContactName", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_ContactTitle", OleDbType.VarWChar, 30, ParameterDirection.Input, False, 0, 0, "ContactTitle", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_ContactTitle1", OleDbType.VarWChar, 30, ParameterDirection.Input, False, 0, 0, "ContactTitle", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_Country", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "Country", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_Country1", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "Country", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_Fax", OleDbType.VarWChar, 24, ParameterDirection.Input, False, 0, 0, "Fax", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_Fax1", OleDbType.VarWChar, 24, ParameterDirection.Input, False, 0, 0, "Fax", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_Phone", OleDbType.VarWChar, 24, ParameterDirection.Input, False, 0, 0, "Phone", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_Phone1", OleDbType.VarWChar, 24, ParameterDirection.Input, False, 0, 0, "Phone", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_PostalCode", OleDbType.VarWChar, 10, ParameterDirection.Input, False, 0, 0, "PostalCode", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_PostalCode1", OleDbType.VarWChar, 10, ParameterDirection.Input, False, 0, 0, "PostalCode", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_Region", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "Region", DataRowVersion.Original, Nothing))
            Me.oleDbDeleteCommand1.Parameters.Add(New OleDbParameter("Original_Region1", OleDbType.VarWChar, 15, ParameterDirection.Input, False, 0, 0, "Region", DataRowVersion.Original, Nothing))