
22/04/2005, 13:52
|
| | Fecha de Ingreso: abril-2005
Mensajes: 73
Antigüedad: 20 años, 1 mes Puntos: 0 | |
Problema con rut Hola amigos:
estoy haciendo una validacion de rut no me arroja ningun error pero quiero que me despliege el digito verificador y no me lo tira, tengo lo siguiente:
<%
Function codigo_veri(rut)
rut=request.Form("rut")
tur=strreverse(rut)
mult = 2
for i = 1 to len(tur)
if mult > 7 then mult = 2 end if
suma = mult * mid(tur,i,1) + suma
mult = mult +1
next
valor = 11 - (suma mod 11)
if valor = 11 then
codigo_veri = "0"
Response.Write(codigo_veri)
elseif valor = 10 then
codigo_veri = "k"
Response.Write(codigo_veri)
else
codigo_veri = valor
response.Write(valor)
end if
end function
%>
entonces quiero que el response.write me tire el digito verificador, pero me sale la pagina vacia sin ningun error.El rut lo lleno de un formulario que llama a la pagina.
Gracias!!!! |