Kode untuk asp query xml tidak me-refresh halaman. Metode implementasi query adalah sebagai berikut:
<html>
<kepala>
<title>Cara melakukan kueri tanpa menyegarkan halaman</title>
<meta http-equiv=Jenis Konten konten=teks/html; charset=gb2312>
</kepala>
<bahasa skrip=javascript>
<!--Inisialisasi, muat data di pulau data ke dalam kotak daftar-->
fungsi memuatinsel()
{
var Employeeid,employeelastname; //Menyimpan ID karyawan dan nama karyawan masing-masing
root=document.all.xmlemployees.childNodes.item(0); //Kembalikan elemen pertama--karyawan
for(i=0;i<root.childNodes.length;i++){
getnode=root.childNodes(i); //Dapatkan node anak dari karyawan
Employeeid=root.childNodes(i).getAttribute(emid);//Dapatkan ID karyawan
for(j=0;j<getnode.childNodes.length;j++){
Employeeinf=getnode.childNodes(j).nodeName;
if(karyawaninf==nama belakang){
Employeelastname=getnode.childNodes(j).text; //Dapatkan nama karyawan
}
}
//Tuliskan id karyawan dan nama belakang karyawan yang diperoleh ke dalam pilihan
if(pegawai!= && nama belakang karyawan!=){
option1=document.createElement(opsi);
option1.text=nama belakang karyawan;
option1.value=id karyawan;
daftar karyawan.tambahkan(opsi1);
}
}
}
<!--Inisialisasi, mengambil data dari pulau data dan memuatnya ke dalam kotak daftar-->
fungsi temukan karyawan(){
var Employeelastname,employeeid; //Menyimpan masing-masing nama karyawan dan ID karyawan
nama belakang karyawan=;
ID Karyawan=;
findtext=window.findcontent.value; //Dapatkan kondisi pencarian
//Kosongkan kotak daftar
jumlah karyawan=daftar karyawan.panjang
for(i=jumlah karyawan-1;i>=0;i--){
daftar karyawan.hapus(i);
}
root=window.xmlemployees.childNodes(0);
for(i=0;i<root.childNodes.length;i++){
getitem=root.childNodes(i); //Dapatkan node anak karyawan
Employeeid=root.childNodes(i).getAttribute(emid); //Dapatkan ID karyawan
for(j=0;j<getitem.childNodes.length;j++){
if(getitem.childNodes(j).nodeName==nama belakang){
Employee_temp=getitem.childNodes(j).teks;
if(employee_temp.indexOf(findtext)!=-1){ //Temukan item yang cocok
Employeelastname=employee_temp; //Cari karyawan dengan nama yang cocok
}
}
}
//Tulis informasi karyawan yang memenuhi syarat ke dalam pilihan
if(pegawai!= && nama belakang karyawan!=){
option1=document.createElement(opsi);
option1.value=id karyawan;
option1.text=nama belakang karyawan;
window.daftar karyawan.tambahkan(opsi1);
ID Karyawan=;
nama belakang karyawan=;
}
}
}
</skrip>
<tubuh bgcolor=#FFFFFF teks=#000000 onload=javascript:loadinsel()>
<lebar tabel=80% batas=1>
<tr>
<td> Silakan masukkan ketentuan kueri:
<tipe masukan=nama teks=temukan konten>
<tipe input=nama tombol=Kirim nilai=Temukan onclick=javascript:finemployee()>
</td>
</tr>
<tr>
<td> hasil kueri:
<pilih nama=daftar karyawan>
</pilih>
</td>
</tr>
</tabel>
<?xml versi=1.0 pengkodean=gb2312?>
<%
namaserver=wyb 'Nama server
pengguna=sa 'nama pengguna
pw= 'Kata sandi pengguna
namadatabase=northwind 'nama basis data
setel koneksi=server.CreateObject(adodb.koneksi)
samb.Buka DRIVER=SQL Server;SERVER=&namaserver&;UID=&pengguna&;pwd=&pw&;DATABASE=&nama database
set rs=server.CreateObject(adodb.recordset)
sql=Pilih id karyawan, nama belakang dari pesanan karyawan berdasarkan id karyawan
rs.Buka sql, samb%>
<!--Masukkan informasi dalam database ke dalam pulau data-->
<xml id=xmkaryawan>
<karyawan>
<%lakukan selagi belum rs.eof%>
<emid item karyawan=<%=rs(id karyawan)%>>
<nama belakang><%=rs(nama belakang)%></nama belakang>
</item karyawan>
<%rs.movenext%>
<%lingkaran%>
</karyawan> </xml>
<%rs.close
atur rs=tidak ada
%>
</tubuh>
</html>
Gunakan fungsi instr() ASP untuk mendeteksi apakah suatu string berisi string yang ditentukan
<%
Redupkan wstr1,wstr2
wstr1=halo dunia!
wstr2=o
jika instr(wstr1,wstr2)>0 maka
respon.write(&wstr2& ada di &wstr1&)
kalau tidak
respon.tulis(&wstr1& tidak mengandung &wstr2&)
berakhir jika
%>
-------------------
fungsi InStr
-------------------
InStr([mulai, ]string1, string2[, bandingkan])
【parameter】
Sintaks fungsi InStr memiliki parameter berikut:
bagian
menjelaskan
awal
Parameter opsional. Untuk ekspresi numerik, tetapkan titik awal untuk setiap pencarian. Jika dihilangkan, dimulai dari posisi karakter pertama. Jika start berisi Null, kesalahan akan terjadi. Jika parameter perbandingan ditentukan, parameter awal harus ada.
string1
Parameter yang diperlukan. Menerima ekspresi string untuk dicari.
string2
Parameter yang diperlukan. Ekspresi string yang akan dicari.
Membandingkan
Parameter opsional. Tentukan perbandingan string. Jika perbandingannya Null, kesalahan akan terjadi. Jika perbandingan dihilangkan, pengaturan Opsi Bandingkan menentukan jenis perbandingan.
Parameter ?bandingkan diatur ke:
konstan
nilai
【menggambarkan】
vbUseCompareOption
-1
Gunakan pengaturan pernyataan Opsi Bandingkan untuk melakukan perbandingan.
vbBinaryBandingkan
0
Lakukan perbandingan biner.
vbTeksBandingkan
1
Lakukan perbandingan tekstual.
vbDatabaseBandingkan
2
Hanya untuk Microsoft Access, melakukan perbandingan berdasarkan informasi di database.
【nilai pengembalian】
Mengembalikan 0, 1, 2, -1 atau Null, dll.
【Pengecualian/Kesalahan】
tidak ada
DeskripsiInStr([mulai, ]string1, string2[, bandingkan])
Mengembalikan kemunculan pertama dari string tertentu dalam string lain. Pada string string1, cari string2 mulai dari awal. Jika awal dihilangkan, cari dari awal string1. Jika tidak ditemukan, nilai fungsinya adalah 0.
jika
DalamStrreturn
string1 panjangnya nol
0
string1 adalah nol
Batal
string2 panjangnya nol
Awal
string2 adalah nol
Batal
string2 tidak ditemukan
0
Temukan string2 di string1
lokasi ditemukan
mulai> string2
0
【Contoh】
Contoh ini menggunakan fungsi InStr untuk menemukan kemunculan pertama suatu string dalam string lain.
Redupkan SearchString, SearchChar, MyPos
SearchString =XXpXXpXXPXXP ' String yang sedang dicari.
SearchChar = P ' Untuk mencari string P.
' Mulai dari karakter keempat, cari berdasarkan perbandingan teks. Nilai kembaliannya adalah 6 (huruf kecil p).
' Huruf kecil p dan huruf besar P sama dalam perbandingan teks.
MyPos = Instr(4, SearchString, SearchChar, 1)
' Mulai dari karakter pertama, pencarian menggunakan perbandingan biner. Nilai kembaliannya adalah 9 (huruf kapital P).
' Huruf kecil p dan huruf besar P berbeda dalam perbandingan biner.
MyPos = Instr(1, SearchString, SearchChar, 0)
'Metode perbandingan default adalah perbandingan biner (parameter terakhir dapat dihilangkan).
MyPos = Instr(SearchString, SearchChar) ' Kembali 9.
MyPos = Instr(1, SearchString, W) ' Kembali 0.