Пример зарегистрированного пользователя ajax и кода эффекта отправки формы<!--Регистрационный модуль-->default.asp
Скопируйте код кода следующим образом:
<!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>
<голова>
<title>Ajax — образец 1</title>
<meta http-equiv=Content-Type content=text/html; charset=utf-8 /> //Обязательно установите для этой страницы кодировку UTF-8, иначе будут отображаться искаженные символы.
<meta name=author content=tonyhl[at]126.com />
<meta http-equiv=pragma content=no-cache/>
<script Language=javascript type=text/javascript src=reg.js></script>
<link rel=stylesheet href=css.css type=text/css media=all/>
<тип стиля=текст/css>
<!--
#Слой1 {
позиция: абсолютная;
ширина: 200 пикселей;
высота: 115 пикселей;
z-индекс: 1;
слева: 409 пикселей;
верх: 88 пикселей;
}
-->
</стиль>
</голова>
<тело>
<h2>Пример приложения Ajax: модуль регистрации</h2>
<div id=Layer1>
<div id=msg></div>
</div>
ID: <тип ввода=текстовый идентификатор=regid />
Пароль: <тип ввода=идентификатор пароля=regpassword />
<входное имя=f тип=файл />
<input type=submit id=regsubmit value=Register onclick=Check() />
<h2>При регистрации пользователя с идентификатором tony фоновый режим проверяет, что идентификатор уже существует, и возвращает сообщение с подсказкой<br />
Чтобы подчеркнуть эффект отсутствия обновления, серверная программа автоматически выполнит миллион операций сложения.
</h2>
</тело>
</html>
Скопируйте код кода следующим образом:
<!----Скрипт отправки данных формы --->REG.JS
функция GE(a){return document.getElementById(a);}
функция Проверка(){
if(GE('regid').value==''){GE('msg').innerHTML='ID не может быть пустым'; return false};
if(GE('regpassword').value==''){GE('msg').innerHTML='пароль не может быть пустым'; return false}
вар X = новый ActiveXObject (Msxml2.XMLHTTP);
если(Х){
GE('regsubmit').disabled=true;
X.onreadystatechange=функция(){
если (X.readyState == 4) {
если (X.status == 200) {
оценка (X.responseText)
}
еще {GE('msg').innerHTML=X.statusText}
}
else{GE('msg').innerHTML=Отправка данных...}
};
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.send(ОтправитьДанные)
}
еще{
GE('msg').innerHTML='Ваш браузер не поддерживает XMLHttpRequest'
}
}
<!---Обработка программы--->reg.asp
Скопируйте код кода следующим образом:
<%@ LANGUAGE=VBSCRIPT CODEPAGE=65001%>//CODEPAGE должен быть 650001, в противном случае будут отображаться искаженные символы. Если есть текст HTML, для него должна быть установлена кодировка UTF-8, в противном случае будут отображаться искаженные символы.
<%
Dim regid, regpassword, str
regid=Запрос.Форма(regid)
regpassword=Request.Form(regpassword)
f=Request.Form(файл)
Дим я, ii
я = 0
Для я = от 0 до 1000000
ii = ii + я
Следующий
Если regid= или regpassword=, то
str = ID и ПАРОЛЬ должны быть заполнены
Еще
Если регид <> Тони Тогда
str = Регистрация прошла успешно, идентификатор & regid &, пароль & regpassword&f
Еще
str = Регистрация не удалась, идентификатор уже существует
Конец, если
Конец, если
Response.Write GE('msg').innerHTML=' & str & ';GE('regsubmit').disabled=false
Ответ.Конец
%>