4 caracteres, mostrar 2 en forma aleatoria

[pcarvajal]

Tengo:
cadena="ABCD"

y en forma aleatoria (cada vez que refresco la pagina) debo mostrar solo 2 de los 4 caracteres y el resto rellenarlos con "*"

Por ejemplo:
A**D
AB**
**CD
etc.

[AlZuwaga]

Mmm.. se me ocurrió algo así, pero seguramente hay una manera menos rebuscada de hacerlo

Código:

<%
randomize
aleat1 = int(rnd*4)+1
aleat2 = 0
for i = 1 to 2
	tmp = int(rnd*4)+1
	if tmp = aleat1 then
		i = 1
	else
		aleat2 = tmp
		i = 2
	end if
next

cadena = "ABCD"
for j = 1 to 4
	if j = aleat1 or j = aleat2 then
		response.write "*"
	else
		response.write mid(cadena, j, 1)
	end if
next
%>

[pcarvajal]

menos rebuscada? pero si el codigo funciona perfecto!
o tu dices que podría optimizarse aún más???

en todo caso, muchas gracias Dazuaga/Zuwaga/Wazuga
(ehh, no se porqué.. pero cada año que pasa te veo un nombre distinto)

[AlZuwaga]

bueno, funcionar si funciona, pero exactamente me refería a que seguramente se pueda optimizar

Mi próximo nick será wazuncho