<HTML>
<HEAD>
<TITLE>.::Trabalhando com Checkbox ::.</TITLE>
<META NAME="Generator" CONTENT="EditPlus">
<META NAME="Author" CONTENT="Wellington Marinheiro">
</HEAD>
<BODY>
<html>
<body>
<%
dim fruta
cesta = Array("Jambo","Açaí","Melancia","Tamarino","Uva")
fruta=Request.Form("fruta")
response.write "<form action='trab_check.asp' method='post'>"
response.write "<p>Selecione a sua fruta preferida:</p>"
For x=0 To UBound(cesta)
response.write "<input type='checkbox' name='fruta'"
if fruta=cesta(x) then Response.Write("checked")
response.write "value=" & cesta(x) & ">" & cesta(x) & "<br>"
next
response.write "<BR><input type='submit' value='Enviar'>"
response.write "</form>"
if fruta<>"" then
Response.Write("<p>Sua seleção: " & fruta & "</p>")
end if
%>
</BODY>
</HTML>