VBA access for HTTP folders (MSN/Hotmail)
 

I have a macro that synchronizes my Outlook sent items with my MSN account
sent items (for when I send mail via the website or another computer). The
macro seems to work fine as long as the connection remains. However, if the
connection is lost and it shifts to offline mode, the prgoram crashes.

Is there a way for VB to check if the target folder is "online"? I think
that if I run that check before trying to access the folder, it will work.

Thanks
Rayo

VBA access for HTTP folders (MSN/Hotmail)
 

Do you use an error handler? A simply On Errot Goto should prevent your code
from "crashing".

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Tue, 5 Dec 2006 06:01:01 -0800 schrieb Rayo K:

I have a macro that synchronizes my Outlook sent items with my MSN account
sent items (for when I send mail via the website or another computer). The
macro seems to work fine as long as the connection remains. However, if
the
connection is lost and it shifts to offline mode, the prgoram crashes.

Is there a way for VB to check if the target folder is "online"? I think
that if I run that check before trying to access the folder, it will work.

Thanks
Rayo

VBA access for HTTP folders (MSN/Hotmail)
 

Thanks.

I thought about that and it could probably work. The problem is that the
error only occurs when I use the item.copy.move method. The result is that
the code terminates with a copy already made (I don't understand why it can
copy an email into the folder but not move it).

So I need to 'trigger' a potential error event before that code executes,
without actually changing anything if the error occurs. So I don't know how
to apply an error handler to this situation. Any ideas?

-Rayo

"Michael Bauer [MVP - Outlook]" wrote:



Do you use an error handler? A simply On Errot Goto should prevent your code
from "crashing".

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Tue, 5 Dec 2006 06:01:01 -0800 schrieb Rayo K:

I have a macro that synchronizes my Outlook sent items with my MSN account
sent items (for when I send mail via the website or another computer). The
macro seems to work fine as long as the connection remains. However, if
the
connection is lost and it shifts to offline mode, the prgoram crashes.

Is there a way for VB to check if the target folder is "online"? I think
that if I run that check before trying to access the folder, it will work.

Thanks
Rayo

VBA access for HTTP folders (MSN/Hotmail)
 

For instance:

On Error REsume Next
Dim Copy as MailItem

Set Copy=Item.Copy
If Err.Number Then
Copy.Delete
Set Copy=Nothing
Else
Copy.Move ...
Endif


--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Wed, 6 Dec 2006 11:07:02 -0800 schrieb Rayo K:

Thanks.

I thought about that and it could probably work. The problem is that the
error only occurs when I use the item.copy.move method. The result is that
the code terminates with a copy already made (I don't understand why it
can
copy an email into the folder but not move it).

So I need to 'trigger' a potential error event before that code executes,
without actually changing anything if the error occurs. So I don't know
how
to apply an error handler to this situation. Any ideas?

-Rayo

"Michael Bauer [MVP - Outlook]" wrote:



Do you use an error handler? A simply On Errot Goto should prevent your
code
from "crashing".

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Tue, 5 Dec 2006 06:01:01 -0800 schrieb Rayo K:

I have a macro that synchronizes my Outlook sent items with my MSN
account
sent items (for when I send mail via the website or another computer).
The
macro seems to work fine as long as the connection remains. However, if
the
connection is lost and it shifts to offline mode, the prgoram crashes.

Is there a way for VB to check if the target folder is "online"? I
think
that if I run that check before trying to access the folder, it will
work.

Thanks
Rayo

VBA access for HTTP folders (MSN/Hotmail)
 

Thanks. That works, but now i would like to terminate the program as soon as
it finds it is offline. I think it should look something like this:

If FCopy Then
'If the server is not connected, it will not copy the email
*** On Error Goto [?] **************
Set itemCopy = item1.Copy
If Err.Number Then
itemCopy.Delete
Set itemCopy = Nothing
Else
itemCopy.Move folder2
totalCopied = totalCopied + 1

End If

'item1.Copy.Move folder2
'totalCopied = totalCopied + 1
End If

I'm not familiar with the Goto clause. What do I need to put after goto (I
want to stop the program and create a message box stating the folder is
offline)
\
Thanks
-Rayo

"Michael Bauer [MVP - Outlook]" wrote:



For instance:

On Error REsume Next
Dim Copy as MailItem

Set Copy=Item.Copy
If Err.Number Then
Copy.Delete
Set Copy=Nothing
Else
Copy.Move ...
Endif


--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Wed, 6 Dec 2006 11:07:02 -0800 schrieb Rayo K:

Thanks.

I thought about that and it could probably work. The problem is that the
error only occurs when I use the item.copy.move method. The result is that
the code terminates with a copy already made (I don't understand why it
can
copy an email into the folder but not move it).

So I need to 'trigger' a potential error event before that code executes,
without actually changing anything if the error occurs. So I don't know
how
to apply an error handler to this situation. Any ideas?

