[lnkForumImage]
TotalShareware - Download Free Software

Confronta i prezzi di migliaia di prodotti.
Asp Forum
 Home | Login | Register | Search 


 

Forums >

comp.lang.ruby

outlook and win32 service

BENI

4/8/2008 1:48:00 PM

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\\service\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\\service\test.log"

begin
require "C:\\instantrails\\ruby\\lib\\ruby\\gems\\1.8\\gems\actionpack-2.0.2\\lib\\action_controller.rb"
require "C:\\instantrails\\rails_apps\\kpi\\app\\controllers\application.rb"
require "C:\\instantrails\\rails_apps\\kpi\\app\\controllers\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_apps
\\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\\temp\#{attachment.FileName}"
Dir.foreach("C:\instantrails\\rails_apps\\kpi\\vendor\\service\\temp\\") { |x|
File.delete("C:\\instantrails\\rails_apps\\kpi\\vendor\\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\\vendor\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


2 Answers

Jano Svitok

4/8/2008 2:20:00 PM

0

On Tue, Apr 8, 2008 at 3:50 PM, BENI <rajib.chakrabarti@googlemail.com> 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.

konsisten

3/26/2014 3:08:00 AM

0

Pada Rabu, 26 Maret 2014 9:10:26 UTC+7, konsisten menulis:
> Pada Rabu, 26 Maret 2014 7:56:53 UTC+7, ><((((((8> <8))))))>< menulis: > konsisten <orexascrb@gmail.com> wrote in news:a8dde334-a1b1-4b7b-8f11-3b53bba25af1@googlegroups.com: > Saya tidak mau sebut lagi Capres A atau B nanti dikira 'jualan'. > Begini kira kira 2 bulan lalu di Discovery Channel ada liputan > wartawan bule disalah satu tempat pemakaman termewah dunia di > Karawang. Setelah wartawan tsb. menunggu, tibalah Helikopter yg > ditunggu tunggu mengangkut si Direktur wanita tiba. Setelah cukup > bertanya tanya berkeliling dlsb. betool. harus tegas , berani membongkar siapa dalang kerusuhan Mei 98 ! jangan maen kaboooor ke Jordania haros berani tegas bongkar asal usul kekayaan pribadi bisa sampe 1.6 triliun, gilaaaa ..... dan haros berani buka2aan, bener gak issue2 nyang bilang belio IMPOTEN gara2 tertembak/terluka dalam insiden penyerangan Timor Timur Itu isu pribadi bukan adu program seperti yang Junjungan anda mau. Lagi juga kalaupun dugaan itu betul, itu dalam konteks 'bela negara' mempertahankan Tim Tim, yang akhirnya Tim Tim dilepas BJ Habibie dengan diijinkannya referendum Tim Tim karena tekanan luar negeri.Tetapi Kenapa Habibie selalu serang Prabowo?, perlukah Tim Tim referendum kembali seperti Crimea?, yang akhirnya kembali ke pangkuan Rusia. Apakah masyarakat Tim Tim bahagia jika belanja harus dengan mata uang dollarnya yang mahal? Hati 2 dengan isu perdebatan pelanggaran HAM dlsb, salah2 ada institusi yang marah jika dipojokkan terus menerus oleh salah satu kubu. lebih baik cari teman drpd cari musuh, kalaupun Jokowi naik.

Prabowo sudah pernah disidangkan di sidang Mahkamah Militer dan sudah menerima resiko hukuman, apa kurang cukup?, kalau anda dan pendukung Jokowi lainnya terus menerus mengungkit hal ini di semua media online, berarti secara tidak langsung anda tidak mempercayai atau menghormati hak prerogatif institusi tsb.