Why this code is not working???

[JH]

Can somebody help me here. The following code works fine till the last
statement. It changes to the directory
but fails to execute the command install.cmd. The file install.cmd is
located at the directory name.
Thanks

Dim directoryName As String

Dim WshShell
directoryName =
Path.GetDirecto ryName([Assembly].GetExecutingAs sembly().Locati on)
WshShell = CreateObject("W script.Shell")

WshShell.Run("c md /k cd " & directoryName & "\" & "Install.cm d")

[Herfried K. Wagner [MVP]]

* "JH" <yh*******@yaho o.com> scripsit:

Can somebody help me here. The following code works fine till the last
statement. It changes to the directory
but fails to execute the command install.cmd. The file install.cmd is
located at the directory name.

Why not use 'System.Diagnos tics.Process.St art'?

--
Herfried K. Wagner [MVP]
<http://dotnet.mvps.org/>

[Cor]

>

Why not use 'System.Diagnos tics.Process.St art'?

Do you know who did give this method to John yesterday?

It has a style that looks to me to............. .......

\\\
Shell("C:\bla.e xe")
///

:-)

Cor

[Herfried K. Wagner [MVP]]

* "Cor" <no*@non.com> scripsit:

Why not use 'System.Diagnos tics.Process.St art'?

Do you know who did give this method to John yesterday?

It has a style that looks to me to............. .......

\\\
Shell("C:\bla.e xe")
///

:-)

Sorry, I don't understand.

BTW: I have adapted the code Fergus and you developed for sending mails
by opening the default mail client. I played around and I found out
that subject and message will have to be encoded too (otherwise there
may be wrong results if the message or the subject contain certain
characters like "@" and/or "&". Here's the final version:

\\\
Imports System.Diagnost ics
Imports System.Web

Public Sub StartDefaultMai l( _
ByVal [To] As String, _
Optional ByVal Subject As String = "", _
Optional ByVal Message As String = "" _
)
Try
Dim psi As New ProcessStartInf o
psi.UseShellExe cute = True
psi.FileName = _
"mailto:" & HttpUtility.Url Encode([To]) & _
"?subject=" & HttpUtility.Url Encode(Subject) & _
"&body=" & HttpUtility.Url Encode(Message)
Process.Start(p si)
Catch ex As Exception
Throw New Exception("Defa ult mail client could not be started.", ex)
End Try
End Sub
///

--
Herfried K. Wagner [MVP]
<http://dotnet.mvps.org/>

[Cor]

Hi Herfried,

Thanks, this one was more Fergus than me.

It was more that he said it could not, and I knew it could and then he made
this code.

I will investigate what you wrote but not today anymore.

That "Shell" is because yesterday someone asked what methods where there,
and I was just looking at that diagnostic procedures so I gave an answer.

And yes of course Herfried comes with an answer for the shell.

And now you ask when the shell is used.

Why not use 'System.Diagnos tics.Process.St art'?

:-))

Cor

[Herfried K. Wagner [MVP]]

Cor,

* "Cor" <no*@non.com> scripsit:

Thanks, this one was more Fergus than me.

It was more that he said it could not, and I knew it could and then he made
this code.

I will investigate what you wrote but not today anymore.
:-) Let me know if you find out something interesting.
That "Shell" is because yesterday someone asked what methods where there,
and I was just looking at that diagnostic procedures so I gave an answer.

And yes of course Herfried comes with an answer for the shell.

And now you ask when the shell is used.

Why not use 'System.Diagnos tics.Process.St art'?

:-))

:-))) -- Now I understand...

--
Herfried K. Wagner [MVP]
<http://dotnet.mvps.org/>