-Rayo

"Michael Bauer [MVP - Outlook]" wrote:



Do you use an error handler? A simply On Errot Goto should prevent your
code
from "crashing".

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Tue, 5 Dec 2006 06:01:01 -0800 schrieb Rayo K:

I have a macro that synchronizes my Outlook sent items with my MSN
account
sent items (for when I send mail via the website or another computer).
The
macro seems to work fine as long as the connection remains. However, if
the
connection is lost and it shifts to offline mode, the prgoram crashes.

Is there a way for VB to check if the target folder is "online"? I
think
that if I run that check before trying to access the folder, it will
work.

Thanks
Rayo

VBA access for HTTP folders (MSN/Hotmail)
 

There're two possibilities:

'On Error Resume Next' ignores the error and you can check in the next line
of code if an error occured. See my first sample.

'On Error Goto AnyName' jumps to a xxx (I don't know how to translate that).
That would look like this:

On Error Goto AnyName

' code here that raises an error
' more code here but these line won't be executed

AnyName: ' this is the xxx. Note that it ends with a double point!
' here the execution goes on

Both methods are possible if you want to leave the procedure. In my first
sample you could add a line like this:

If Err.Number Then
itemCopy.Delete
Set itemCopy = Nothing
Exit Sub
Endif


--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --


Am Thu, 7 Dec 2006 05:10:01 -0800 schrieb Rayo K:

Thanks. That works, but now i would like to terminate the program as soon
as
it finds it is offline. I think it should look something like this:

If FCopy Then
'If the server is not connected, it will not copy the email
*** On Error Goto [?] **************
Set itemCopy = item1.Copy
If Err.Number Then
itemCopy.Delete
Set itemCopy = Nothing
Else
itemCopy.Move folder2
totalCopied = totalCopied + 1

End If

'item1.Copy.Move folder2
'totalCopied = totalCopied + 1
End If

I'm not familiar with the Goto clause. What do I need to put after goto (I
want to stop the program and create a message box stating the folder is
offline)
\
Thanks
-Rayo

"Michael Bauer [MVP - Outlook]" wrote:



For instance:

On Error REsume Next
Dim Copy as MailItem

Set Copy=Item.Copy
If Err.Number Then
Copy.Delete
Set Copy=Nothing
Else
Copy.Move ...
Endif


--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Wed, 6 Dec 2006 11:07:02 -0800 schrieb Rayo K:

Thanks.

I thought about that and it could probably work. The problem is that the
error only occurs when I use the item.copy.move method. The result is
that
the code terminates with a copy already made (I don't understand why it
can
copy an email into the folder but not move it).

So I need to 'trigger' a potential error event before that code
executes,
without actually changing anything if the error occurs. So I don't know
how
to apply an error handler to this situation. Any ideas?

-Rayo

"Michael Bauer [MVP - Outlook]" wrote:



Do you use an error handler? A simply On Errot Goto should prevent your
code
from "crashing".

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Tue, 5 Dec 2006 06:01:01 -0800 schrieb Rayo K:

I have a macro that synchronizes my Outlook sent items with my MSN
account
sent items (for when I send mail via the website or another computer).
The
macro seems to work fine as long as the connection remains. However,
if
the
connection is lost and it shifts to offline mode, the prgoram crashes.

Is there a way for VB to check if the target folder is "online"? I
think
that if I run that check before trying to access the folder, it will
work.

Thanks
Rayo

VBA access for HTTP folders (MSN/Hotmail)
 

Thank you. It appears to work great.

Incidentally, I tried to use the "Try...Catch...Finally" structure at first
and it did not seem to work. I suppose this is not supported in VBA?

"Michael Bauer [MVP - Outlook]" wrote:



There're two possibilities:

'On Error Resume Next' ignores the error and you can check in the next line
of code if an error occured. See my first sample.

'On Error Goto AnyName' jumps to a xxx (I don't know how to translate that).
That would look like this:

On Error Goto AnyName

' code here that raises an error
' more code here but these line won't be executed

AnyName: ' this is the xxx. Note that it ends with a double point!
' here the execution goes on

Both methods are possible if you want to leave the procedure. In my first
sample you could add a line like this:

If Err.Number Then
itemCopy.Delete
Set itemCopy = Nothing
Exit Sub
Endif


--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --


Am Thu, 7 Dec 2006 05:10:01 -0800 schrieb Rayo K:

Thanks. That works, but now i would like to terminate the program as soon
as
it finds it is offline. I think it should look something like this:

If FCopy Then
'If the server is not connected, it will not copy the email
*** On Error Goto [?] **************
Set itemCopy = item1.Copy
If Err.Number Then
itemCopy.Delete
Set itemCopy = Nothing
Else
itemCopy.Move folder2
totalCopied = totalCopied + 1

End If

'item1.Copy.Move folder2
'totalCopied = totalCopied + 1
End If

I'm not familiar with the Goto clause. What do I need to put after goto (I
want to stop the program and create a message box stating the folder is
offline)
\
Thanks
-Rayo

