<% REM to be included in smmnu.asp, if browser is IE %>
<% if (pg = "smser") then %>
<% num = 1 %>
<% elseif (pg = "smses") then %>
<% num = 2 %>
<% elseif (pg = "smdir") then %>
<% num = 3 %>
<% elseif (pg = "smdom") then %>
<% num = 4 %>
<% elseif (pg = "smmes") then %>
<% num = 5 %>
<% elseif (pg = "smdel") then %>
<% num = 6 %>
<% elseif (pg = "smbox") then %>
<% num = 7 %>
<% elseif (pg = "smsec") then %>
<% num = 8 %>
<% elseif (pg = "smvs") then %>
<% num = 9 %>
<% end if %>