Severity: 8192
Message: Creation of dynamic property CI_URI::$config is deprecated
Filename: core/URI.php
Line Number: 101
Backtrace:
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Router::$uri is deprecated
Filename: core/Router.php
Line Number: 126
Backtrace:
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$benchmark is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$hooks is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$config is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$log is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$utf8 is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$uri is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$exceptions is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$router is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$output is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$security is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$input is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$lang is deprecated
Filename: core/Controller.php
Line Number: 75
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$load is deprecated
Filename: core/Controller.php
Line Number: 78
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$form_validation is deprecated
Filename: core/Loader.php
Line Number: 1245
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$email is deprecated
Filename: core/Loader.php
Line Number: 1245
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 25
Function: __construct
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_DB_mysqli_driver::$failover is deprecated
Filename: database/DB_driver.php
Line Number: 371
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 35
Function: database
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property Source::$visitor_model is deprecated
Filename: core/Loader.php
Line Number: 323
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 36
Function: model
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$section is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$data is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$db is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$benchmark is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$hooks is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$config is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$log is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$utf8 is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$uri is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$exceptions is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$router is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$output is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$security is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$input is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$lang is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$load is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$form_validation is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$email is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Severity: 8192
Message: Creation of dynamic property CI_Loader::$visitor_model is deprecated
Filename: core/Loader.php
Line Number: 888
Backtrace:
File: /home1/geiertec/public_html/application/controllers/Source.php
Line: 45
Function: view
File: /home1/geiertec/public_html/index.php
Line: 295
Function: require_once
Public blnOutlookOpen As Boolean
Sub EmailUsers()
'------------------------------------------------------------------------------------------------------------------------
' Creates an email from a template, replacing XML tags with information from spreadsheet
' Written by Jonathan Geier, ideas taken from original.
'------------------------------------------------------------------------------------------------------------------------
Dim olApp As Outlook.Application
Dim olTemplate As Outlook.MailItem
Dim strEmailAddress As String
Dim strName As String
Dim strSplitNames() As String
Dim strTicket As String
Dim strSolution As String
Dim strRawDate As String
Dim strFormattedDate As String
Dim intEndRow As Integer
Dim intCurrentRow As Integer
Dim strPrintCurRow As String
'Error managing, in case outlook isn't open
Application.DisplayAlerts = False
On Error GoTo OutlookNotOpen
blnOutlookOpen = False
AppActivate "Microsoft Outlook"
AppActivate "Microsoft Excel"
On Error GoTo 0
blnOutlookOpen = True
OutlookNotOpen:
If Not blnOutlookOpen Then
Call OpenOutlook
End If
'If an error, wait longer, then try again.
On Error GoTo Delay
Set olApp = CreateObject("Outlook.Application")
Sheets("Welcome").Select 'select "Welcome" sheet
Main.LastRow intEndRow, "C" 'find last row
Range("A12").Select 'select "A12" range
Do While (intCurrentRow < intEndRow) 'start "do while" loop
strPrintCurRow = Cells(5, 4).Value
intCurrentRow = Left(strPrintCurRow, InStr(1, strPrintCurRow, "/") - 1) + 11 'initiate current row
strEmailAddress = Cells(intCurrentRow, 3).Value 'copy row value for user email into variable
strRawDate = Cells(intCurrentRow, 4).Value 'get timestamp from spreadsheet
strFormattedDate = Left(strRawDate, InStr(1, strRawDate, " ")) & "at" & Mid(strRawDate, InStr(1, strRawDate, " ")) '...date
strSolution = Cells(intCurrentRow, 7).Value '...solution
strTicket = Cells(intCurrentRow, 8).Value '...ticket
strTicket = Replace(strTicket, "INC000000", "") 'remove the "INC000000" from the the ticket number, cuz it's purtier that way
Cells(5, 4).Value = intCurrentRow - 10 & "/" & intEndRow - 11 'write the current user number to the Welcome page
Set olTemplate = Outlook.CreateItemFromTemplate("T:\template\Outlook\Stationery\BOX TSC\Survey Generator Template.oft") 'create a new instance of the template
olTemplate.Display 'open template instance
Call DeleteSignatureBlock(olTemplate) 'remove signature block
olTemplate.To = Replace(olTemplate.To, "", strEmailAddress) 'insert email address of user into "To" field
SendKeys "%k", True 'use SendKeys to force an ALT+K (hotkey for "Check Names")
GrabFullName:
strName = olTemplate.To 'copy name in "To" field into a variable
Do While strName = strEmailAddress 'if the email address variable is the same as the value just gotten from the "To" field after a "Check Names"...
Application.Wait (Now + TimeValue("0:00:01")) '...wait 1 second...
GoTo GrabFullName '...and do it again
Loop
strSplitNames() = Split(strName, " ") 'split variable into separated names, store separated names in array
olTemplate.SentOnBehalfOfName = "boxtsc@thrivent.com" 'change sender of email to "BOX TSC"
olTemplate.HTMLBody = Replace(olTemplate.HTMLBody, "<name>", strSplitNames(0)) 'replace tag in body with first element of names array
olTemplate.HTMLBody = Replace(olTemplate.HTMLBody, "<solution>", strSolution) 'replace tag in body with solution from spreadsheet row
olTemplate.HTMLBody = Replace(olTemplate.HTMLBody, "<ticket>", strTicket) 'replace tag in body with solution from spreadsheet row
olTemplate.HTMLBody = Replace(olTemplate.HTMLBody, "<date>", strFormattedDate) 'replace tag in body with solution from spreadsheet row
'olTemplate.SEND 'send the email
'Set olTemplate = Nothing 'set the instance of the template object to NOTHING, so that you may refill it with a new instance of a blank template from the T: drive
Loop 'loop while the condition is true
AppActivate "Microsoft Excel", True 'bring focus back to excel
Range("A12").Select
Cells(5, 4).Value = intCurrentRow - 11 & "/" & intEndRow - 11
Application.DisplayAlerts = True
ProcessComplete.Show 'Shows the process complete window.
Delay:
Application.Wait (Now + TimeValue("0:00:01"))
Resume
End Sub
Sub IsOutlookOpen()
' Checks if Outlook is open
'-----------------------------------------------------------------------------------
On Error GoTo OutlookNotRunning
AppActivate ("Outlook")
blnOutlookOpen = True
Exit Sub
OutlookNotRunning
blnOutlookOpen = False
Call OpenOutlook
End Sub
Sub OpenOutlook()
' Opens Outlook.
'-----------------------------------------------------------------------------------
Dim objOutlook As Object
Dim objNameSpace As Object
Dim objInbox As Object
Set objOutlook = CreateObject("Outlook.Application")
Set objNameSpace = objOutlook.GetNamespace("MAPI")
Set objInbox = objNameSpace.Folders(1)
objInbox.Display
blnOutlookOpen = True
End Sub
Sub DeleteSignatureBlock(Email As Outlook.MailItem)
' Deletes signature block from email template
' Written by Jonathan Geier
'-----------------------------------------------------------------------------------
Dim objDoc As Word.DOCUMENT
Dim objBookmark As Word.Bookmark
On Error Resume Next
Set objDoc = Email.GetInspector.WordEditor
Set objBookmark = objDoc.Bookmarks("_MailAutoSig")
If Not objBookmark Is Nothing Then
objBookmark.Select
objDoc.Windows(1).Selection.Delete
End If
Set objDoc = Nothing
Set objBookmark = Nothing
End Sub