document.writeln("<%
temp=""
strSQL="select var_value from lebanondivers_vars where var_name='counter'"
set objRS=objConn.execute(strSQL)
if not objRS.eof then
temp1="0000000"& objRS("var_value")
for i=0 to 6
l= mid (temp1,len(temp1)-i,1)
select case l
case "1", "2", "3", "4", "5", "6", "7", "8", "9"
temp="![](images/" & l & ".gif)
"&temp
case else
temp="
"&temp
end select
next
echo temp
strSQL="update lebanondivers_vars set var_value=var_value+1 where var_name='counter'"
objConn.execute(strSQL)
end if
%>");