<% 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 the Professions Banner LRC Search Events News & Features LRC Site Map
Menu Navigation
 The Professions - Home
Dean of the School
Faculty & Staff Directory
Latest News & Announcements
Department
Informational Brochures



Academic Programs:
  Business Programs:
Accounting
Finance
Information
Systems & Technology
-- CIS Program
-- IT Program
-- CS Program
Real Estate
Education
Facility Management
Graphic &
Communication Design
Interior Design
Nursing
Course Catalog Listing
of all The Professions Programs/Majors
School of Arts and Sciences Website
School og Graduate Studies Website
LRC Cranberry Woods Website


COURSE NUMBER

COURSE

Spr
2006

Sum
2006

Fall
2006

Spr
2007

Sum
2007

Fall
2007

IST 105

Practical Cpt Apps

X

X

X

X

X

X

IST 106

Adv Pract Apps

-

-

X

 

-

X

IST 121

Problem Solving

X

-

-

X

-

-

IST 125

Hardware

-

-

X

X

X

X

IST 205

IT: Global Perspectives

X

-

-

-

-

-

IST 208

Cyberspace

X

X

X

 

X

X

IST 221

MIS

-

X

X

X

-

X

IST 225

Cpt Based Training

-

-

-

X

-

X

IST 230

Networking

-

-

X

X

 

X

IST 245

DataBase Mgmt

-

X

X

-

X

X

IST 250

Distributed Data

X

-

-

-

-

-

IST 300

Ad Cpt Hardware

X

-

-

X

-

-

IST 305

Legal Issues & IT

X

-

-

-

X

-

IST 315

Human Cpt Interaction

-

-

X

-

-

X

IST 320

COBOL

-

-

-

X

X

X

IST 330

LINUX

-

X

X

X

 

X

IST 331

Adv. Networking

X

-

-

X

-

-

IST 334

JAVA Programming

X

-

X

X

-

X

IST 346

Adv. Database

X

-

-

-

-

-

IST 442

System Analysis

-

-

X

-

X

X

IST 445

Adv. Topics (Sr. Sem)

X

-

-

X

-

-

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

NOTES:

 

 

 

 

 

 

 

1

 

Offered once yearly

 

 

 

2

 

 

 

 

 

 

 

3

 

 

 

 

 

 

 

Top of Page
Footer
Apply to La Roche College Request Information Contact La Roche College