Filling txt boxes from another text box 1

[Egglar]

Hi

I have a table, tblSupplier, and a form frmPurchaseInvoice, there are two text boxes on the form, txtSupplierShortName and txtSupplierFullname.

When the user types in the short name, i want the second txt box to fill with the full name found in tblSupplier.

Im guessing the best way of doing this is the after update function of txtSupplierShortName?

I have tried various methods but none seem to work

Any help would be greatfully recieved, many thanks.

 

[jaanisf]

=DLookup("[SupplierFullname]", "tblSupplier", "[SupplierShortName]='"&Forms!frmPurchaseInvoice!txtSupplierShortName & "'&quot

 

[Egglar]

Thanks for ur reply but thats not working on my screen?

I added that to the got focus event on txtSupplierFullName, that right i think? But it doesnt fill the txt box with the full name just leaves it blank?

Elliot.

 

[jaanisf]

Try putting this

txtSupplierFullname = DLookup("[SupplierFullname]", "tblSupplier", "[SupplierShortName]='"&Forms!frmPurchaseInvoice!txtSupplierShortName & "'&quot

behind your txtSupplierShortName lost focus.

 

[Egglar]

Thats perfect, thanks!

 

[Egglar]

Another quick question, can i use the vb code to update a field, eg.

I want to take the SupplierID from tblSupplier based on the Short name put in, and write it in tblPurchaseInvoice.SupplierID

Is this possible?

 

[jaanisf]

Anything is possible
And, yes, it is possible. Use the same DLookup function. Besides, You can also use SQL queries in your code.

 

[Egglar]

I just managed to do it my self using the same method as above but writing it to a hidden text box then setting that text box`s control source to tblPurchaseInvoice.SupplierID

Is there a way of writing it directly to the table, as using a hidden text box seems a bit inpropper?

Also if you have any information on controlling fields in a table from visual basic or can point me in the direction of some information, this owuld help a lot as im pretty good with vb, but not accessing tables in access from it.

thanks.