これを試してください..
IMAP メールを既読/未読 (表示/非表示) としてマーク:
require 'chilkat'
imap = Chilkat::CkImap.new()
# Anything unlocks the component and begins a fully-functional 30-day trial.
success = imap.UnlockComponent("Anything for 30-day trial")
if (success != true)
print imap.lastErrorText() + "\n";
exit
end
# Connect to an IMAP server.
success = imap.Connect("mail.chilkatsoft.com")
if (success != true)
print imap.lastErrorText() + "\n";
exit
end
# Login
success = imap.Login("myLogin","myPassword")
if (success != true)
print imap.lastErrorText() + "\n";
exit
end
# Select an IMAP mailbox
success = imap.SelectMailbox("Inbox")
if (success != true)
print imap.lastErrorText() + "\n";
exit
end
# Set PeekMode so that downloaded messages are not
# automatically marked as seen.
imap.put_PeekMode(true)
# The NumMessages property contains the number of messages
# in the currently selected mailbox.
numMsgs = imap.get_NumMessages()
if (numMsgs == 0)
exit
end
for i in 1 .. numMsgs
# Download each email by sequence number (not UID)
# email is a CkEmail
email = imap.FetchSingle(i,false)
if (email == nil )
print imap.lastErrorText() + "\n";
exit
end
# If desired, mark the email as SEEN. There are two
# ways to do it:
# 1) Set the flag directly by using the sequence number
# Indicate that we are passing a sequence number and
# not a UID:
bIsUid = false
# Set the SEEN flag = 1 to mark the email as SEEN,
# or set it to 0 to mark it as not-seen.
success = imap.SetFlag(i,bIsUid,"SEEN",1)
if (success != true)
print imap.lastErrorText() + "\n";
exit
end
# 2) Alternatively, we can use the email object.
# When an email is downloaded from the IMAP server
# Chilkat will add a "ckx-imap-uid" header to the email.
# This makes it possible to know the UID associated with
# the email. (This is not the sequence number, which may change
# from session to session, but the UID which does not change.
# The SetMailFlag method is identical to SetFlag, except
# it gets the UID from the ckx-imap-uid header.
# For example:
success = imap.SetMailFlag(email,"SEEN",1)
if (success != true)
print imap.lastErrorText() + "\n";
exit
end
end
# Disconnect from the IMAP server.
imap.Disconnect()
またはこれを試してください..
Ruby ですべての未読メールを既読にする