DLookup Customer Ship method

[burrina]

I cant figure this out! I have a combo that looks up the Customer Name. Control source is CustomerID
1 bound column, 4 Column Count 0";2";0";0" 15 rows. Table/Query
I have a bound field named ShippingMethodID which I want to be filled in with the Customers default Ship Via Method.


I want to be able to edit/change the ship via if necessary so I dont want to do a CustomerID.Column(4) thing.

SELECT DISTINCTROW Customers.CustomerID, Customers.CompanyName, Customers.TaxRate, Customers.ShipRate, Customers.CustShipVia FROM Customers ORDER BY Customers.CompanyName;

[NTC]

Well I don't think that the DLookup method is part of this discussion, at least as I understand your post.

Have you tried putting in code in the AfterUpdate event of your Customer Name combo ? code that will enter the data info your Ship Via field. i.e. Me.ShipViaField = Me.ComboCustomerName.column(4)

This will allow you to then edit Me.ShipViaField.

As you note an unbound field whos control value is = Me.ComboCustomerName.column(4) would not be editable. But pushing the data into the bound field during the AfterUpdate event should be.

Hope this helps,

[burrina]

That did not work. I tried several things with no success.These did not work! Tried Default setting for ShippingMethodID = CustomerID.Column(4) No Luck!

Private Sub CustomerID_AfterUpdate()
'DLookup("[CustShipVia]", "[Customers]", "[CustomerID]=" & Forms!OrderDetails!CustomerID) = Me.ShippingMethodID
'Me.ShippingMethodID = Me.CustomerID.Column(4)


I had the wrong data type so it would not worked, change to text and is working now.