Red de conocimiento informático - Conocimiento del nombre de dominio - ¡Estoy buscando urgentemente un experto en programación ASP! ¡La siguiente es una pregunta sobre programación ASP que se entregará mañana!~~

¡Estoy buscando urgentemente un experto en programación ASP! ¡La siguiente es una pregunta sobre programación ASP que se entregará mañana!~~

Escribirlo y depurarlo usted mismo no es necesariamente la forma más fácil. Espero que esto ayude.

id="form1"

nombre="form1"

método="post"

action="?action=submit">

Por favor

Ingrese

Sus

Palabras

Aquí:

nombre="cadenas"

tipo="texto"

id="cadenas"

/>

tipo="enviar"

nombre="Enviar"

valor="IR "

/>

nombre="acción"

tipo="oculto"

id="acción"

valor="enviar"

/>

<%

si

request.Form("action")="enviar"

entonces

a=request.Form("strings")

n=len(a)

tenue

temp_num,temp_words,temp_space,temp_other

temp_num=0

temp_words=0

temp_space=0

temp_other=0

para

i=

1

a

n

palabra=asc(mid(a,i,1))

si

palabra =32

entonces'espacio

temp_space=temp_space+1

elseif

palabra>=65

y

palabra<=122

entonces

'letras

temp_words=temp_words+1

elseif

palabra>=48

y

palabra<=57

luego

temp_num=temp_num+1

else

temp_other=temp_other+1

fin

si

siguiente

Response.write

"La cadena que ingresaste:

style='color:red;background-color:

#CCC;'>" &a& "
"

respuesta.write

"Número de espacios:"&temp_space&"
"

respuesta.write

"Números:"&temp_num&"
"

respuesta.escribir

"Letras:"&temp_words&"
"

respuesta .escribir

"Otros:"&

temp_other&"
"

fin

si

%>