How to fill a form automatically?

Author Name Status Posted Time Philippe Henderson 1/28/2008 9:25:21 PM Author is Offline Hi friends, I'm trying to get a row of a List Box (13 columns) to auto fill into 5 List Boxes and 8 Text Boxes on a form when clicked. List Box Name: List 166 Row Source: SELECT [Battlefield Roster].UPC, [Battlefield Roster].PARA, [Battlefield Roster].LINE, [Battlefield Roster].[POSITION TITLE], [Battlefield Roster].RANK, [Battlefield Roster].Grade, [Battlefield Roster].DMOS, [Battlefield Roster].[ID CODE], [Battlefield Roster]. [ASI I], [Battlefield Roster].[ASI II], [Battlefield Roster].[ASI III], [Battlefield Roster]. [MTOE REQUIRED], [Battlefield Roster].AUTH FROM [Battlefield Roster] ORDER BY [UPC], [PARA], [LINE]; To go into example List Box Name: Position Title Text Box Name: PARA Thank you in advance for any help

Subject Author Status Date Like this Pullatti Jamaica 1/29/2008 10:08:47 PM It would be something like this, in the List Box's Click() Event. Substitute your own Control Names: Code: ( vb ) Private Sub List_166_Click()   Me![lstUPC] = Me![List 166].Column(0)   Me![lstPARA] = Me![List 166].Column(1)   Me![lstLINE] =  Me![List 166].Column(2)   Me![lstPOSITION TITLE] = Me![List 166].Column(3)   Me![lstRANK] =  Me![List 166].Column(4)   Me![txtGRADE] = Me![List 166].Column(5)   Me![txtDMOS] = Me![List 166].Column(6)   Me![txtID CODE] = Me![List 166].Column(7)   Me![txtASI I] =  Me![List 166].Column(8)   Me![txtASI II] = Me![List 166].Column(9)   Me![txtASI III] = Me![List 166].Column(10)   Me![txtMTOE REQUIRED] = Me![List 166].Column(11)   Me![txtAUTH FROM] = Me![List 166].Column(12) End Sub Post Comments Re: Worked good but... Mauritus Sourondakya 1/29/2008 10:10:25 PM First off, THANKYOU!!! Worked good but...2 things I still have a problem with Here is the code: Private Sub List166_AfterUpdate() Me![lstUPC] = Me![List166].Column(0) Me![txtPARA] = Me![List166].Column(1) Me![txtLine] = Me![List166].Column(2) Me![lstPosition Title] = Me![List166].Column(3) Me![lstRank] = Me![List166].Column(4) Me![lstGrade] = Me![List166].Column(5) Me![txtDMOS] = Me![List166].Column(6) Me![lstID Code] = Me![List166].Column(7) Me![txtASI I] = Me![List166].Column(8) Me![txtASI II] = Me![List166].Column(9) Me![txtASI III] = Me![List166].Column(10) Me![txtMTOE Required] = Me![List166].Column(11) Me![txtAUTH] = Me![List166].Column(12) End Sub First is the first one txtUPC, doesnt get changed, And 2nd is when I click on a row in the List Box (List166) to be changed , the row I click doesnt stay highlighted, it'll hightlight the first on in a group of UPC, if I have A1, A2, A3, A4, A5 and I click 2, 3, 4 or 5 , 1 will hightlight. Post Comments Re: Set the Multi Select Property Philippe Henderson 1/29/2008 10:11:35 PM Set the Multi Select Property of the List Box to Simple, then individual items that were select ed will stay highlighted. If you need to de-select all the items at some point, I can show you how to do that. Post Comments Re: Thank you highlight fixed Philippe Henderson 1/29/2008 10:12:21 PM Thank you highlight fixed. Still having a problem with 2 boxes not getting filled, l st UPC and lstGrade. They all work but them 2. Post Comments Re: Columns are referenced Mauritus Sourondakya 1/29/2008 10:13:11 PM As long as they are properly identified and th proper Columns are referenced, I canot see why this would be happening. If you like, I'll send you my E-Mail address in a Private Message, and you can send me the Database as an Attachment. As soon as I get a chance, I would be more than happy to have a look at it, and hopefully solve the problem. Let me know either way. Post Comments Re: Absolutely that would be great Philippe Henderson 1/29/2008 10:14:17 PM Absolutely that would be great. Post Comments

Related Forums Optimizing Images Get a Website Template for Free!!! Get a Website Template for Free!!! Reply to Hesus!!! Do You Sell Your Templates on Ebay?