Mascarar String na tela

[Arlindo Vieira 0]

Boa noite senhores minha dúvida é o seguinte:

 

Tenho uma aplicação em asp que tem um formulário de cadastro de um aluno. No form todos os campos estão com as máscaras completas ex:

 

tel:( )xxxx-xxxx

cpf:xxx.xxx.xxx-xx

 

e etc...

 

uso Jquery para faze isso.

 

Antes de armazenar no banco eu retiro todos os caracteres especiais das variáveis e armazeno só os números no banco.

 

Meu Problema é o seguinte:

 

na hora da consulta eu queria criar uma mascára, para trazer todos os campos mascarados conforme input.

 

Desde já obrigado!

[Arlindo Vieira 0]

Private Function Numcpf(byVal number)

Dim tmp

number = CStr( number )

number = Trim( number )

 

Case 11

tmp = tmp & Mid( number, 1, 3 ) & "."

tmp = tmp & Mid( number, 4, 3 ) & "."

tmp = tmp & Mid( number, 7, 3 ) & "-"

tmp = tmp & Mid( number, 10, 11 )

 

Numcpf= tmp

End Function

 

response.write Numcpf(85805866234)

 

retorna o cpf show de bola mascarado, só que se eu colocar um 0 na frente ex:

 

response.write Numcpf(05805866234) ele retorna em branco, pois não considera o zero.

[saloeric 1]

se os números inseridos forem sempre os que a mascara pede, pode usar assim

 

Function mascara(valor,tipo)
dim tmp

Select Case tipo
	Case "telefone"
		tmp = mid(valor,1,4) & "-"
		tmp = tmp & mid(valor,5,4)
	Case "cfp"
		tmp = mid(valor,1,3) & "." 
		tmp = tmp & mid(valor,4,3) & "." 
		tmp = tmp & mid(valor,7,3) & "-" 
		tmp = tmp & mid(valor,10,2)
End Select

mascara = tmp
End Function

telefone = "12345678"
cfp = "12345678901"

response.write mascara(telefone,"telefone")&"<br />"
response.write mascara(cfp,"cfp")&"<br />"

 

[xanburzum 169]

inependente da string SQL de consulta, esses valores que voltarão você pode apenas formatá-los conforme sua necessidade de View