Você vai ter que usar 2 contadores no loop, um para linhas e outro para colunas ae é soh implementar no html

faça assim

<a href="teste.asp?d=1">teste</a>
<a href="teste.asp?d=2">teste</a>

<% 
d=request.querystring("d")
if d = 1 then 
%>

motra bloco 1

<% else %>

mostra bloco 2

<%end if%>

agora se tiver mais de 2 opções faz assim

<a href="teste.asp?d=1">teste</a>
<a href="teste.asp?d=2">teste</a>

<% 
d=request.querystring("d")
if d = 1 then 
%>

motra bloco 1

<% end if
if d = 2 then %>

mostra bloco 2

<%end if%>

Amigo o que você precisa é do

<%=Server.HtmlEncode(variavel)%>

se tiver pegando de um recordset ficaria mais ou menos assim

<%=rs(Server.HtmlEncode("nome_do_campo"))%>

abraço...

Amigos estou com um grande problema,
preciso fazer um sistema que com calcule quantos minutos existem entre 2 horas somando 20 me 20 minutos até ae tudo bem,

Entrada ="13:30"
				Saida = "18:00"
				total = DateDiff("s",Entrada,Saida)
				segundos = (total) Mod 60
				minutos = ((total - segundos) / 60) mod 60
				horas = int((total) / 3600)
				TempoCompleto = (horas & ":" & minutos  )
				totalminutos = (horas * 60 ) + minutos

agora tenho que colocar um radio nas horas possíveis entre os horários

<% Function HoraMinuto(Hora)
				   HoraMinuto = (Hour(Hora)*60) + Minute(Hora)
				   End Function
				   Function MinutoHora(Minutos)  
				   MinutoHora = (Minutos \ 60) & ":" & (Minutos Mod 60)
				   End Function  %>
		<% 	For i = 0 To (totalminutos / 20) -1 %>
			 	<input  type="radio" name="hora" value="">
			 	<%
			 	   horad = (4.5) - i*(0.33)
			 	   horas = CStr(horad)
			 	   n_horas = Mid(horas, 1, InStr(horas, ",") - 1)
				   n_minutos = Round(Left(Mid(horas, InStr(horas, ",") +1, Len(horas))*0.6,2))
		 	 	Hora1 = CStr(n_horas) & ":" &CStr(n_minutos) 
			 	Hora2 = "13:20"
				Soma = HoraMinuto(Hora1) + HoraMinuto(Hora2)
				Response.Write MinutoHora(Soma)
				%><br>
		<% next%>

tentei algo assim, mais estou perdido.. entenderam? alguém, pode me ajudar?

Amigo uma forma fácil é você resolver isso, é alterar o tipo de campo ao invés de " int(4) " para "varchar(4)", isso vai tranformar o campo em texto e em texto pode ter zero a esquerda, no Mysql tem uma opção "zerofill" que deixa os Zero a esquerda no Sql server não sei =S

Pessoal seguinte eu consegui, fica gravado para quem precisar

'inserindo no banco de dados

conexao.execute("INSERT INTO user (nome,nascimento,sexo,cpf,rg,endereco,cep,uf,email,nome_pai,nome_mae,obser,data_cadastro) VALUES ('"&nome&"','"&nascimento&"','"&sexo&"','"&cpf&"','"&rg&"','"&endereco&"','"&cep&"','"&uf&"','"&email&"','"&pai&"','"&mae&"','"&observacao&"',"&data&")")

'Pegando a ultima id cadastrada, nesse caso vai pegar a id da seção ou seja pode ter outra pessoa gravando ao mesmo tempo que não vai dar id trocada

set rs = conexao.execute("select id_user from user where id_user=LAST_INSERT_ID()")
id = rS("id_user")
set rs = nothing

'gerando numero ra e senha de acesso e cadastrando na tabela alunos (outra tabela)

ra = right(date,4)  & id 
senha = Replace(nascimento,"/", "")
conexao.execute("INSERT INTO aluno (id_user,ativo,RA,senha) VALUES ("&id&",1,"&ra&",'"&senha&"')")

^^

Preciso inserir em duas tabelas ao mesmo tempo sendo que a chave primaria de uma que vai ser autoincrement vai ser chave estrangeira em outra tabela exemplo
tabela user vou adicionar
(nome,idade) e ao mesmo tempo tem que adicionar na tabela
telefone (id_user,tipo,numero)
como fazer essa instrução em sql?