%
Dim boardNImg, boardImg
if instr(lcase(selfpage),"/default.asp") > 0 then
boardNImg = "board_n.gif"
boardImg = "board.gif"
else
boardNImg = "board_sn.gif"
boardImg = "board_s.gif"
end if
Dim modifiedDir : modifiedDir = Application(dbName&"modifieddir")
%>
var appMPG = <%= Application(dbName&"mpg") %>
function showPicture(lastU,isLocked,hits,replies){
var checkDate = new Date("<%= memLastVisit %>")
var checkDate1= new Date(lastU)
var lastVisit=checkDate.getTime()
var lastUpdate=checkDate1.getTime()
if ((lastUpdate-lastVisit)>0) {
if (isLocked==1) {
document.write ("
")
}
else if (hits>=10*appMPG || replies>=appMPG){
document.write ("
")
}
else {
document.write ("
")
}
}
else {
if (isLocked==1) {
document.write ("
")
}
else if (hits>=10*appMPG || replies>=appMPG){
document.write ("
")
}
else {
document.write ("
")
}
}
}