ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   VBA Equivalent of ASP 'Execute' Command (https://www.excelbanter.com/excel-programming/322481-vba-equivalent-asp-execute-command.html)

The Vision Thing

VBA Equivalent of ASP 'Execute' Command
 
Is there a VBA equivalent of ASP's 'Execute' command. I'd like to use such
a command to dynamically declare variables at run-time.

Here's a sample of ASP 'Execute' code.

---------------------------
varID = fp_rs("ID")
varName = fp_rs("Name")
varOccupation = fp_rs("Occupation")

for i = 1 to numFields
Execute("var" & arr_fieldnames(i) & " = fp_rs(""" & arr_fieldnames(i) &
""")"
next

---------------------------

Thanks,
Wayne C.



Fredrik Wahlgren

VBA Equivalent of ASP 'Execute' Command
 

"The Vision Thing" wrote in message
...
Is there a VBA equivalent of ASP's 'Execute' command. I'd like to use

such
a command to dynamically declare variables at run-time.

Here's a sample of ASP 'Execute' code.

---------------------------
varID = fp_rs("ID")
varName = fp_rs("Name")
varOccupation = fp_rs("Occupation")

for i = 1 to numFields
Execute("var" & arr_fieldnames(i) & " = fp_rs(""" & arr_fieldnames(i) &
""")"
next

---------------------------

Thanks,
Wayne C.



I think Application.Evaluate is what you are looking for.

/Fredrik



Dave Peterson[_5_]

VBA Equivalent of ASP 'Execute' Command
 
Are you executing a different program?

Take a look at Shell in VBA's help.

Are you running a different subroutine?

Application.Run

maybe it.

The Vision Thing wrote:

Is there a VBA equivalent of ASP's 'Execute' command. I'd like to use such
a command to dynamically declare variables at run-time.

Here's a sample of ASP 'Execute' code.

---------------------------
varID = fp_rs("ID")
varName = fp_rs("Name")
varOccupation = fp_rs("Occupation")

for i = 1 to numFields
Execute("var" & arr_fieldnames(i) & " = fp_rs(""" & arr_fieldnames(i) &
""")"
next

---------------------------

Thanks,
Wayne C.


--

Dave Peterson

The Vision Thing

VBA Equivalent of ASP 'Execute' Command
 

"Fredrik Wahlgren" wrote in message
...

"The Vision Thing" wrote in message
...
Is there a VBA equivalent of ASP's 'Execute' command. I'd like to use

such
a command to dynamically declare variables at run-time.

Here's a sample of ASP 'Execute' code.

---------------------------
varID = fp_rs("ID")
varName = fp_rs("Name")
varOccupation = fp_rs("Occupation")

for i = 1 to numFields
Execute("var" & arr_fieldnames(i) & " = fp_rs(""" & arr_fieldnames(i) &
""")"
next

---------------------------

Thanks,
Wayne C.



I think Application.Evaluate is what you are looking for.

/Fredrik



I don't think Application.Evaluate solves the problem. I want to
dynamically declare variables and assign values like so:-

For i = 1 to Ubound(arrIn)
Dim ("var" & i) as string
("var" & i) = arrIn(i)
Next

Regards,
Wayne C.



The Vision Thing

VBA Equivalent of ASP 'Execute' Command
 

"Dave Peterson" wrote in message
...
Are you executing a different program?

Take a look at Shell in VBA's help.

Are you running a different subroutine?

Application.Run

maybe it.

The Vision Thing wrote:

Is there a VBA equivalent of ASP's 'Execute' command. I'd like to use
such
a command to dynamically declare variables at run-time.

Here's a sample of ASP 'Execute' code.

---------------------------
varID = fp_rs("ID")
varName = fp_rs("Name")
varOccupation = fp_rs("Occupation")

for i = 1 to numFields
Execute("var" & arr_fieldnames(i) & " = fp_rs(""" & arr_fieldnames(i) &
""")"
next

---------------------------

Thanks,
Wayne C.


--

Dave Peterson


What I'm trying to do is dynamically declare variables and assign values to
them, like so

For i = 1 to Ubound(arrIn)
Dim ("var" & arrIn(i)) as string
("var" & arrIn(i)) = arrIn(i)
Next

Regards,
Wayne C.



Dave Peterson[_5_]

VBA Equivalent of ASP 'Execute' Command
 
VBA doesn't support that kind of symbolic substitution.

The Vision Thing wrote:

"Dave Peterson" wrote in message
...
Are you executing a different program?

Take a look at Shell in VBA's help.

Are you running a different subroutine?

Application.Run

maybe it.

The Vision Thing wrote:

Is there a VBA equivalent of ASP's 'Execute' command. I'd like to use
such
a command to dynamically declare variables at run-time.

Here's a sample of ASP 'Execute' code.

---------------------------
varID = fp_rs("ID")
varName = fp_rs("Name")
varOccupation = fp_rs("Occupation")

for i = 1 to numFields
Execute("var" & arr_fieldnames(i) & " = fp_rs(""" & arr_fieldnames(i) &
""")"
next

---------------------------

Thanks,
Wayne C.


--

Dave Peterson


What I'm trying to do is dynamically declare variables and assign values to
them, like so

For i = 1 to Ubound(arrIn)
Dim ("var" & arrIn(i)) as string
("var" & arrIn(i)) = arrIn(i)
Next

Regards,
Wayne C.


--

Dave Peterson

The Vision Thing

VBA Equivalent of ASP 'Execute' Command
 
Thanks Dave, that's what I needed to know.

Wayne C.

"Dave Peterson" wrote in message
...
VBA doesn't support that kind of symbolic substitution.

The Vision Thing wrote:

"Dave Peterson" wrote in message
...
Are you executing a different program?

Take a look at Shell in VBA's help.

Are you running a different subroutine?

Application.Run

maybe it.

The Vision Thing wrote:

Is there a VBA equivalent of ASP's 'Execute' command. I'd like to use
such
a command to dynamically declare variables at run-time.

Here's a sample of ASP 'Execute' code.

---------------------------
varID = fp_rs("ID")
varName = fp_rs("Name")
varOccupation = fp_rs("Occupation")

for i = 1 to numFields
Execute("var" & arr_fieldnames(i) & " = fp_rs(""" &
arr_fieldnames(i) &
""")"
next

---------------------------

Thanks,
Wayne C.

--

Dave Peterson


What I'm trying to do is dynamically declare variables and assign values
to
them, like so

For i = 1 to Ubound(arrIn)
Dim ("var" & arrIn(i)) as string
("var" & arrIn(i)) = arrIn(i)
Next

Regards,
Wayne C.


--

Dave Peterson




Tim Williams

VBA Equivalent of ASP 'Execute' Command
 
I'm not sure there aren't better ways to achieve this - declaring
variables on the fly is not really good practise. You would be much
better off using a dictionary object or array for what you're trying
to do.


Tim.


"The Vision Thing" wrote in message
...
Thanks Dave, that's what I needed to know.

Wayne C.

"Dave Peterson" wrote in message
...
VBA doesn't support that kind of symbolic substitution.

The Vision Thing wrote:

"Dave Peterson" wrote in message
...
Are you executing a different program?

Take a look at Shell in VBA's help.

Are you running a different subroutine?

Application.Run

maybe it.

The Vision Thing wrote:

Is there a VBA equivalent of ASP's 'Execute' command. I'd like
to use
such
a command to dynamically declare variables at run-time.

Here's a sample of ASP 'Execute' code.

---------------------------
varID = fp_rs("ID")
varName = fp_rs("Name")
varOccupation = fp_rs("Occupation")

for i = 1 to numFields
Execute("var" & arr_fieldnames(i) & " = fp_rs(""" &
arr_fieldnames(i) &
""")"
next

---------------------------

Thanks,
Wayne C.

--

Dave Peterson

What I'm trying to do is dynamically declare variables and assign
values to
them, like so

For i = 1 to Ubound(arrIn)
Dim ("var" & arrIn(i)) as string
("var" & arrIn(i)) = arrIn(i)
Next

Regards,
Wayne C.


--

Dave Peterson







All times are GMT +1. The time now is 05:05 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com