Subversion Repositories DevTools

Rev

Rev 5245 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5245 Rev 5357
Line 189... Line 189...
189
        Attachment = Server.MapPath("images\img_reports_admin.jpg")
189
        Attachment = Server.MapPath("images\img_reports_admin.jpg")
190
        Message = Message & " This message should have an attachment"
190
        Message = Message & " This message should have an attachment"
191
   End If
191
   End If
192
 
192
 
193
    Call Send_Email ( "Release Manager Notification", _
193
    Call Send_Email ( "Release Manager Notification", _
194
                       adminEmail, _
194
                       ADMIN_EMAIL, _
195
                       objAccessControl.UserEmail, _
195
                       objAccessControl.UserEmail, _
196
                       "Test Email", _
196
                       "Test Email", _
197
                       Message, _
197
                       Message, _
198
                       Attachment )
198
                       Attachment )
199
    result = Err.Number
199
    result = Err.Number