controlling winmail from vb6

[smegot]

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say notepad then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[smegot]

BTW it's not because i got my fish and my test eml's mixed up either

 

[Steve Cochran]

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes and the shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed up either

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[smegot]

Steve,

Thanks for the swift response - I tried both the following and neither worked
Any other ideas?

i.e.

Tried -

Dim txtx
txtx=Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml",1)

And simply

Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml)

All I get is Winmail itself opening ~ not the email.

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes and the shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed up either

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[smegot]

Decided to try out Thunderbird and the original command works np's. - I shall
make do with this as a solution.

i.e.

Dim txtx
txtx = Shell("C:\Program Files\Mozilla Thunderbird\thunderbird.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

Steve,

Thanks for the swift response - I tried both the following and neither worked
Any other ideas?

i.e.

Tried -

Dim txtx
txtx=Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml",1)

And simply

Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml)

All I get is Winmail itself opening ~ not the email.

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes and the shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed up either

:

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[Steve Cochran]

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"/mailurl:C:\Users\Username\Desktop\test.eml")

If you can get it to work in the Command window, then it should work with
VB.

steve

Decided to try out Thunderbird and the original command works np's. - I
shall
make do with this as a solution.

i.e.

Dim txtx
txtx = Shell("C:\Program Files\Mozilla Thunderbird\thunderbird.exe" + " "
+
"C:\Users\User\Desktop\test.eml", 1)

Steve,

Thanks for the swift response - I tried both the following and neither
worked
Any other ideas?

i.e.

Tried -

Dim txtx
txtx=Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml",1)

And simply

Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml)

All I get is Winmail itself opening ~ not the email.

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes and the
shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed up either


:

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[smegot]

You are getting close now Steve. Winmail does now try to open the *.eml file
however the error I am getting is "Windows Mail could not open the URL
c:\Users\Username\Desktop\Test.eml because it is not a recognized format."

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"/mailurl:C:\Users\Username\Desktop\test.eml")

If you can get it to work in the Command window, then it should work with
VB.

steve

Decided to try out Thunderbird and the original command works np's. - I
shall
make do with this as a solution.

i.e.

Dim txtx
txtx = Shell("C:\Program Files\Mozilla Thunderbird\thunderbird.exe" + " "
+
"C:\Users\User\Desktop\test.eml", 1)

Steve,

Thanks for the swift response - I tried both the following and neither
worked
Any other ideas?

i.e.

Tried -

Dim txtx
txtx=Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml",1)

And simply

Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml)

All I get is Winmail itself opening ~ not the email.

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes and the
shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed up either


:

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[Steve Cochran]

Well, you can play around with it. You can even try shelling to the file
itself and see if Windows will pick up on it and launch it with the
appropriate program.

steve

You are getting close now Steve. Winmail does now try to open the *.eml
file
however the error I am getting is "Windows Mail could not open the URL
c:\Users\Username\Desktop\Test.eml because it is not a recognized format."

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"/mailurl:C:\Users\Username\Desktop\test.eml")

If you can get it to work in the Command window, then it should work with
VB.

steve

Decided to try out Thunderbird and the original command works np's. - I
shall
make do with this as a solution.

i.e.

Dim txtx
txtx = Shell("C:\Program Files\Mozilla Thunderbird\thunderbird.exe" + "
"
+
"C:\Users\User\Desktop\test.eml", 1)

:

Steve,

Thanks for the swift response - I tried both the following and neither
worked
Any other ideas?

i.e.

Tried -

Dim txtx
txtx=Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml",1)

And simply

Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml)

All I get is Winmail itself opening ~ not the email.

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes and the
shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed up
either


:

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say
notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[smegot]

Thanks again for the effort Steve. One of the first things I tried was as per
your last suggestion i.e. trying to get the default email program to open
the email.
Do you know if there is something like this for winmail? ~
http://www.mozilla.org/docs/command-line-args.html

