Velocity Reviews - Computer Hardware Reviews

Velocity Reviews > Newsgroups > Programming > Ruby > outlook and win32 service

Reply
Thread Tools

outlook and win32 service

 
 
BENI
Guest
Posts: n/a
 
      04-08-2008
Hi all,

i detail out an issue i am facing while trying to read messages from
outlook via a windows service.

The goal of the code is to scan outlook inbox every 10 minutes and if
any specified file attachment is found ... save it.

The code will be installed as an windows service and scan for the
email automatically.

The service code is fine and runs in background as well but as I call
outlook via win32ole from the service mainloop it does not give me
the inbox with any item.


Can any one lead me to the problem??


the service code
it works like a champ
================
require 'win32/service'
include Win32

puts 'VERSION: ' + Service::VERSION


SERVICE_NAME = 'Kpi-file-Scanner'
SERVICE_DISPLAYNAME = 'An-outlook-scanner'

cmd = 'c:\instantrails\ruby\bin\ruby'

cmd += '"C:\\instantrails\\rails_apps\\kpi\\vendor\\servi ce\
\outlookpull.rb"'

raise ArgumentError, 'No argument provided' unless ARGV[0]

case ARGV[0].downcase
when 'install'


svc= Service.new(SERVICE_NAME, nil,{
:service_type => Service::WIN32_OWN_PROCESS,
:description => SERVICE_DISPLAYNAME,
:start_type => Service::AUTO_START,
:error_control => Service::ERROR_NORMAL,
:binary_path_name => cmd,
:load_order_group => 'Network',
:dependencies => ['W32Time','Schedule'],
:display_name => 'Kpi-file-Scanner'}
)


puts 'Service ' + SERVICE_NAME + ' installed'
when 'start'
if Service.status(SERVICE_NAME).current_state != 'running'

Service.start(SERVICE_NAME)
while Service.status(SERVICE_NAME).current_state != 'running'
puts 'One moment...' +
Service.status(SERVICE_NAME).current_state
sleep 1
end
puts 'Service ' + SERVICE_NAME + ' started'
else
puts 'Already running'
end
when 'stop'
if Service.status(SERVICE_NAME).current_state != 'stopped'
Service.stop(SERVICE_NAME)
while Service.status(SERVICE_NAME).current_state != 'stopped'
puts 'One moment...' +
Service.status(SERVICE_NAME).current_state
sleep 1
end
puts 'Service ' + SERVICE_NAME + ' stopped'
else
puts 'Already stopped'
end
when 'uninstall', 'delete'
if Service.status(SERVICE_NAME).current_state != 'stopped'
Service.stop(SERVICE_NAME)
end
while Service.status(SERVICE_NAME).current_state != 'stopped'
puts 'One moment...' +
Service.status(SERVICE_NAME).current_state
sleep 1
end
Service.delete(SERVICE_NAME)
puts 'Service ' + SERVICE_NAME + ' deleted'
when 'pause'
if Service.status(SERVICE_NAME).current_state != 'paused'
Service.pause(SERVICE_NAME)
while Service.status(SERVICE_NAME).current_state != 'paused'
puts 'One moment...' +
Service.status(SERVICE_NAME).current_state
sleep 1
end
puts 'Service ' + SERVICE_NAME + ' paused'
else
puts 'Already paused'
end
when 'resume'
if Service.status(SERVICE_NAME).current_state != 'running'
Service.resume(SERVICE_NAME)
while Service.status(SERVICE_NAME).current_state != 'running'
puts 'One moment...' +
Service.status(SERVICE_NAME).current_state
sleep 1
end
puts 'Service ' + SERVICE_NAME + ' resumed'
else
puts 'Already running'
end
else
raise ArgumentError, 'unknown option: ' + ARGV[0]
end
==============================================
now the outlookpull.rb code that is called by this service

================================================== =
LOG_FILE = "C:\\instantrails\\rails_apps\\kpi\\vendor\\servic e\
\test.log"

