Contoh pengguna terdaftar ajax dan kode efek pengiriman formulir<!--Modul Pendaftaran-->default.asp
Copy kode kodenya sebagai berikut:
<!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>
<kepala>
<title>Ajax - Contoh1</title>
<meta http-equiv=Content-Type content=text/html; charset=utf-8 /> //Pastikan untuk menyetel pengkodean halaman ini ke UTF-8, jika tidak, karakter yang kacau akan muncul.
<meta name=penulis konten=tonyhl[at]126.com />
<meta http-equiv=pragma content=tanpa-cache/>
<bahasa skrip=javascript type=teks/javascript src=reg.js></script>
<link rel=stylesheet href=css.css type=teks/css media=all/>
<tipe gaya=teks/css>
<!--
#Lapisan1 {
posisi:mutlak;
lebar:200 piksel;
tinggi:115 piksel;
indeks-z:1;
kiri: 409 piksel;
atas: 88 piksel;
}
-->
</gaya>
</kepala>
<tubuh>
<h2>Contoh aplikasi Ajax: modul registrasi</h2>
<div id=Lapisan1>
<div id=msg></div>
</div>
ID: <tipe masukan=teks id=regid />
Kata sandi: <tipe masukan=id kata sandi=kata sandi reg />
<nama masukan=f tipe=file />
<tipe input=kirim id=regsubmit value=Daftar onclick=Periksa() />
<h2>Saat mendaftarkan pengguna dengan ID tony, latar belakang memverifikasi bahwa ID tersebut sudah ada dan mengembalikan pesan cepat<br />
Untuk menyoroti efek tanpa penyegaran, program sisi server akan secara otomatis melakukan jutaan operasi tambahan
</h2>
</tubuh>
</html>
Copy kode kodenya sebagai berikut:
<!----Skrip pengiriman data formulir--->REG.JS
fungsi GE(a){kembalikan dokumen.getElementById(a);}
fungsi Periksa(){
if(GE('regid').value==''){GE('msg').innerHTML='ID tidak boleh kosong'; return false}
if(GE('regpassword').value==''){GE('msg').innerHTML='kata sandi tidak boleh kosong';return false}
var X=Objek ActiveX baru(Msxml2.XMLHTTP);
jika(X){
GE('regsubmit').disabled=true;
X.onreadystatechange=fungsi(){
if(X.readyState==4){
if(X.status==200){
eval(X.responseText)
}
else{GE('msg').innerHTML=X.statusText}
}
else{GE('msg').innerHTML=Mengirimkan data...}
};
X.open('POST','reg.asp',true);
X.setRequestHeader('Tipe Konten','aplikasi/x-www-form-urlencoded');
var SendData = 'regid='+GE('regid').value+'®password='+GE('regpassword').value+'&file='+GE('f').value
X.kirim(KirimData)
}
kalau tidak{
GE('msg').innerHTML='Browser Anda tidak mendukung XMLHttpRequest'
}
}
<!---Pemrosesan program--->reg.asp
Copy kode kodenya sebagai berikut:
<%@ LANGUAGE=VBSCRIPT CODEPAGE=65001%>//CODEPAGE harus 650001, jika tidak maka akan muncul karakter yang kacau. Jika ada teks HTML, harus disetel ke pengkodean UTF-8, jika tidak maka akan muncul karakter yang kacau.
<%
Redupkan regid, kata sandi reg, str
regid=Permintaan.Formulir(regid)
regpassword=Permintaan.Formulir(regpassword)
f=Permintaan.Formulir(file)
Redupkan aku, ii
saya = 0
Untuk i = 0 Sampai 1000000
ii = ii + saya
Berikutnya
Jika regid= atau regpassword= maka
str = ID dan PASSWORD harus diisi
Kalau tidak
Jika regid <> tony Lalu
str = Pendaftaran berhasil, ID & regid &, kata sandi & regpassword&f
Kalau tidak
str = Pendaftaran gagal, ID sudah ada
Akhiri Jika
Berakhir jika
Respon.Tulis GE('msg').innerHTML=' & str & ';GE('regsubmit').disabled=false
Respon.Akhir
%>