How to tell if a document is new ?

In visual basic ? what method or property can I use to determine if a
document has ever beens saved ?

Cheers

--
OHM ( Terry Burns ) * Use the following to email me *

Dim ch() As Char = "ufssz/cvsotAhsfbuTpmvujpotXjui/OFU".ToCharArray()
For i As Int32 = 0 To ch.Length - 1
ch(i) = Convert.ToChar(Convert.ToInt16(ch(i)) - 1)
Next
Process.Start("mailto:" & New String(ch))
--

-----Original Message-----
In visual basic ? what method or property can I use to
determine if a
document has ever beens saved ?

Cheers

--
OHM ( Terry Burns ) * Use the following to email me *

Dim ch() As Char =
"ufssz/cvsotAhsfbuTpmvujpotXjui/OFU".ToCharArray()
For i As Int32 = 0 To ch.Length - 1
ch(i) = Convert.ToChar(Convert.ToInt16(ch(i)) - 1)
Next
Process.Start("mailto:" & New String(ch))
--


.

What does this have to do with MS Office Word?

A lot actually, I wanted to use Words Basic to determine this. However, Ive
since worked it out.

Thanks

--
OHM ( Terry Burns ) * Use the following to email me *

Dim ch() As Char = "ufssz/cvsotAhsfbuTpmvujpotXjui/OFU".ToCharArray()
For i As Int32 = 0 To ch.Length - 1
ch(i) = Convert.ToChar(Convert.ToInt16(ch(i)) - 1)
Next
Process.Start("mailto:" & New String(ch))
--
"Chuck Davis" wrote in message
...

-----Original Message-----
In visual basic ? what method or property can I use to
determine if a
document has ever beens saved ?

Cheers

--
OHM ( Terry Burns ) * Use the following to email me *

Dim ch() As Char =
"ufssz/cvsotAhsfbuTpmvujpotXjui/OFU".ToCharArray()
For i As Int32 = 0 To ch.Length - 1
ch(i) = Convert.ToChar(Convert.ToInt16(ch(i)) - 1)
Next
Process.Start("mailto:" & New String(ch))
--


.

What does this have to do with MS Office Word?

OHM ( Terry Burns ) shared this with us in
microsoft.public.word.newusers:

A lot actually, I wanted to use Words Basic to determine this.
However, Ive since worked it out.

Thanks

Share your solution with the world!

--
Amedee Van Gasse using XanaNews 1.16.5.2
If it has an "X" in the name, it must be Linux?
Please don't thank me in advance. Thank me afterwards if it works or
hit me in the face if it doesn't. ;-)

test the property against the date "01/01/1601" which is the default date

--
OHM ( Terry Burns ) * Use the following to email me *

Dim ch() As Char = "ufssz/cvsotAhsfbuTpmvujpotXjui/OFU".ToCharArray()
For i As Int32 = 0 To ch.Length - 1
ch(i) = Convert.ToChar(Convert.ToInt16(ch(i)) - 1)
Next
Process.Start("mailto:" & New String(ch))
--
"Amedee Van Gasse" wrote in message
...
OHM ( Terry Burns ) shared this with us in
microsoft.public.word.newusers:

A lot actually, I wanted to use Words Basic to determine this.
However, Ive since worked it out.

Thanks

Share your solution with the world!

--
Amedee Van Gasse using XanaNews 1.16.5.2
If it has an "X" in the name, it must be Linux?
Please don't thank me in advance. Thank me afterwards if it works or
hit me in the face if it doesn't. ;-)

As long as you have started typing in the document,

MsgBox ActiveDocument.Saved

Will return "False"

For a completely new, virgin document, it will however shown True because as
far as Word is concerned, there is nothing do save.



--
Please post any further questions or followup to the newsgroups for the
benefit of others who may be interested. Unsolicited questions forwarded
directly to me will only be answered on a paid consulting basis.

Hope this helps
Doug Robbins - Word MVP
"Amedee Van Gasse" wrote in message
...
OHM ( Terry Burns ) shared this with us in
microsoft.public.word.newusers:

A lot actually, I wanted to use Words Basic to determine this.
However, Ive since worked it out.

Thanks

Share your solution with the world!

--
Amedee Van Gasse using XanaNews 1.16.5.2
If it has an "X" in the name, it must be Linux?
Please don't thank me in advance. Thank me afterwards if it works or
hit me in the face if it doesn't. ;-)