Hola systems,
pues eso te está pasando porque estás llamando a la sub directamente, con lo que introduce directamente los datos en la bd
<input name="RegistroFinal" type="button" class="NegritaNegra12" id="RegistroFinal" value="Crear Registro"
onClick="<% CrearRegistro %>" >
Lo que puse en negritas no le llega al navegador, cuando llega yá se ha ejecutado la sub-función.
prueba a hacerlo así
<form method="post" action="estamismapagina.asp">
<input type="hidden" name="nick" value="<%=request.form("nick")%>" />
<input type="hidden" name="pass1" value="<%=request.form("pass1")%>" />
<input type="hidden" name="e-mail" value="<%=request.form("e-mail")%>" />
<input type="hidden" name="insertar" value="insertar" />
<input name="RegistroFinal" type="submit" class="NegritaNegra12" id="RegistroFinal" value="Crear Registro" />
</form>
la funcion en ASP :
sub CrearRegistro
RS.AddNew
RS("NICK") = Request.Form("NICK")
RS("PASSWORD") = Request.Form("PASS1")
RS("EMAIL") = Request.Form("E-MAIL")
RS.Update
response.Redirect("confirma_registro.asp")
end sub
if request.form("insertar") <> "" then
CrearRegistro
end if
No lo he probado pero creo que habría de funcionar correcto...