<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Send very simple E-Mail using macro ?! in QlikView</title>
    <link>https://community.qlik.com/t5/QlikView/Send-very-simple-E-Mail-using-macro/m-p/238046#M89027</link>
    <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi Ivan.&lt;/P&gt;&lt;P&gt;&lt;SPAN id="result_box" lang="en"&gt;&lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;Here&lt;/SPAN&gt;&lt;SPAN title="Haz clic para obtener otras posibles traducciones"&gt;'s an example&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;to send an&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;email&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;through&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;a&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;macro&lt;/SPAN&gt;&lt;SPAN title="Haz clic para obtener otras posibles traducciones"&gt;.&lt;/SPAN&gt;&lt;BR /&gt;&lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;I hope&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;to help you.&lt;/SPAN&gt;&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;function SendMessage()&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set objMessage = CreateObject("CDO.Message") &lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Subject = "Mensaje de QlikView"&lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.From = """My Name"" &amp;lt;&lt;/SPAN&gt;&lt;A class="jive-link-email-small" href="mailto:my@dir.xxx.xx"&gt;my@dir.xxx.xx&lt;/A&gt;&lt;SPAN&gt;&amp;gt;" &lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; strMailTo = "&lt;/SPAN&gt;&lt;A class="jive-link-email-small" href="mailto:my@dir.xxx.xx"&gt;my@dir.xxx.xx&lt;/A&gt;&lt;SPAN&gt;;"&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; strMailTo = left(strMailTo,len(strMailTo)-1) ' remove the last ; in list&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.To = strMailTo&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.TextBody = "Qlik Recargado" &amp;amp; vbCRLF &amp;amp; vbCRLF&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Configuration.Fields.Item("&lt;/SPAN&gt;&lt;A class="jive-link-external-small" href="http://schemas.microsoft.com/cdo/configuration/sendusing"&gt;http://schemas.microsoft.com/cdo/configuration/sendusing&lt;/A&gt;&lt;SPAN&gt;") = 2 &lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Configuration.Fields.Item("&lt;/SPAN&gt;&lt;A class="jive-link-external-small" href="http://schemas.microsoft.com/cdo/configuration/smtpserver"&gt;http://schemas.microsoft.com/cdo/configuration/smtpserver&lt;/A&gt;&lt;SPAN&gt;") = "xxx.xx.x.x"&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Configuration.Fields.Item("&lt;/SPAN&gt;&lt;A class="jive-link-external-small" href="http://schemas.microsoft.com/cdo/configuration/smtpserverport"&gt;http://schemas.microsoft.com/cdo/configuration/smtpserverport&lt;/A&gt;&lt;SPAN&gt;") = 25&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Configuration.Fields.Item("&lt;/SPAN&gt;&lt;A class="jive-link-external-small" href="http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout"&gt;http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout&lt;/A&gt;&lt;SPAN&gt;") = 60&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Configuration.Fields.Update&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Send&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;/P&gt;&lt;P&gt;end function&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;smtpserver = &lt;SPAN class="short_text" id="result_box" lang="en"&gt;&lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;is&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;the&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;outgoing mail server&lt;/SPAN&gt;&lt;SPAN title="Haz clic para obtener otras posibles traducciones"&gt;.&lt;/SPAN&gt;&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&lt;SPAN class="short_text" lang="en"&gt;&lt;SPAN title="Haz clic para obtener otras posibles traducciones"&gt;In the scripts:&lt;/SPAN&gt;&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;if nCorreo=1 then&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; let dummy=SendMessage();&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; let nCorreo = 0;&lt;/P&gt;&lt;P&gt;end if&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
    <pubDate>Mon, 09 May 2011 15:17:00 GMT</pubDate>
    <dc:creator>spividori</dc:creator>
    <dc:date>2011-05-09T15:17:00Z</dc:date>
    <item>
      <title>Send very simple E-Mail using macro ?!</title>
      <link>https://community.qlik.com/t5/QlikView/Send-very-simple-E-Mail-using-macro/m-p/238045#M89026</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi all,&lt;/P&gt;&lt;P&gt;How to make a vb macro to send mail! Want to send it automatically on open the document without prompting the user.&lt;/P&gt;&lt;P&gt;, want the subject of the mail be only one variable!&lt;/P&gt;&lt;P&gt;Do you have any examples of simple vb macros? I've just checked some macros for that but I do not understand VB very well ...&lt;/P&gt;&lt;P&gt;Many thanks in advance!&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Mon, 02 May 2011 20:58:30 GMT</pubDate>
      <guid>https://community.qlik.com/t5/QlikView/Send-very-simple-E-Mail-using-macro/m-p/238045#M89026</guid>
      <dc:creator>ivan_will</dc:creator>
      <dc:date>2011-05-02T20:58:30Z</dc:date>
    </item>
    <item>
      <title>Send very simple E-Mail using macro ?!</title>
      <link>https://community.qlik.com/t5/QlikView/Send-very-simple-E-Mail-using-macro/m-p/238046#M89027</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi Ivan.&lt;/P&gt;&lt;P&gt;&lt;SPAN id="result_box" lang="en"&gt;&lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;Here&lt;/SPAN&gt;&lt;SPAN title="Haz clic para obtener otras posibles traducciones"&gt;'s an example&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;to send an&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;email&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;through&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;a&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;macro&lt;/SPAN&gt;&lt;SPAN title="Haz clic para obtener otras posibles traducciones"&gt;.&lt;/SPAN&gt;&lt;BR /&gt;&lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;I hope&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;to help you.&lt;/SPAN&gt;&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;function SendMessage()&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set objMessage = CreateObject("CDO.Message") &lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Subject = "Mensaje de QlikView"&lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.From = """My Name"" &amp;lt;&lt;/SPAN&gt;&lt;A class="jive-link-email-small" href="mailto:my@dir.xxx.xx"&gt;my@dir.xxx.xx&lt;/A&gt;&lt;SPAN&gt;&amp;gt;" &lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; strMailTo = "&lt;/SPAN&gt;&lt;A class="jive-link-email-small" href="mailto:my@dir.xxx.xx"&gt;my@dir.xxx.xx&lt;/A&gt;&lt;SPAN&gt;;"&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; strMailTo = left(strMailTo,len(strMailTo)-1) ' remove the last ; in list&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.To = strMailTo&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.TextBody = "Qlik Recargado" &amp;amp; vbCRLF &amp;amp; vbCRLF&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Configuration.Fields.Item("&lt;/SPAN&gt;&lt;A class="jive-link-external-small" href="http://schemas.microsoft.com/cdo/configuration/sendusing"&gt;http://schemas.microsoft.com/cdo/configuration/sendusing&lt;/A&gt;&lt;SPAN&gt;") = 2 &lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Configuration.Fields.Item("&lt;/SPAN&gt;&lt;A class="jive-link-external-small" href="http://schemas.microsoft.com/cdo/configuration/smtpserver"&gt;http://schemas.microsoft.com/cdo/configuration/smtpserver&lt;/A&gt;&lt;SPAN&gt;") = "xxx.xx.x.x"&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Configuration.Fields.Item("&lt;/SPAN&gt;&lt;A class="jive-link-external-small" href="http://schemas.microsoft.com/cdo/configuration/smtpserverport"&gt;http://schemas.microsoft.com/cdo/configuration/smtpserverport&lt;/A&gt;&lt;SPAN&gt;") = 25&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&lt;SPAN&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Configuration.Fields.Item("&lt;/SPAN&gt;&lt;A class="jive-link-external-small" href="http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout"&gt;http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout&lt;/A&gt;&lt;SPAN&gt;") = 60&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Configuration.Fields.Update&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; objMessage.Send&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &lt;/P&gt;&lt;P&gt;end function&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;smtpserver = &lt;SPAN class="short_text" id="result_box" lang="en"&gt;&lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;is&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;the&lt;/SPAN&gt; &lt;SPAN class="hps" title="Haz clic para obtener otras posibles traducciones"&gt;outgoing mail server&lt;/SPAN&gt;&lt;SPAN title="Haz clic para obtener otras posibles traducciones"&gt;.&lt;/SPAN&gt;&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;&lt;SPAN class="short_text" lang="en"&gt;&lt;SPAN title="Haz clic para obtener otras posibles traducciones"&gt;In the scripts:&lt;/SPAN&gt;&lt;/SPAN&gt;&lt;/P&gt;&lt;P&gt;if nCorreo=1 then&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; let dummy=SendMessage();&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; let nCorreo = 0;&lt;/P&gt;&lt;P&gt;end if&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Mon, 09 May 2011 15:17:00 GMT</pubDate>
      <guid>https://community.qlik.com/t5/QlikView/Send-very-simple-E-Mail-using-macro/m-p/238046#M89027</guid>
      <dc:creator>spividori</dc:creator>
      <dc:date>2011-05-09T15:17:00Z</dc:date>
    </item>
  </channel>
</rss>

