Array as an environment variable.....

[rachna_nags]

Hi All,

I am facing an issue in my script.Actually i have a function which is common in few scripts. In which i am assigning values in an array.
In a script the value of this array from this function has to be used in another funstion in the same script. But i am enable to implement this as this array becomes local to the function so it's value can not be used in another function.
That's why i want to make this array as a global array(variable).o that value from one function can be used in another function in same script.
And for this i am thiniking to make this array a an environment variable.
But i donn know how to make it as environment variable and then save any value in an envirionment array variable...

Please help me out to resolve this problem..

Thanks,

[manishbhalshankar]

Hi Rachna,

You can achieve this by returning array through your function.

Syntax:
function name = array

It can also be done using Dictionary object (Scripting.Dictionary).

Please let me know if you are not able to reach the solution.

[kirk6acosta]

What if the array is passed to the function as a parameter when it is called using call by value or call by reference?

[basanth27]

Environment variable for a array is a ruled out option. Why are you not declaring it as a global variable?
Public TestArray(10)
??

[rachna_nags]

Thanks for reply. I have tried the same still if i'll use this array in function a message that 'Type mismatch ' is getting populated..

[anil2u]

I used something like this in one of my code and it worked for me.

Code:

Dim avlprglist(4) var=GetAvailProgram(searchText,avlprglist) var=SelectProgram(avlprglist) FunctionGetAvailProgram(searchText,avlprglist) ....code.... avlprglist=assign the array I created here End Function

This can also be obtained as a return value for function as some one suggested above like:

Code:

var=yourFunction() x=newFunction(var) Function yourFunction() --code--- yourFunction=assign the array End Function

Another thing is we have to define an array with range definitely before using it.

Hope this helps

[ravi.gajul]

Hi Rachna ,see if the below code helps.Its not throwing type Mismatch error

Code:

public Arr arr=Mytest msgbox Arr(0) Call mytest1( arr) ' Function Defination Public function Mytest() Mytest=Array(1,2,3,4) End Function Public function mytest1(Byref arr ) msgbox arr(1) End Function

Regards,
Ravi

[ssvali]