Exemplo de usuário registrado em ajax e código de efeito de envio de formulário<!--Registration module-->default.asp
Copie o código do código da seguinte forma:
<!DOCTYPE html PUBLIC -//W3C//DTD XHTML 1.0 Transitional//EN http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd>
<html xmlns=http://www.w3.org/1999/xhtml>
<cabeça>
<title>Ajax - Amostra1</title>
<meta http-equiv=Content-Type content=text/html; charset=utf-8 /> //Por favor, certifique-se de definir a codificação desta página para UTF-8, caso contrário, caracteres ilegíveis aparecerão.
<meta name=autor content=tonyhl[at]126.com />
<meta http-equiv=pragma content=no-cache/>
<linguagem script=javascript type=text/javascript src=reg.js></script>
<link rel=folha de estilo href=css.css type=text/css media=all/>
<tipo de estilo=texto/css>
<!--
#Camada1 {
posição:absoluta;
largura:200px;
altura:115px;
índice z:1;
esquerda: 409px;
superior: 88px;
}
-->
</estilo>
</head>
<corpo>
<h2>Exemplo de aplicação Ajax: módulo de registro</h2>
<div id=Camada1>
<div id=msg></div>
</div>
ID: <tipo de entrada=texto id=regid />
Senha: <tipo de entrada=senha id=regpassword />
<nome de entrada=f tipo=arquivo />
<input type=submit id=regsubmit value=Registrar onclick=Check() />
<h2>Ao cadastrar um usuário com ID tony, o background verifica se o ID já existe e retorna uma mensagem de prompt<br />
Para destacar o efeito de não atualização, o programa do lado do servidor executará automaticamente um milhão de operações de adição
</h2>
</body>
</html>
Copie o código do código da seguinte forma:
<!----Script de envio de dados de formulário--->REG.JS
função GE(a){retornar documento.getElementById(a);}
função Verificação(){
if(GE('regid').value==''){GE('msg').innerHTML='ID não pode estar vazio';
if(GE('regpassword').value==''){GE('msg').innerHTML='a senha não pode estar vazia';return false}
var X = novo ActiveXObject (Msxml2.XMLHTTP);
se(X){
GE('regsubmit').disabled=true;
X.onreadystatechange=função(){
if(X.readyState==4){
if(X.status==200){
avaliação(X.responseText)
}
senão{GE('msg').innerHTML=X.statusText}
}
else{GE('msg').innerHTML=Enviando dados...}
};
X.open('POST','reg.asp',true);
X.setRequestHeader('Content-Type','application/x-www-form-urlencoded');
var SendData = 'regid='+GE('regid').value+'®password='+GE('regpassword').value+'&file='+GE('f').value
X.enviar(EnviarDados)
}
outro{
GE('msg').innerHTML='Seu navegador não suporta XMLHttpRequest'
}
}
<!---Processamento do programa--->reg.asp
Copie o código do código da seguinte forma:
<%@ LANGUAGE=VBSCRIPT CODEPAGE=65001%>//CODEPAGE deve ser 650001, caso contrário, caracteres ilegíveis aparecerão. Se houver texto HTML, ele deverá ser definido para codificação UTF-8, caso contrário, caracteres ilegíveis aparecerão.
<%
Dim regid, regpassword, str
regid = Solicitação.Formulário (regid)
regpassword=Request.Form(regpassword)
f = Solicitação.Formulário (arquivo)
Dim eu, ii
eu = 0
Para i = 0 a 1.000.000
ii = ii + eu
Próximo
Se regid= ou regpassword= então
str = ID e SENHA devem ser preenchidos
Outro
Se regid <> tony Então
str = Registro bem-sucedido, ID é & regid &, senha é & regpassword&f
Outro
str = Falha no registro, ID já existe
Terminar se
Terminar se
Response.Write GE('msg').innerHTML=' & str & ';GE('regsubmit').disabled=false
Resposta.Fim
%>