System
& Network Status: <%
dim fs, file
set fs = CreateObject("Scripting.FileSystemObject")
set file = fs.OpenTextFile(path, ForReading)
do while not file.AtEndOfStream
Response.Write(file.ReadLine & vbCrLf)
loop
file.Close()
%> <%
dim fs1, file1
set fs1 = CreateObject("Scripting.FileSystemObject")
set file1 = fs1.OpenTextFile(path1, ForReading)
do while not file1.AtEndOfStream
Response.Write(file1.ReadLine & vbCrLf)
loop
file1.Close()
%> <%
dim fs2, file2,fileother
set fs2 = CreateObject("Scripting.FileSystemObject")
set file2 = fs2.OpenTextFile(path2, ForReading)
set fileother = fs2.GetFile(pathother)
If fileother.Size > 3 Then
do while not file2.AtEndOfStream
Response.Write(file2.ReadLine & vbCrLf)
loop
end if
file2.Close()
%>
2003 Dickie Award Winners
December Sean Chang and Richard Mou in BFA have always helped us with our CashNet needs; but when TitanCard recently took on new projects he went above and beyond the call of duty. Sean is always friendly and prompt no matter how many times we asked for something.
June May Wong - for her exceptional efforts, guidance and patience with the leave accounting system implementation in IT.
May
Awarded to
Sally Adams and Cyndie Mayo for work with Telephone Services to assist with coordination of training classes
May Janice Young of Accounts Payable for assisting with invoice payment information. She is always willing to help and does so in a friendly and cooperative way.
