Ejemplo de usuario registrado ajax y código de efecto de envío de formulario<!--Módulo de registro-->default.asp
Copie el código de código de la siguiente manera:
<!DOCTYPE html PUBLIC -//W3C//DTD XHTML 1.0 Transicional//ES http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd>
<html xmlns=http://www.w3.org/1999/xhtml>
<cabeza>
<título>Ajax - Muestra1</título>
<meta http-equiv=Content-Type content=text/html; charset=utf-8 /> //Asegúrese de configurar la codificación de esta página en UTF-8; de lo contrario, aparecerán caracteres confusos.
<meta nombre=contenido del autor=tonyhl[arroba]126.com />
<meta http-equiv=pragma content=no-cache/>
<lenguaje de script=javascript type=text/javascript src=reg.js></script>
<enlace rel=hoja de estilo href=css.css type=text/css media=all/>
<tipo de estilo=texto/css>
<!--
#Capa1 {
posición:absoluta;
ancho: 200 px;
altura: 115 px;
índice z: 1;
izquierda: 409px;
arriba: 88px;
}
-->
</estilo>
</cabeza>
<cuerpo>
<h2>Ejemplo de aplicación Ajax: módulo de registro</h2>
<div id=Capa1>
<div id=msg></div>
</div>
ID: <tipo de entrada=id de texto=regid />
Contraseña: <tipo de entrada=ID de contraseña=contraseña de registro/>
<nombre de entrada=f tipo=archivo />
<tipo de entrada=id de envío=valor de envío de registro=Registrarse al hacer clic=Verificar() />
<h2>Al registrar un usuario con ID tony, el fondo verifica que la ID ya existe y devuelve un mensaje rápido<br />
Para resaltar el efecto de no actualización, el programa del lado del servidor realizará automáticamente un millón de operaciones adicionales
</h2>
</cuerpo>
</html>
Copie el código de código de la siguiente manera:
<!----Script de envío de datos del formulario--->REG.JS
función GE(a){return document.getElementById(a);}
función Verificar(){
if(GE('regid').value==''){GE('msg').innerHTML='ID no puede estar vacío';
if(GE('regpassword').value==''){GE('msg').innerHTML='la contraseña no puede estar vacía';return false}
var X=nuevo ActiveXObject(Msxml2.XMLHTTP);
si(X){
GE('regsubmit').disabled=true;
X.onreadystatechange=función(){
si(X.readyState==4){
si(X.estado==200){
eval(X.textoderespuesta)
}
else{GE('msg').innerHTML=X.statusText}
}
else{GE('msg').innerHTML=Enviando datos...}
};
X.open('POST','reg.asp',verdadero);
X.setRequestHeader('Tipo de contenido','aplicación/x-www-form-urlencoded');
var SendData = 'regid='+GE('regid').valor+'®contraseña='+GE('regidcontraseña').valor+'&file='+GE('f').valor
X.enviar(EnviarDatos)
}
demás{
GE('msg').innerHTML='Su navegador no soporta XMLHttpRequest'
}
}
<!---Procesamiento del programa--->reg.asp
Copie el código de código de la siguiente manera:
<%@ LANGUAGE=VBSCRIPT CODEPAGE=65001%>//CODEPAGE debe ser 650001; de lo contrario, aparecerán caracteres confusos. Si hay texto HTML, debe configurarse en codificación UTF-8; de lo contrario, aparecerán caracteres confusos.
<%
Dim regid, regpassword, str
regid=Solicitud.Formulario(regid)
contraseñareg=Solicitud.Form(contraseñareg)
f=Solicitud.Formulario(archivo)
tenue i, ii
yo = 0
Para i = 0 a 1000000
ii = ii + yo
Próximo
Si regid= o regpassword= entonces
str = ID y CONTRASEÑA deben completarse
Demás
Si regid <> tony Entonces
str = Registro exitoso, ID es & regid &, contraseña es & regpassword&f
Demás
str = Error en el registro, el ID ya existe
Terminar si
terminar si
Respuesta.Escribir GE('msg').innerHTML=' & str & ';GE('regsubmit').disabled=false
Respuesta.Fin
%>