[AccessD] Parameter Loop

Heenan, Lambert Lambert.Heenan at AIG.com
Wed Jul 16 14:20:47 CDT 2003


If the query names, AND the field names AND the field numbers all change
then what looks "simpler" to you?...

For n =1 to 9
	strName = "qry" & n & "_name"
   Select Case n
' note that this omits the logic for creating the field names and numbers
   Case 1
	UpdateData strName, field_name1, field_number1	 
   Case 2
	UpdateData strName, field_name2, field_number2
   Case 3
	UpdateData strName, field_name3, field_number3
   Case 4
	UpdateData strName, field_name4, field_number4
   Case 5
	UpdateData strName, field_name5, field_number5
   Case 6
	UpdateData strName, field_name6, field_number6
   Case 7
	UpdateData strName, field_name7, field_number7
   Case 8
	UpdateData strName, field_name8, field_number8
   Case 9
	UpdateData strName, field_name9, field_number9
   End Select
Next n

... or ...

UpdateData "qry1_name", field_name1, field_number1
UpdateData "qry2_name", field_name2, field_number2
UpdateData "qry3_name", field_name3, field_number3
UpdateData "qry4_name", field_name4, field_number4
UpdateData "qry5_name", field_name5, field_number5
UpdateData "qry6_name", field_name6, field_number6
UpdateData "qry7_name", field_name7, field_number7
UpdateData "qry8_name", field_name8, field_number8
UpdateData "qry9_name", field_name9, field_number9

Just my simplistic 2 cent's worth. :-)

Lambert

> -----Original Message-----
> From:	Mike and Doris Manning [SMTP:mikedorism at ntelos.net]
> Sent:	Wednesday, July 16, 2003 2:50 PM
> To:	'Access Developers discussion and problem solving'
> Subject:	RE: [AccessD] Parameter Loop
> 
> If the field and number also need to change to then I would use the
> For...Next combined with a Select Case to handle each 1-9 step.
> 
> Doris Manning
> Database Administrator
> Hargrove Inc.
> www.hargroveinc.com
> 
> 
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Randall Anthony
> Sent: Wednesday, July 16, 2003 2:19 PM
> To: 'Access Developers discussion and problem solving'
> Subject: RE: [AccessD] Parameter Loop
> 
> 
> Thanks, Doris, at first glance that may get me on the right track,
> however,
> the field_Name and Number also have to change.  I'll mull this over, maybe
> a
> case statement?
> 
> -----Original Message-----
> From: Mike and Doris Manning [mailto:mikedorism at ntelos.net] 
> Sent: Wednesday, July 16, 2003 1:48 PM
> To: 'Access Developers discussion and problem solving'
> Subject: RE: [AccessD] Parameter Loop
> 
> How about looping through to create the query name?
> 
> Dim lcv as Integer
> Dim strName as string
> 
> For lcv = 1 to 9
>    strName = "qry" & lcv & "_name"
>    UpdateData strname, field_name, field_number
> Next lcv
> 
> Doris Manning
> Database Administrator
> Hargrove Inc.
> www.hargroveinc.com
>    
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Randall Anthony
> Sent: Wednesday, July 16, 2003 1:42 PM
> To: accessd at databaseadvisors.com
> Subject: [AccessD] Parameter Loop
> 
> 
> Hi all,
> Looking for solution to setting up a loop to pass parameters and I think
> I've made it more complicated than it needs to be, anyhooo...
> 
> I have a routine UpdateData, where I pass three parameters:
>    UpdateData "qry1_name", field_Name, field_number
> 
> Works great.  However, I need to pass more than one query (I have nine).
> In
> other words, once the above is ran, I need to pass "qry2_name", etc to
> this
> function up to "qry9_name".  Any thoughts are greatly appreciated.
> 
> Randy @ ext. 473


More information about the AccessD mailing list