Hi all,

Do anyone know how to get access from current project to another project?

The condition is where when i am in one project, i click on a button to load up the requested another project's win form.

Urgent pls......can anyone know please help me?? Thanksssss.....

Jeannie....

__________________
Jeannie....

I do not think you can call another project directly but you can call an exe and pass some arguments which you can use in your other exe.

I often use this method. In the Sub Main I decode the arguments so I know what form to show and what action to perform.

Hope this helps a bit.

Greetz

Tom.

hmmm...do you have any example on this? i could hardly figure what u trying to say. But i couldnt think of how to pass the exe and parameter in.

let's say i have a button to click on to load another project (or the exe) just like what u mean. when i click on the button, what code should i put in to load up the exe?? how to code on this?? please...



Jeannie....

Let's say you click on a button and you want the exe "secondproject.exe" to start.

On the click event of the button you use the following code:

Shell GetAppPath & "secondproject"

(In my project GetAppPath returns the full path of the current application so we are assuming that secondproject.exe is in the same folder)

Now you can also add parameters to this code.
Lets say you want to pass the Id of a certain row in a table then the code would look like this.

Shell GetAppPath & "secondproject 1254"

In the secondproject we want to know what parameter has been passed so in the sub main we are going to decode this.

Sub Main()

 Dim strParameters as string
 Dim strParams() as string

 'Command$ contains the string with all the parameters that were passed.
 strParameters = Command$

 'if you pass more then one parameter you should use a delimeter like " " or "|"

 'now you can split the parameters into the different params

 strParams = split(strParameter,"your delimeter")

 'Now you have an array with all your parameters
 'in this case you could do something like this:
 if clng(strParams(0)) = 1254 then
  frmMain.Show
 else
  msgbox "Wrong id"
  end
 end if

end sub


I hope this helps a bit.
If you have anymore questions, just ask.

Greetz Tom.

Thankss a lot, Tom. I will try out on this. :)

Jeannie....