<%
'onload="javascript:autoSize()"
dim TAB1
dim TAB2
dim TAB3
dim IMG1
dim IMG2
dim saut2
saut2="
"
IMG1="'../images/platsault[2].gif'"
IMG1="'../Carte_Ariege_p.JPG'"
TAB1=""
'TAB2="
" & "
"
TAB3= "style=" & "position:" & "absolute" & ";" & "left=" & offsetX & ";" & "top=" & offsetY & ";" & ">" & ""
response.write TAB1 & TAB2 & TAB3
dim L1
dim T1
'for x=0 to 550 step 10
'L1=x
'T1=x/2
IMG2="'../Cartes/c5.gif'"
TAB2="![]()
" & ""
if drap =2 then
IMG2="'../Cartes/c51.gif'"
TAB2="![]()
" & ""
if drap =1 then
IMG2="'../Cartes/c5.gif'"
TAB2="![]()
" & ""
if Drap<>"5" then
if objRS("ITI").Value<>"5" then
IMG2="'../Cartes/maison.gif'"
TAB12="" & ""
TAB22="![&]()
" & "
"
response.write TAB12 & TAB22 & TAB32
end if
if objRS("ITI").Value="5" then
'IMG2="'../Cartes/cheval.GIF"
IMG2="'../Cartes/maison2.gif'"
TAB12="" & ""
TAB22="![&]()
" & "
"
response.write TAB12 & TAB22 & TAB32
end if
end if
objRS.Movenext
Loop
objRS.close
end if
objConn.close
'response.write "*************** " & Quest
'response.write saut2
%>