"Michael Bauer [MVP - Outlook]" wrote:



For instance:

On Error REsume Next
Dim Copy as MailItem

Set Copy=Item.Copy
If Err.Number Then
Copy.Delete
Set Copy=Nothing
Else
Copy.Move ...
Endif


--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Wed, 6 Dec 2006 11:07:02 -0800 schrieb Rayo K:

Thanks.

I thought about that and it could probably work. The problem is that the
error only occurs when I use the item.copy.move method. The result is
that
the code terminates with a copy already made (I don't understand why it
can
copy an email into the folder but not move it).

So I need to 'trigger' a potential error event before that code
executes,
without actually changing anything if the error occurs. So I don't know
how
to apply an error handler to this situation. Any ideas?

-Rayo

"Michael Bauer [MVP - Outlook]" wrote:



Do you use an error handler? A simply On Errot Goto should prevent your
code
from "crashing".

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Tue, 5 Dec 2006 06:01:01 -0800 schrieb Rayo K:

I have a macro that synchronizes my Outlook sent items with my MSN
account
sent items (for when I send mail via the website or another computer).
The
macro seems to work fine as long as the connection remains. However,
if
the
connection is lost and it shifts to offline mode, the prgoram crashes.

Is there a way for VB to check if the target folder is "online"? I
think
that if I run that check before trying to access the folder, it will
work.

Thanks
Rayo

VBA access for HTTP folders (MSN/Hotmail)
 

Correct, it isn't.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Fri, 8 Dec 2006 09:46:02 -0800 schrieb Rayo K:

Thank you. It appears to work great.

Incidentally, I tried to use the "Try...Catch...Finally" structure at
first
and it did not seem to work. I suppose this is not supported in VBA?

"Michael Bauer [MVP - Outlook]" wrote:



There're two possibilities:

'On Error Resume Next' ignores the error and you can check in the next
line
of code if an error occured. See my first sample.

'On Error Goto AnyName' jumps to a xxx (I don't know how to translate
that).
That would look like this:

On Error Goto AnyName

' code here that raises an error
' more code here but these line won't be executed

AnyName: ' this is the xxx. Note that it ends with a double point!
' here the execution goes on

Both methods are possible if you want to leave the procedure. In my first
sample you could add a line like this:

If Err.Number Then
itemCopy.Delete
Set itemCopy = Nothing
Exit Sub
Endif


--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --


Am Thu, 7 Dec 2006 05:10:01 -0800 schrieb Rayo K:

Thanks. That works, but now i would like to terminate the program as
soon
as
it finds it is offline. I think it should look something like this:

If FCopy Then
'If the server is not connected, it will not copy the email
*** On Error Goto [?] **************
Set itemCopy = item1.Copy
If Err.Number Then
itemCopy.Delete
Set itemCopy = Nothing
Else
itemCopy.Move folder2
totalCopied = totalCopied + 1

End If

'item1.Copy.Move folder2
'totalCopied = totalCopied + 1
End If

I'm not familiar with the Goto clause. What do I need to put after goto
(I
want to stop the program and create a message box stating the folder is
offline)
\
Thanks
-Rayo

"Michael Bauer [MVP - Outlook]" wrote:



For instance:

On Error REsume Next
Dim Copy as MailItem

Set Copy=Item.Copy
If Err.Number Then
Copy.Delete
Set Copy=Nothing
Else
Copy.Move ...
Endif


--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Wed, 6 Dec 2006 11:07:02 -0800 schrieb Rayo K:

Thanks.

I thought about that and it could probably work. The problem is that
the
error only occurs when I use the item.copy.move method. The result is
that
the code terminates with a copy already made (I don't understand why
it
can
copy an email into the folder but not move it).

So I need to 'trigger' a potential error event before that code
executes,
without actually changing anything if the error occurs. So I don't
know
how
to apply an error handler to this situation. Any ideas?

-Rayo

"Michael Bauer [MVP - Outlook]" wrote:



Do you use an error handler? A simply On Errot Goto should prevent
your
code
from "crashing".

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.VBOffice.net --

Am Tue, 5 Dec 2006 06:01:01 -0800 schrieb Rayo K:

I have a macro that synchronizes my Outlook sent items with my MSN
account
sent items (for when I send mail via the website or another
computer).
The
macro seems to work fine as long as the connection remains. However,
if
the
connection is lost and it shifts to offline mode, the prgoram
crashes.

Is there a way for VB to check if the target folder is "online"? I
think
that if I run that check before trying to access the folder, it will
work.

Thanks
Rayo