{"id":55,"date":"2017-07-19T18:46:24","date_gmt":"2017-07-19T18:46:24","guid":{"rendered":"http:\/\/www.tolouautomation.com\/?p=55"},"modified":"2017-07-19T18:46:24","modified_gmt":"2017-07-19T18:46:24","slug":"debugging-ms-outlook-2010-vb-script-used-in-a-rule","status":"publish","type":"post","link":"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/","title":{"rendered":"Debugging MS Outlook 2010 VB script used in a rule"},"content":{"rendered":"

I wanted to run a VB script in MS-Outlook 2010, in a rule applied to every incoming messages, but I was\u00a0not sure what was the cause of the issue preventing it to run as I expected.<\/p>\n

It meant to find e-mails that\u00a0contain a desired word in its body, but in various upper\/lower letter combination, e.g. “Sometext”,\u00a0“sometext”, or “SOMETEXT”. Then make them “Unreaded” and then move them to “Deleted Items”\u00a0folder.<\/p>\n

So I tried the following way to pinpoint the point of error, as I was not able to find out a way to use the\u00a0debug option of VB (I am not quite sure if it is even possible).<\/p>\n

    \n
  1. I added “On Error GoTo” statement to the VB script, to find out where and why \u00a0this error ever happen.<\/li>\n
  2. I added an error “Handler” part to the VB script, and run the script against \u00a0some sample e-mails.<\/li>\n
  3. Thanks to “Pinpointing the Exact Line Where A Crash Occurs in VB6 or VBA<\/a>” that has made\u00a0finding the line of error possible for me, using “Erl”, knowing where the error occurred is just to read the error message of the “MsgBox”.<\/span><\/li>\n<\/ol>\n

    The following is the complete VB code. Pay attention to line numbers, in fact they are the trick to make “Erl” shows the error line number.<\/p>\n

    Sub CheckSpam(Item As Outlook.MailItem)<\/code>
    \nDim deletedFolder As Outlook.Folder<\/code>
    \n<\/code>
    \n10 On Error GoTo Handler<\/code>
    \n<\/code>
    \n20 If InStr(LCase(Item.Body), \"sometext\") > 0 Then ' \"sometext\" all in lower case<\/code>
    \n30 Set deletedFolder = Application.GetNamespace(\"MAPI\"). _<\/code>
    \nGetDefaultFolder(olFolderDeletedItems)<\/code>
    \n40 Item.UnRead = False<\/code>
    \n50 Item.Move (deletedFolder)<\/code>
    \n60 Set deletedFolder = Nothing<\/code>
    \n760 End If<\/code>
    \n80 Exit Sub<\/code>
    \nHandler:<\/code>
    \n90 MsgBox \"Error Line: \" & Erl & vbCrLf & _<\/code>
    \n\"Error: (\" & Err.Number & \") \" & Err.Description, vbCritical<\/code>
    \nEnd Sub<\/code><\/p>\n

      \n
    1. Then after running on sample e-mail message, I realized that line 50 give the following error:<\/li>\n<\/ol>\n

      “Object is required”.<\/p>\n

        \n
      1. By replacing line 50 with the following the issue has been removed.<\/li>\n<\/ol>\n

        50 Item.Move deletedFolder<\/code><\/p>\n

        I don’t know why the parenthesis should be removed but by looking at some examples I have realized that this is the cause of error.<\/p>\n","protected":false},"excerpt":{"rendered":"

        I wanted to run a VB script in MS-Outlook 2010, in a rule applied to every incoming messages, but I was\u00a0not sure what was the cause of the issue preventing it to run as I expected. It meant to find e-mails that\u00a0contain a desired word in its body, but in various upper\/lower letter combination, e.g. … <\/p>\n

        Continue reading “Debugging MS Outlook 2010 VB script used in a rule”<\/span><\/a><\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[6],"tags":[10,12,15,18],"class_list":["post-55","post","type-post","status-publish","format-standard","hentry","category-msoutlook","tag-debug","tag-msoutlook","tag-rule","tag-vbscript"],"yoast_head":"\nDebugging MS Outlook 2010 VB script used in a rule - Afraz-sanat Zonouz<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/\" \/>\n<meta property=\"og:locale\" content=\"en_US\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Debugging MS Outlook 2010 VB script used in a rule - Afraz-sanat Zonouz\" \/>\n<meta property=\"og:description\" content=\"I wanted to run a VB script in MS-Outlook 2010, in a rule applied to every incoming messages, but I was\u00a0not sure what was the cause of the issue preventing it to run as I expected. It meant to find e-mails that\u00a0contain a desired word in its body, but in various upper\/lower letter combination, e.g. … Continue reading "Debugging MS Outlook 2010 VB script used in a rule"\" \/>\n<meta property=\"og:url\" content=\"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/\" \/>\n<meta property=\"og:site_name\" content=\"Afraz-sanat Zonouz\" \/>\n<meta property=\"article:published_time\" content=\"2017-07-19T18:46:24+00:00\" \/>\n<meta name=\"author\" content=\"afrazsanat\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Written by\" \/>\n\t<meta name=\"twitter:data1\" content=\"afrazsanat\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. reading time\" \/>\n\t<meta name=\"twitter:data2\" content=\"2 minutes\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/\",\"url\":\"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/\",\"name\":\"Debugging MS Outlook 2010 VB script used in a rule - Afraz-sanat Zonouz\",\"isPartOf\":{\"@id\":\"https:\/\/afraz-sanat.com\/#website\"},\"datePublished\":\"2017-07-19T18:46:24+00:00\",\"author\":{\"@id\":\"https:\/\/afraz-sanat.com\/#\/schema\/person\/b9034d80592ca319227aafd344f9db69\"},\"breadcrumb\":{\"@id\":\"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/#breadcrumb\"},\"inLanguage\":\"en-US\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/afraz-sanat.com\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Debugging MS Outlook 2010 VB script used in a rule\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/afraz-sanat.com\/#website\",\"url\":\"https:\/\/afraz-sanat.com\/\",\"name\":\"Afraz-sanat Zonouz\",\"description\":\"Office and industrial Automation\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/afraz-sanat.com\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"en-US\"},{\"@type\":\"Person\",\"@id\":\"https:\/\/afraz-sanat.com\/#\/schema\/person\/b9034d80592ca319227aafd344f9db69\",\"name\":\"afrazsanat\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/afraz-sanat.com\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/secure.gravatar.com\/avatar\/c9ffce4f6798f570d1cf6a2cb93fdc64123c9ea09b5c199fd12f25ed9a8a0a82?s=96&d=mm&r=g\",\"contentUrl\":\"https:\/\/secure.gravatar.com\/avatar\/c9ffce4f6798f570d1cf6a2cb93fdc64123c9ea09b5c199fd12f25ed9a8a0a82?s=96&d=mm&r=g\",\"caption\":\"afrazsanat\"},\"url\":\"https:\/\/afraz-sanat.com\/index.php\/author\/afrazsanat\/\"}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"Debugging MS Outlook 2010 VB script used in a rule - Afraz-sanat Zonouz","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/","og_locale":"en_US","og_type":"article","og_title":"Debugging MS Outlook 2010 VB script used in a rule - Afraz-sanat Zonouz","og_description":"I wanted to run a VB script in MS-Outlook 2010, in a rule applied to every incoming messages, but I was\u00a0not sure what was the cause of the issue preventing it to run as I expected. It meant to find e-mails that\u00a0contain a desired word in its body, but in various upper\/lower letter combination, e.g. … Continue reading \"Debugging MS Outlook 2010 VB script used in a rule\"","og_url":"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/","og_site_name":"Afraz-sanat Zonouz","article_published_time":"2017-07-19T18:46:24+00:00","author":"afrazsanat","twitter_card":"summary_large_image","twitter_misc":{"Written by":"afrazsanat","Est. reading time":"2 minutes"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/","url":"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/","name":"Debugging MS Outlook 2010 VB script used in a rule - Afraz-sanat Zonouz","isPartOf":{"@id":"https:\/\/afraz-sanat.com\/#website"},"datePublished":"2017-07-19T18:46:24+00:00","author":{"@id":"https:\/\/afraz-sanat.com\/#\/schema\/person\/b9034d80592ca319227aafd344f9db69"},"breadcrumb":{"@id":"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/#breadcrumb"},"inLanguage":"en-US","potentialAction":[{"@type":"ReadAction","target":["https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/afraz-sanat.com\/index.php\/2017\/07\/19\/debugging-ms-outlook-2010-vb-script-used-in-a-rule\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/afraz-sanat.com\/"},{"@type":"ListItem","position":2,"name":"Debugging MS Outlook 2010 VB script used in a rule"}]},{"@type":"WebSite","@id":"https:\/\/afraz-sanat.com\/#website","url":"https:\/\/afraz-sanat.com\/","name":"Afraz-sanat Zonouz","description":"Office and industrial Automation","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/afraz-sanat.com\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"en-US"},{"@type":"Person","@id":"https:\/\/afraz-sanat.com\/#\/schema\/person\/b9034d80592ca319227aafd344f9db69","name":"afrazsanat","image":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/afraz-sanat.com\/#\/schema\/person\/image\/","url":"https:\/\/secure.gravatar.com\/avatar\/c9ffce4f6798f570d1cf6a2cb93fdc64123c9ea09b5c199fd12f25ed9a8a0a82?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/c9ffce4f6798f570d1cf6a2cb93fdc64123c9ea09b5c199fd12f25ed9a8a0a82?s=96&d=mm&r=g","caption":"afrazsanat"},"url":"https:\/\/afraz-sanat.com\/index.php\/author\/afrazsanat\/"}]}},"_links":{"self":[{"href":"https:\/\/afraz-sanat.com\/index.php\/wp-json\/wp\/v2\/posts\/55","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/afraz-sanat.com\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/afraz-sanat.com\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/afraz-sanat.com\/index.php\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/afraz-sanat.com\/index.php\/wp-json\/wp\/v2\/comments?post=55"}],"version-history":[{"count":1,"href":"https:\/\/afraz-sanat.com\/index.php\/wp-json\/wp\/v2\/posts\/55\/revisions"}],"predecessor-version":[{"id":87,"href":"https:\/\/afraz-sanat.com\/index.php\/wp-json\/wp\/v2\/posts\/55\/revisions\/87"}],"wp:attachment":[{"href":"https:\/\/afraz-sanat.com\/index.php\/wp-json\/wp\/v2\/media?parent=55"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/afraz-sanat.com\/index.php\/wp-json\/wp\/v2\/categories?post=55"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/afraz-sanat.com\/index.php\/wp-json\/wp\/v2\/tags?post=55"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}