Fundamentals

<p><script language="VBScript"><!--
Option Explicit

Function LongDate(Today)

Dim MonthsNames(12)

MonthsNames(0) = "January"
MonthsNames(1) = "February"
MonthsNames(2) = "March"
MonthsNames(3) = "April"
MonthsNames(4) = "May"
MonthsNames(5) = "June"
MonthsNames(6) = "July"
MonthsNames(7) = "August"
MonthsNames(8) = "September"
MonthsNames(9) = "October"
MonthsNames(10) = "November"
MonthsNames(11) = "December"

Dim DayNames(7)

DayNames(0) = "Sunday"
DayNames(1) = "Monday"
DayNames(2) = "Tuesday"
DayNames(3) = "Wednesday"
DayNames(4) = "Thursday"
DayNames(5) = "Friday"
DayNames(6) = "Saturday"
Dim MonthID, DayID

MonthID = MonthsNames(month(Today)-1)
DayID = DayNames(weekday(Today)-1)

LongDate = (DayID &","&MonthID&" "&day(Today)&", "&year(Today))

End Function

Dim clock, greetings(3), X

greetings(0)= "Good Morning!"
greetings(1)= "Good Afternoon!"
greetings(2)= "Good Evening!"

clock = (Hour(now))

If clock >=18 then
X= "2"
ElseIf clock >=12 then
X= "1"
Else X = "0"
End if

Dim msg, temp
msg = (greetings(X) & Chr(13) & "This is a fictitious web site created by the students of "_
& Chr(10) & "the Information Technology Institute in Halifax, N.S."_
& chr(13) & chr(13) & "Today is" & LongDate(now()) & ".")

temp = msgbox(msg, 0, "DigiMagic")



--></script> </p>

<script language="JavaScript"><!--
<!-- Script for browser detection -->


//set up some variables and get ua (user agent) info.
//This is just defining the variables
var browser = "unknown"
var version = 0
var detected = false
var ua = window.navigator.userAgent

//The variable ua accesses the userAgent property of the navigator object to get
//information about the current web browser. That information is stored as a string
//that looks like this in IE4:
//Mozilla/4.0(compatible; MSIE4.0: Windows 95)
//And netscape Navigator 4 would provide information that looks like:

//Mozilla/4.0 [en](Win95;I)


//Are we in Microsoft Internet Explorer or Netscape Navigator?
if (ua.substring(0,7) == "Mozilla"){
if (ua.indexOf("MSIE") > 0){
browser = "Microsoft"
}
else {
browser = "Netscape"
}


//The first if statement determines whether the first 7 characters of the ua string are Mozilla
//If it is the next if statement checks to see whether the string contains MSIE. If so the
//browser is IE, if not the browser is Netscape.


//Now check the browser version number.
if (ua.indexOf("4.")>0){
version = 4
}
if (ua.indexOf("3.")>0){
version = 3
}
}

//The 2 if statements above determines the version. If the ua string contains 4 the version
//number must be 4. If the ua string contains a 3 the browser version must be a 3 something
//If neither of those cases are true, the version variable hasn't changed and still contains
//the original value of zero.


//At this point, we know if we have Navigator or Internet Explorer 3 or 4,
//or some other browser. Show a message informing them of what browser
//the site is best seen in.

//If Microsoft Internet Explorer 4 is in use
if (browser == "Microsoft" && version == 4){
detected = true
alert ("Our site is best viewed using Microsoft Internet Explorer 4.0, which is what you are currently using")
}

//If Microsoft Internet Explorer 3 is in use
if (browser == "Microsoft" && version == 3){
detected = true
alert ("Our site is best viewed using Microsoft Internet Explorer 3.0. You are currently using version 3.0. It is possible to download IE4.0 from www.microsoft.com")
}

//If Netscape Navigator 4 is in use
if (browser == "Netscape" && version == 4){
detected = true
alert ("Our site is best viewed using Microsoft Internet Explorer 4.0. You are currently using Netscape Navigator 3.0. It is possible to download IE4.0 from www.microsoft.com")

}


//If Netscape Navigator 3 is in use
if (browser == "Netscape" && version == 3){
detected = true
alert ("Our site is best viewed using Microsoft Internet Explorer 4.0. You are currently using Netscape Navigator 3.0. It is possible to download IE4.0 from www.microsoft.com")

}


//If still not detected, some other browser is in use
if (detected == false){
detected = true
alert ("Our site is best viewed using Microsoft Internet Explorer 4.0. You are currently using a browser that we are unable to define. It is possible to download IE4.0 from www.microsoft.com")

}

//So basically, we took the statements that were obtained in the beginning of the script
//and told the user that the site is best viewed using IE4 and they could download IE4