Well, you can play around with it. You can even try shelling to the file
itself and see if Windows will pick up on it and launch it with the
appropriate program.

steve

You are getting close now Steve. Winmail does now try to open the *.eml
file
however the error I am getting is "Windows Mail could not open the URL
c:\Users\Username\Desktop\Test.eml because it is not a recognized format."

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"/mailurl:C:\Users\Username\Desktop\test.eml")

If you can get it to work in the Command window, then it should work with
VB.

steve

Decided to try out Thunderbird and the original command works np's. - I
shall
make do with this as a solution.

i.e.

Dim txtx
txtx = Shell("C:\Program Files\Mozilla Thunderbird\thunderbird.exe" + "
"
+
"C:\Users\User\Desktop\test.eml", 1)

:

Steve,

Thanks for the swift response - I tried both the following and neither
worked
Any other ideas?

i.e.

Tried -

Dim txtx
txtx=Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml",1)

And simply

Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml)

All I get is Winmail itself opening ~ not the email.

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes and the
shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed up
either


:

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say
notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[Steve Cochran]

No, there is nothing like that and they don't have much documentation at
all. I'll have to play with that command line. It appears to have changed
since OE. There has to be a syntax that will work.

steve

Thanks again for the effort Steve. One of the first things I tried was as
per
your last suggestion i.e. trying to get the default email program to open
the email.
Do you know if there is something like this for winmail? ~
http://www.mozilla.org/docs/command-line-args.html

Well, you can play around with it. You can even try shelling to the file
itself and see if Windows will pick up on it and launch it with the
appropriate program.

steve

You are getting close now Steve. Winmail does now try to open the *.eml
file
however the error I am getting is "Windows Mail could not open the URL
c:\Users\Username\Desktop\Test.eml because it is not a recognized
format."

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"/mailurl:C:\Users\Username\Desktop\test.eml")

If you can get it to work in the Command window, then it should work
with
VB.

steve

Decided to try out Thunderbird and the original command works
np's. - I
shall
make do with this as a solution.

i.e.

Dim txtx
txtx = Shell("C:\Program Files\Mozilla Thunderbird\thunderbird.exe"
+ "
"
+
"C:\Users\User\Desktop\test.eml", 1)

:

Steve,

Thanks for the swift response - I tried both the following and
neither
worked
Any other ideas?

i.e.

Tried -

Dim txtx
txtx=Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml",1)

And simply

Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml)

All I get is Winmail itself opening ~ not the email.

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes and
the
shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed up
either


:

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say
notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[Steve Cochran]

Here is the answer.

for eml files use the /eml: switch and for nws files use the /nws: switch.

So

Shell("C:\Program Files\Windows Mail\Winmail.exe /eml:" &
"C:\Users\Username\Desktop\test.eml")

The actions are under this registry key for mail messages:

HKEY_CLASSES_ROOT\Microsoft Internet Mail Message\shell

steve

No, there is nothing like that and they don't have much documentation at
all. I'll have to play with that command line. It appears to have
changed since OE. There has to be a syntax that will work.

steve

Thanks again for the effort Steve. One of the first things I tried was as
per
your last suggestion i.e. trying to get the default email program to open
the email.
Do you know if there is something like this for winmail? ~
http://www.mozilla.org/docs/command-line-args.html

Well, you can play around with it. You can even try shelling to the
file
itself and see if Windows will pick up on it and launch it with the
appropriate program.

steve

You are getting close now Steve. Winmail does now try to open the
*.eml
file
however the error I am getting is "Windows Mail could not open the URL
c:\Users\Username\Desktop\Test.eml because it is not a recognized
format."

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"/mailurl:C:\Users\Username\Desktop\test.eml")

If you can get it to work in the Command window, then it should work
with
VB.

steve

Decided to try out Thunderbird and the original command works
np's. - I
shall
make do with this as a solution.

i.e.

Dim txtx
txtx = Shell("C:\Program Files\Mozilla Thunderbird\thunderbird.exe"
+ "
"
+
"C:\Users\User\Desktop\test.eml", 1)

