Outlook Banter

Outlook Banter (http://www.outlookbanter.com/)
-   Outlook and VBA (http://www.outlookbanter.com/outlook-vba/)
-   -   VBA access for HTTP folders (MSN/Hotmail) (http://www.outlookbanter.com/outlook-vba/34570-vba-access-http-folders-msn.html)

Rayo K December 5th 06 03:01 PM

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

Michael Bauer [MVP - Outlook] December 6th 06 07:18 AM

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


Rayo K December 6th 06 08:07 PM

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



Michael Bauer [MVP - Outlook] December 7th 06 07:36 AM

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



Rayo K December 7th 06 02:10 PM

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



Michael Bauer [MVP - Outlook] December 8th 06 07:53 AM

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



Rayo K December 8th 06 06:46 PM

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




Michael Bauer [MVP - Outlook] December 9th 06 09:57 AM

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





All times are GMT +1. The time now is 10:40 AM.

Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Search Engine Friendly URLs by vBSEO 2.4.0
Copyright ©2004-2006 OutlookBanter.com