Pasar numero a texto

Si como textfield te refieres a:

1.- <INPUT TYPE=TEXT
Basta con que hagas:
<INPUT TYPE=TEXT VALUE="<%=numero%>"...>

2.- Campo de la base de datos con SQL:
INSERT INTO tabla (numero) VALUES ('" & numero & "')
(fíjate que hay un ' y luego una ", a los extremos de numero)

3.- Usando el Field del Recordset:
Recordset.Fields("numero") = "'" & numero & "'"

4.- Una general antes de todo lo anterior es:
numero = cstr( numero )
o esta otra
numero = "" & numero

Saludos
Manuel

Hernan Nieto wrote in message
news:
Hola:

Se que es una pregunta facil, disculpen, pero necesito saber la funcion en
Asp que me pasa una variale numerica a un valor caracter, para poder
asignarlo al value de un texfield.
Muchas gracias.

he encontrado esto por mi hd (no se de donde lo he sacado), supongo que ews
lo que quieres, pero... seguro que no e vale, lo que no funciona son los
decimales, si alguno tiene idea de como arrglar eso, que avise, por que yo
no he podido

Saludos a todos

1.asp
-
<form name="form1" method="post" action="2.asp">
<input name="numero" type="text" id="numero">
<input type="submit" name="Submit" value="Submit">
</form>



2.asp

<%
var1 = ENLETRAS(Request.form("numero"))
%>

<%
Function ENLETRAS(x)
On Error Resume Next
parte1 = Int(x / 1000000)
parte2 = Int((x - parte1 * 1000000) / 1000)
parte3 = x - parte1 * 1000000 - parte2 * 1000
If parte1 = 0 Then millon = ""
If parte1 = 1 Then millon = "UN MILLÓN "
If parte1 > 1 Then millon = nombre(parte1) + " MILLONES "
If (parte1 - 100 * Int(parte1 / 100) > 11) And ((parte1 - 10 * Int(parte1 /
10)) = 1) Then
millon = Mid(nombre(parte1), 1, Len(nombre(parte1)) - 1) + " MILLONES "
End If
If parte2 = 0 Then millar = ""
If parte2 = 1 Then millar = " MIL "
If parte2 > 1 Then millar = nombre(parte2) + " MIL "
If (parte2 - 100 * Int(parte2 / 100) > 11) And ((parte2 - 10 * Int(parte2 /
10)) = 1) Then
millar = Mid(nombre(parte2), 1, Len(nombre(parte2)) - 1) + " MIL "
End If
ENLETRAS = millon + millar + nombre(parte3)
If Int(x) = 0 Then ENLETRAS = "CERO"
End Function

Function nombre(x)
uni = Array("", "UNO", "DOS", "TRES", "CUATRO", "CINCO", _
"SEIS", "SIETE", "OCHO", "NUEVE", "DIEZ", _
"ONCE", "DOCE", "TRECE", "CATORCE", "QUINCE", _
"DIECISEIS", "DIECISIETE", "DIECIOCHO", "DIECINUEVE", "VEINTE", _
"VEINTIUNO", "VEINTIDOS", "VEINTITRES", "VEINTICUATRO", "VEINTICINCO", _
"VEINTISEIS", "VEINTISIETE", "VEINTIOCHO", "VEINTINUEVE")
dec = Array("", "", "", "TREINTA", "CUARENTA", "CINCUENTA", _
"SESENTA", "SETENTA", "OCHENTA", "NOVENTA")
cent = Array("", "CIENTO", "DOSCIENTOS", "TRESCIENTOS", "CUATROCIENTOS", _
"QUINIENTOS", "SEISCIENTOS", "SETECIENTOS", "OCHOCIENTOS", "NOVECIENTOS")
xcent = Int(x / 100)
xdec = Int(x / 10) - 10 * xcent
xuni = x - 100 * xcent - 10 * xdec
If xdec > 2 Then
nombre = dec(xdec)
If xuni > 0 Then
nombre = nombre + " Y " + uni(xuni)
End If
Else
nombre = uni(xdec * 10 + xuni)
End If
If xcent > 0 Then nombre = cent(xcent) + " " + nombre
If x = 100 Then nombre = "CIEN"
End Function
%>

<%=var1%>