begin
require "C:\\instantrails\\ruby\\lib\\ruby\\gems\\1.8\\gem s\
\actionpack-2.0.2\\lib\\action_controller.rb"
require "C:\\instantrails\\rails_apps\\kpi\\app\\controlle rs\
\application.rb"
require "C:\\instantrails\\rails_apps\\kpi\\app\\controlle rs\
\kpimumbai_controller.rb"
File.open(LOG_FILE, "a+"){ |f| f.puts "kpimumbai_controller.rb
required" }
require 'win32/service'
require 'win32/daemon'
include Win32
require 'win32ole'
require "parsedate.rb"
include ParseDate

class Daemon

def service_init
@a=KpimumbaiController.new
sleep 10
end

def service_main
msg = 'service_main entered at: ' + Time.now.to_s
File.open(LOG_FILE, "a+"){ |f| f.puts msg }
#@first_entry = true
while running?
if state == RUNNING
msg = 'running state entered at : ' + Time.now.to_s
File.open(LOG_FILE, "a+"){ |f| f.puts msg }
begin
#@tick.refresh(@first_entry,@sqlconnect)
#@first_entry = false
#require 'win32ole'


#we will get the time of the last parsed message and
#will go in only if the message timing is after that of
the last parsed
#message time
File.open(LOG_FILE, "a+"){ |f| f.puts "just before
readlines" }
last_time=IO.readlines("C:\\instantrails\\rails_ap ps
\\kpi\\vendor\\service\\spawntime.log")
last_time=last_time.to_s.chomp
File.open(LOG_FILE, "a+"){ |f| f.puts
"=====last_time:#{last_time}" }

if last_time.to_s == "nil"
last_time="1971/10/04 19:03:24"
end
@outlook = WIN32OLE.new('Outlook.Application')
@mapi = @outlook.GetNameSpace('MAPI')
@inbox = @mapi.GetDefaultFolder(6)
@file_c=1


arr_last_time =
parsedate(last_time.to_s).delete_if{|x|x=="nil"}

File.open(LOG_FILE, "a+"){ |f| f.puts
"=====arr_last_time:#{arr_last_time}" }


timed_last_time=Time.mktime(arr_last_time[0],arr_last_time[1],arr_last_time[2],arr_last_time[3],arr_last_time[4],arr_last_time[5])

File.open(LOG_FILE, "a+"){ |f| f.puts
"====timed_last_time:#{timed_last_time}" }

File.open(LOG_FILE, "a+"){ |f|
f.puts"#{@inbox.UnreadItemCount}:Unread Messages" }
File.open(LOG_FILE, "a+"){ |f| f.puts
"#{@inbox.Items.Count}: Messages" }
begin
@inbox.Items.each do |message|

File.open(LOG_FILE, "a+"){ |f| f.puts
"====mesage time:#{message.ReceivedTime}" }
time_of_the_message =
parsedate(message.ReceivedTime)
#this gives us the array containing the time
timed_time_of_the_message =
Time.mktime(time_of_the_message[0],time_of_the_message[1],time_of_the_message[2],time_of_the_message[3],time_of_the_message[4],time_of_the_message[5])
#we will compare this time with the last time
object and go in for looking
#onto attachment if this is newer
File.open(LOG_FILE, "a+"){ |f| f.puts
"time difference:#{timed_time_of_the_message-timed_last_time}"}
if timed_time_of_the_message >
timed_last_time
message.Attachments.each do |
attachment|



filepattern=attachment.fileName.to_s.index(/NBH_|BBH_/)
if filepattern !=
nil
File.open(LOG_FILE,
"a+"){ |f| f.puts "======#{attachment.fileName.to_s}"}

temp_filename = "C:\
\instantrails\\rails_apps\\kpi\\vendor\\service\\t emp\
\#{attachment.FileName}"
Dir.foreach("C:\
\instantrails\\rails_apps\\kpi\\vendor\\service\\t emp\\") { |x|
File.delete("C:\\instantrails\\rails_apps\\kpi\\ve ndor\\service\\temp\
\"+ x) if x!= "." && x!=".." }

attachment.SaveAsFile(temp_filename)
#we will now call
the fileupdater method of kpimumbaicontroller object

@a.fileupdateupdater(temp_filename)

@file_c +=1
end
end
else
next
end

timed_last_time=timed_time_of_the_message
end
rescue Exception => err
File.open(LOG_FILE, "a+"){ |fh| fh.puts 'the
error at inner begin: ' + err }

raise

end




msg = 'mailbox spawn succ at : ' + Time.now.to_s
File.open(LOG_FILE, "a+"){ |f| f.puts msg }

rescue Exception => err
File.open(LOG_FILE, "a+"){ |fh| fh.puts 'the
error at outer begin: ' + err }
#close @sqlconnection
raise
#msg = 'mail box spawn FAILED at : ' +
Time.now.to_s
#File.open(LOG_FILE, "a+"){ |f| f.puts msg }
end
#finally after every spawn we need to update the last time
stamp entry in the spawn file
File.open("C:\\instantrails\\rails_apps\\kpi\\vend or\
\service\\spawntime.log", "w+"){ |f| f.puts timed_last_time }
#outlook.close
sleep 180
else
msg = 'non running state entered at : ' +
Time.now.to_s
File.open(LOG_FILE, "a+"){ |f| f.puts msg }
sleep 0.5
end
end

File.open(LOG_FILE, "a+"){ |f| f.puts "STATE: #{state}" }

msg = 'service_main left at: ' + Time.now.to_s
File.open(LOG_FILE, "a+"){ |f| f.puts msg }
end

def service_stop

msg = "Received stop signal at: " + Time.now.to_s
File.open(LOG_FILE, "a+"){ |f| f.puts msg }
end

def service_pause
msg = "Received pause signal at: " + Time.now.to_s
File.open(LOG_FILE, "a+"){ |f| f.puts msg }
end

def service_resume
msg = "Received resume signal at: " + Time.now.to_s
File.open(LOG_FILE, "a+"){ |f| f.puts msg }
end

end

svc=Daemon.new
svc.mainloop

rescue Exception => err
File.open(LOG_FILE, "a+"){ |fh| fh.puts 'Daemon failure: ' + err }

raise
end

==================================================


Sorry for a long code...

The problem is that my log file loooks like this
============================
kpimumbai_controller.rb required
service_main entered at: Tue Apr 08 17:30:24 +0530 2008
running state entered at : Tue Apr 08 17:30:24 +0530 2008
just before readlines
=====last_time:Mon Oct 04 19:03:24 +0530 1971
=====arr_last_time:197110419324+05301
====timed_last_time:Mon Oct 04 19:03:24 +0530 1971
0:Unread Messages
0: Messages
mailbox spawn succ at : Tue Apr 08 17:30:24 +0530 2008
===========================================

the inbox messagecount is returning 0 messages.

while if i run it without any service deamon via simple code like this

require 'win32ole'
outlook = WIN32OLE.new('Outlook.Application')
mapi = outlook.GetNameSpace('MAPI')
inbox = mapi.GetDefaultFolder(6)
file_c=1

#methods = []
#arrival_time=inbox.Items(1).ReceivedTime
#b=arrival_time.to_a
#puts arrival_time
#require "parsedate.rb"
#include ParseDate
#formatted_date=parsedate(arrival_time)
#p formatted_date
puts "#{inbox.UnreadItemCount}:so many unread messages"
puts "#{inbox.Items.Count}:so many messages"
=======================

i get output like a champ
===============
484:so many unread messages
11398:so many messages
========================


i am battling it out for last couple of days to find why.
and i need help badly.


Br

Rajib


 
Reply With Quote
 
 
 
 
Jano Svitok
Guest
Posts: n/a
 
      04-08-2008
On Tue, Apr 8, 2008 at 3:50 PM, BENI <(E-Mail Removed)> wrote:
> Hi all,
>
> i detail out an issue i am facing while trying to read messages from
> outlook via a windows service.
>
> The goal of the code is to scan outlook inbox every 10 minutes and if
> any specified file attachment is found ... save it.
>
> The code will be installed as an windows service and scan for the
> email automatically.
>
> The service code is fine and runs in background as well but as I call
> outlook via win32ole from the service mainloop it does not give me
> the inbox with any item.


Hi,

quick hint without reading your code: do you have permissions to read
the mailbox?
Or, are you really reading the mailbox you think you are reading?

Usually services run under SYSTEM account, so you may have to change
it to run under
you user account to read your mails. Alternatively, you can use runas
command to exec script under different account.

J.

 
Reply With Quote
 
 
 
Reply

Thread Tools

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
Win32 Service: Access Denied when creating service Rajiv Abraham Ruby 3 04-16-2010 10:34 AM
How to start a service with the win32-service gem Kai Geng Ruby 0 12-12-2007 10:00 AM
win32 process information, using win32 extension Java and Swing Python 1 10-24-2005 09:13 PM
Hmmm... problems with CPAN (MakeMaker?) on Win32+MSYS or Win32+UnixUtils and others Alex Lyman Perl 0 03-07-2004 05:10 PM
Win32::SAPI4 question (Win32 events and Perl) Michael Edmonson Perl Misc 0 02-28-2004 03:20 AM



Advertisments