Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations wOOdy-Soft on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Basic Database assembly problem. Need help 1

Status
Not open for further replies.

marlin123

IS-IT--Management
May 2, 2000
4
NZ
I have the below<br>Email&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Subject&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;etc etc etc<br><A HREF="mailto:Johnsmith@xtra.co">Johnsmith@xtra.co</A>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;BK1<br><A HREF="mailto:Johnsmith@xtra.co">Johnsmith@xtra.co</A>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;sc1<br><A HREF="mailto:Johnsmith@xtra.co">Johnsmith@xtra.co</A>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ks1<br><A HREF="mailto:Johnsmith@xtra.co">Johnsmith@xtra.co</A>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;hu1<br><A HREF="mailto:Johnsmith@xtra.co">Johnsmith@xtra.co</A>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;hu2<br><br>I want to get it converted to<br><br><A HREF="mailto:Johnsmith@xtra.co">Johnsmith@xtra.co</A>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;bk1&nbsp;&nbsp;&nbsp;sc1 ks1&nbsp;&nbsp;hu1&nbsp;&nbsp;hu2<br><br>Please someone help this simpleton
 
Well I've done that sort of thing a lot.<br>Data probably coming from a Main Frame.<br>You have to make a VBA sub routine that opens the recordset<br>and preforms a series of loops through it.<br>I don't have exact code right here but.<br><br>Open recordset 1<br>Get first Item in it<br>Open recordset 2 <br>Create SQL statement which holds all items from Recordset 1<br>such as &quot;<A HREF="mailto:Johnsmith@xtra.com">Johnsmith@xtra.com</A>&quot; which is 5 in your example<br>Open recordset 3 which is where you write the 5 records as one. loop thru recordset 2 and extract items to be put in Recordset 3 which is one record you write out.<br>you will have a list of the new fields and IF statements<br><br>So there are 2 loops Open each record in Main outer loop and then get all matching records. Then loop that number of times to create your final new record.<br>As you can see its NO easy task.<br>Your Knowledge of VBA has to be has to be extensive.<br>And your Troubleshooting skills very sharp.<br><br> <p>DougP<br><a href=mailto: dposton@universal1.com> dposton@universal1.com</a><br><a href= > </a><br> Ask me how Bar-codes can help you be more productive.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top