:

Steve,

Thanks for the swift response - I tried both the following and
neither
worked
Any other ideas?

i.e.

Tried -

Dim txtx
txtx=Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml",1)

And simply

Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml)

All I get is Winmail itself opening ~ not the email.

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes and
the
shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed up
either


:

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say
notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[smegot]

Here is the answer.

for eml files use the /eml: switch and for nws files use the /nws: switch.

So

Shell("C:\Program Files\Windows Mail\Winmail.exe /eml:" &
"C:\Users\Username\Desktop\test.eml")

The actions are under this registry key for mail messages:

HKEY_CLASSES_ROOT\Microsoft Internet Mail Message\shell

steve

No, there is nothing like that and they don't have much documentation at
all. I'll have to play with that command line. It appears to have
changed since OE. There has to be a syntax that will work.

steve

Thanks again for the effort Steve. One of the first things I tried was as
per
your last suggestion i.e. trying to get the default email program to open
the email.
Do you know if there is something like this for winmail? ~
http://www.mozilla.org/docs/command-line-args.html

:

Well, you can play around with it. You can even try shelling to the
file
itself and see if Windows will pick up on it and launch it with the
appropriate program.

steve

You are getting close now Steve. Winmail does now try to open the
*.eml
file
however the error I am getting is "Windows Mail could not open the URL
c:\Users\Username\Desktop\Test.eml because it is not a recognized
format."

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"/mailurl:C:\Users\Username\Desktop\test.eml")

If you can get it to work in the Command window, then it should work
with
VB.

steve

Decided to try out Thunderbird and the original command works
np's. - I
shall
make do with this as a solution.

i.e.

Dim txtx
txtx = Shell("C:\Program Files\Mozilla Thunderbird\thunderbird.exe"
+ "
"
+
"C:\Users\User\Desktop\test.eml", 1)

:

Steve,

Thanks for the swift response - I tried both the following and
neither
worked
Any other ideas?

i.e.

Tried -

Dim txtx
txtx=Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml",1)

And simply

Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml)

All I get is Winmail itself opening ~ not the email.

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes and
the
shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed up
either


:

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say
notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[smegot]

Sorry, I messed up my last post (can you delete it?). Yes well done Steve
that does work!! k:
I'll have a look through the registry there.
At the moment I am still using Thunderbird i.e. to do the following ~
Text6.Text is me being lazy (it contains an email address this text box gets
from an access database)

Dim ema As String
Dim txtx
ema = " mailto:" + Text6.Text + "?subject=Your Recent Order."
'txtx = Shell("C:\Program Files\Mozilla Thunderbird\Thunderbird.exe
-compose" + ema, 1)

Do you think this could be done using Winmail?

Here is the answer.

for eml files use the /eml: switch and for nws files use the /nws: switch.

So

Shell("C:\Program Files\Windows Mail\Winmail.exe /eml:" &
"C:\Users\Username\Desktop\test.eml")

The actions are under this registry key for mail messages:

HKEY_CLASSES_ROOT\Microsoft Internet Mail Message\shell

steve

No, there is nothing like that and they don't have much documentation at
all. I'll have to play with that command line. It appears to have
changed since OE. There has to be a syntax that will work.

steve

Thanks again for the effort Steve. One of the first things I tried was as
per
your last suggestion i.e. trying to get the default email program to open
the email.
Do you know if there is something like this for winmail? ~
http://www.mozilla.org/docs/command-line-args.html

:

Well, you can play around with it. You can even try shelling to the
file
itself and see if Windows will pick up on it and launch it with the
appropriate program.

steve

You are getting close now Steve. Winmail does now try to open the
*.eml
file
however the error I am getting is "Windows Mail could not open the URL
c:\Users\Username\Desktop\Test.eml because it is not a recognized
format."

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"/mailurl:C:\Users\Username\Desktop\test.eml")

If you can get it to work in the Command window, then it should work
with
VB.

