<% ' The user information is displayed If Session("username") = "" Then Response.Redirect "../../Default.asp" End If %> <% Dim iAccessLevel Dim iPersonId Dim iParentId ' The first message in the thread Dim iMessageId ' The messageid of the message iAccessLevel = 4 ' 1 -> students + staff only ' 2 -> vol + staff only ' 3 -> staff only ' 4 -> stud + vol + staff only iPersonId = Session("personid") GetAllThreads iAccessLevel, iPersonId ' Retreivng the information from the database %> Cabrini Connections
<% Dim x , y If tRows > -1 Then For x = 0 to tRows If arrSortMsgs(colMsgLevel, x) = 0 Then ' Check the level of the message ' if the level of the message is zero, it is the \ ' first message in the thread iParentId = arrSortMsgs(colMsgId, x) ' This message is the parent message Else iLevel = arrSortMsgs(colMsgLevel, x) 'For indentation End If Response.Write "" & _ "" Next Else Response.Write "" & _ "" End If %>

SVHATS|  Student and Volunteer History & Tracking System
Home page  ->

How to Use SVHATS

(for Students)
SVHATS is the Cabrini Connections online reporting system. You and your volunteer are expected to log in to SVHATS each week and tell us what you did during tutoring.

Log In

You will receive a sheet with your SVHATS username and password on the first day of tutoring. To begin using SVHATS:

 

 

To Log a Session

  • Click on Entry or Exit in the Feedback menu
  • Type your comments
  • Click on Submit

 

 

 

Use SVHATS – Make Money – Win Prizes!

Every time you record an entry in SVHATS you will earn 10 points. You can also earn points for attendance, grades and other achievements. At the end of your senior year with Cabrini Connections, we will exchange your points in for CASH at the rate of 10 cents for every point earned. This means you earn $1 each time you log in to SVHATS!

In addition, each quarter, students that use SVHATS at least 85% of the time will be entered into a raffle for a portable flash drive to store your documents, music and pictures on.

 

Now you are ready to begin logging tutoring sessions in SVHATS.  Click here to get started.
 

 
 
 
" ' Indenting While iLevel > 0 Response.Write "    " iLevel = iLevel - 1 WEnd Response.Write "" & _ "" & " " If arrSortMsgs(colMsgLevel, x) = 0 Then Response.Write "" & arrSortMsgs(colSubject, x) & "" Else Response.Write arrSortMsgs(colSubject, x) End If Response.Write " (" & arrSortMsgs(colFname, x) & ") Date: " & _ arrSortMsgs(colPostedDate, x) & "" Response.write "
" Response.Write "There are no messages to display