<% Public Function Clean(s) Clean = Trim(Replace(s, "'", "''")) End Function Public Function IsChecked( val1, val2 ) IsChecked = "" If val1 = val2 Then IsChecked = "checked" End If End Function Public Function IsSelected( val1, val2 ) IsSelected = "" If val1 = val2 Then IsSelected = "selected" End If End Function Function Nz(value,defaultValue) If VarType(value) > 1 Then Nz = value Else Nz = defaultValue End If End Function LastPage = Request.ServerVariables("HTTP_REFERER") function how_many(str, char) Dim char_count Length = Len(str) count = 1 Do while count <= Length character = Mid(str,count, 1) 'Read one character from the string at position count If character = char Then char_count = char_count + 1 End If count = count + 1 Loop how_many = char_count end function Sub mail_pirate(regarding, messagetext) Dim MailTo_Array() Dim Send_To_Array If Application("AllowEmails") = 0 Then Default_SendTo = Session("DefaultEmail") 'Write to the default table for recordkeeping and no emails Screen = Request.ServerVariables("PATH_TRANSLATED") Person = Session("admin_name") When = Date What = regarding Set DataConn = Server.CreateObject("ADODB.Connection") DataConn.ConnectionTimeout = Application("DataConn_ConnectionTimeout") DataConn.CommandTimeout = Application("DataConn_CommandTimeout") DataConn.Open Application("DataConn_ConnectionString"), Application("DataConn_RuntimeUserName"), Application("DataConn_RuntimePassword") Set cmdTemp = Server.CreateObject("ADODB.Command") Set objRst = Server.CreateObject("ADODB.Recordset") sql = "INSERT INTO AuditTrail Values('" & Person & "','" & When & "','" & What & "','" & Screen & "')" cmdTemp.CommandText = sql cmdTemp.CommandType = 1 Set cmdTemp.ActiveConnection = DataConn objRst.Open cmdTemp, , 0, 1 Else temp_SendTo = Application("NotifyAddr") 'The Senders List occurence_count = how_many(temp_SendTo, ";") + 1 'How many ;'s are in this string of emails arraySize = occurence_count ReDim MailTo_Array(arraySize) count = 0 Do While count <= arraySize occurence_index = InStr(temp_SendTo, ";") 'The position of the first ; if occurence_index = 0 then MailTo_Array(count) = temp_SendTo exit do end if amount_to_read = occurence_index - 1 Send_To_Array = Left(temp_SendTo, amount_to_read) 'read that many characters excluding the ; into the array MailTo_Array(count) = Send_To_Array occurence_index = occurence_index + 1 temp_SendTo = Mid(temp_SendTo,occurence_index) count = count + 1 Loop count = 0 Do While count < UBound(MailTo_Array) Set Mail = Server.createobject("Persits.MailSender") Mail.Host = Session("MailHost") Mail.UserName = Session("MailUser") Mail.Password = Session("MailPass") Mail.Subject = regarding Mail.From = "sirokid1@laroche.edu" Mail.Body = messagetext Mail.AddAddress MailTo_Array(count) Mail.Send count = count + 1 Loop Default_SendTo = Session("DefaultEmail") 'Write to the default table for recordkeeping and no emails Screen = Request.ServerVariables("PATH_TRANSLATED") Person = Session("admin_name") When = Date What = regarding Set DataConn = Server.CreateObject("ADODB.Connection") DataConn.ConnectionTimeout = Application("DataConn_ConnectionTimeout") DataConn.CommandTimeout = Application("DataConn_CommandTimeout") DataConn.Open Application("DataConn_ConnectionString"), Application("DataConn_RuntimeUserName"), Application("DataConn_RuntimePassword") Set cmdTemp = Server.CreateObject("ADODB.Command") Set objRst = Server.CreateObject("ADODB.Recordset") sql = "INSERT INTO AuditTrail Values('" & Person & "','" & When & "','" & What & "','" & Screen & "')" cmdTemp.CommandText = sql cmdTemp.CommandType = 1 Set cmdTemp.ActiveConnection = DataConn objRst.Open cmdTemp, , 0, 1 End If End Sub %>
School of Graduate Studies Banner LRC Search Events News & Features LRC Site Map

Index:
HRM Department Home Page  |  Faculty Members  |  Program Detail   |  Course Rotation  |  Suggested Electives  | Certificate Programs |  HRM Program @ LRC Cranberry Woods  |   Informational Materials/Downloads

Organizations fail or succeed on the talents of their employees. For employees to be successful, they need managers that can foster quality, enhance performance, build teams, offer training, and recruit and retain talented individuals. La Roche College’s graduate degree program in Human Resources Management (HRM) provides you with the tools necessary to manage a workforce. Our program is one of the few comprehensive human resource management programs in Pennsylvania. The HRM program will allow you to develop coaching skills and learn business principles and management techniques that you can put to use immediately to enhance your career and your competitiveness.

The La Roche Approach

At La Roche, you’ll enjoy small class sizes and personal attention from our faculty. Choose from three areas of study: Human Resources Administration, Training/Organizational Development and Strategic Management and Leadership. Your classes will provide you with valuable experience in research, planning, decision-making, group facilitation and group decision-making skills. We also offer specialized certification programs in Managing Information Technology and Change, Contemporary Concepts and Financial Aspects.

Worried about time? We make it easy to pursue a graduate degree by offering evening classes for working professionals. Our accessible faculty will know you by name and work with you to maximize your educational experience. You can also take advantage of our resume referral service available to all HRM students and alumni.

What Can I Do With My Degree?

La Roche’s HRM graduate program prepares students for human
resource management careers with a wide variety of companies,
including:

• PNC Bank
• Deloitte & Touche
• Mellon Bank
• P.J. Dick Corporation
• Price Waterhouse
• General Motors
• PPG Industries
• Fisher Scientific
• UPMC
• Hewlett Packard
• Federated Investors

Note: The Graduate Program in Human Resource Management is separate from La Roche College's undergraduate business programs and is not a part of its ACBSP accreditation.

Tell Me More!

If you would like more information about the human resources management graduate program, please contact the Office of Graduate Studies & Adult Education  at 412-536-1262 or email us at graduateadmissions@laroche.edu.

CLICK HERE to download a HRM Informational Brochure.

 
Top of Page
Footer