steve

Decided to try out Thunderbird and the original command works
np's. - I
shall
make do with this as a solution.

i.e.

Dim txtx
txtx = Shell("C:\Program Files\Mozilla Thunderbird\thunderbird.exe"
+ "
"
+
"C:\Users\User\Desktop\test.eml", 1)

:

Steve,

Thanks for the swift response - I tried both the following and
neither
worked
Any other ideas?

i.e.

Tried -

Dim txtx
txtx=Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml",1)

And simply

Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml)

All I get is Winmail itself opening ~ not the email.

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes and
the
shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed up
either


:

If i create an email and save it to the desktop i.e. test.eml
and i want to issue a command to open it from vb6 using say
notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work

 

[Steve Cochran]

I don't know if you can add the subject like that or not. You'll have to
experiment with it.

steve

Sorry, I messed up my last post (can you delete it?). Yes well done Steve
that does work!! k:
I'll have a look through the registry there.
At the moment I am still using Thunderbird i.e. to do the following ~
Text6.Text is me being lazy (it contains an email address this text box
gets
from an access database)

Dim ema As String
Dim txtx
ema = " mailto:" + Text6.Text + "?subject=Your Recent Order."
'txtx = Shell("C:\Program Files\Mozilla Thunderbird\Thunderbird.exe
-compose" + ema, 1)

Do you think this could be done using Winmail?

Here is the answer.

for eml files use the /eml: switch and for nws files use the /nws:
switch.

So

Shell("C:\Program Files\Windows Mail\Winmail.exe /eml:" &
"C:\Users\Username\Desktop\test.eml")

The actions are under this registry key for mail messages:

HKEY_CLASSES_ROOT\Microsoft Internet Mail Message\shell

steve

No, there is nothing like that and they don't have much documentation
at
all. I'll have to play with that command line. It appears to have
changed since OE. There has to be a syntax that will work.

steve

Thanks again for the effort Steve. One of the first things I tried was
as
per
your last suggestion i.e. trying to get the default email program to
open
the email.
Do you know if there is something like this for winmail? ~
http://www.mozilla.org/docs/command-line-args.html

:

Well, you can play around with it. You can even try shelling to the
file
itself and see if Windows will pick up on it and launch it with the
appropriate program.

steve

You are getting close now Steve. Winmail does now try to open the
*.eml
file
however the error I am getting is "Windows Mail could not open the
URL
c:\Users\Username\Desktop\Test.eml because it is not a recognized
format."

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"/mailurl:C:\Users\Username\Desktop\test.eml")

If you can get it to work in the Command window, then it should
work
with
VB.

steve

Decided to try out Thunderbird and the original command works
np's. - I
shall
make do with this as a solution.

i.e.

Dim txtx
txtx = Shell("C:\Program Files\Mozilla
Thunderbird\thunderbird.exe"
+ "
"
+
"C:\Users\User\Desktop\test.eml", 1)

:

Steve,

Thanks for the swift response - I tried both the following and
neither
worked
Any other ideas?

i.e.

Tried -

Dim txtx
txtx=Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml",1)

And simply

Shell ("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\User\Desktop\test.eml)

All I get is Winmail itself opening ~ not the email.

:

Try

Shell("C:\Program Files\Windows Mail\Winmail.exe " &
"C:\Users\Username\Desktop\test.eml")

Your second example left out the initial and trailing quotes
and
the
shell
statement.

steve

BTW it's not because i got my fish and my test eml's mixed
up
either


:

If i create an email and save it to the desktop i.e.
test.eml
and i want to issue a command to open it from vb6 using
say
notepad
then -

Dim txtx
txtx = Shell("c:\windows\system32\notepad.exe" + " " +
"C:\Users\User\Desktop\test.eml", 1)

So how do i get winmail.exe to open test.eml?
as

C:\Program Files\Windows Mail\winmail.exe" + " " +
"C:\Users\User\Desktop\Fish.eml

Doesn't work