Direkomendasikan: ASP+AJAX mencapai tidak ada penyegaran untuk menambah teman Karena hubungan kerja, salah satu fungsinya adalah meningkatkan pihak lain sebagai teman. Seperti yang ditunjukkan pada gambar: Metode yang digunakan adalah AJAX, dan kode yang sesuai lebih murah: HREF = JavaScript: void (0); OnClick = add_username (' %= rs (nama pengguna) %'); Tambahkan sebagai teman/A, verifikasi JS yang digunakan: bahasa skrip = JavaScript src = Ajax.
Kelas ASP yang digunakan untuk mengimplementasikan fungsi tag, Anda dapat memahami fungsi spesifik jika Anda dapat memahaminya.
Ubah catatan:
1. Menambahkan fungsi ekstensi, 2006-12-3
<%
'***********************************
'Nama kelas: tagengine
'Nama: mesin tag
'Tanggal: 2006-11-29
'Penulis: Leng Yue, Xilou
'Situs web: www.xilou.net | www.chinacms.org
'Deskripsi: Hanya fungsi mengekstraksi tag, tidak ada fungsi tag parsing
'Hak Cipta: Silakan merujuk ke sumber untuk mencetak ulang, penulis
'***********************************
'Terakhir dimodifikasi: 2006-12-3
Jumlah modifikasi: 3
'Instruksi Modifikasi: Ubah aturan untuk membuat kecocokan lebih akurat
Versi saat ini: v1.1.3
'***********************************
Tagengine kelas
Objek reguler Regex pribadi
'Tentukan aturan tag
Tagbegin pribadi
Tagend pribadi
Blockbegin_begin pribadi
Blockbegin_end pribadi
Private Blockend_begin
Blockend_end Private
'// Inisialisasi
Private sub class_initialize ()
'Inisialisasi aturan tag
tagbegin = {
tagend =}
blockbegin_begin = <block:
blockbegin_end =>
blockend_begin = </blok:
blockend_end =>
'Inisialisasi objek biasa
Setel regex = RegExp baru
Regex.ignorecase = true 'tidak sensitif
Regex.global = Pertandingan True'Global
Akhir sub
Private Sub Class_Terminate ()
'Lepaskan objek
If isObject (regex) Kemudian atur regex = tidak ada
Akhir sub
'Metode: resetpattern ()
'parameter:
'Pengembalian: Tidak Ada Nilai Pengembalian
'Fungsi: Setel ulang aturan tag
Sub resetpattern publik (tagbegin, tagend, _
blockbegin_begin, _
blockbegin_end, _
blockend_begin, _
blockend_end _
)
tagbegin = tagbegin
Tagend = Tagend
blockbegin_begin = blockbegin_begin
blockbegin_end = blockbegin_end
blockend_begin = blockend_begin
blockend_end = blockend_end
Akhir sub
'Metode: getBlocks (temp, blockname)
'Parameter: temp, konten yang cocok; BlockName, Block Flag Name
'Return: Return to the Collection Object (cocok)
'Fungsi: Dapatkan koleksi tag blok
GetBlock fungsi publik (temp, blockname)
Pola redup
pola = (& blockbegin_begin & []*& blockname &/b [/w/w]*? & blockbegin_end
pola = pola &) ([/w/w]*?) & blockend_begin & [/n/r]*& blockname & []*& blockend_end
'Response.write Pattern
regex.pattern = pola
Set GetBlocks = Regex.Execute (Temp) 'Mengembalikan set pencocokan
Fungsi akhir
'Metode: getBlockbyatt (temp, attributename, attributevalue)
'Argumen: temp, konten yang cocok; attributeName, nama atribut; AtributEvalue, nilai atribut
'Return: Return to the Collection Object (cocok)
'Fungsi: Dapatkan set blok yang cocok berdasarkan nilai atribut tertentu dalam label blok
Fungsi publik getBlockbyatt (temp, attributename, attributevalue)
Pola redup
pola = (& blockbegin_begin & [/w/w]*? [/n/r]+& atributeName
pola = pola & []*= []*/& chr (34) & attributevalue &/& chr (34) & [/n/r]*[/w/w]*?
pola = pola & blockbegin_end
pola = pola &) ([/w/w]*?) & blockend_begin & [/w/w]*? & blockend_end
'Response.write Pattern
regex.pattern = pola
Set GetBlockByatt = Regex.Execute (Temp) 'Mengembalikan set pencocokan
Fungsi akhir
'Metode: getattValue (temp, attributename)
Artikel: Temp, konten yang cocok; attributeName, nama atribut
'Return: Return to the Collection Object (cocok)
'Efek: Dapatkan nilai atribut di tag blok
Fungsi publik getattvalue (temp, attributename)
Pola redup
pola = [/n/r]+& atributeName & []*= []*/& chr (34) & ([^/f/n/r/t/v/& chr (34) &]*?)/& chr (34)
'Response.write Pattern
regex.pattern = pola
Setel getattValue = regex.execute (temp)
Fungsi akhir
'Metode: Parsetag (temp, tagname, tagValue)
'Argumen: temp, konten yang cocok; attributeName, nama atribut; AtributEvalue, nilai atribut
'Return: kembalikan string yang diganti
'Efek: ganti tag sederhana
Parsetag fungsi publik (temp, tagname, tagValue)
Pola redup
'POLA = TAGBEGIN & []*& TAGNAME & []*& TAGEND
pola = tagbegin & tagname & tagend
regex.pattern = pola
parsetag = regex.replace (temp, tagValue)
Fungsi akhir
'Metode: ClearBlocks (temp)
'Argumen: Temp, apa yang cocok
'Return: Returns the Cleared String
'Efek: Bersihkan semua tag blok
Fungsi Publik ClearBlocks (TEMP)
Pola redup
pola = blockbegin_begin & [/w/w]*? & blockbegin_end & [/w/w]*?
pola = pola & blockend_begin & [/w/w]*? & blockend_end
regex.pattern = pola
clearblocks = regex.replace (temp,)
Fungsi akhir
'Metode: cleartags (temp)
'Argumen: Temp, apa yang cocok
'Return: Returns the Cleared String
'Efek: Bersihkan semua tag tunggal
Fungsi Publik Cleartags (TEMP)
Pola redup
pola = tagbegin & [^/f/n/r/t/v]*? & Tagend
regex.pattern = pola
cleartags = regex.replace (temp,)
Fungsi akhir
'Metode: showerror (errdes)
'Parameter: Errdes, deskripsi kesalahan
'Return: Tidak ada
'Efek: Kesalahan tampilan
Sub Showerror Publik (Errdes)
Redup errinfo, cssstyle
cssstyle = style = & chr (34)
cssstyle = cssstyle & font: tebal 12px 150%, 'arial'; perbatasan: 1px solid #cc3366;
cssstyle = cssstyle & lebar: 50%; warna:#990066; padding: 2px; & chr (34)
errinfo = vbcrlf & <ul & cssstyle &> <li> & errdes & </li> </ul> & vbcrlf
Response.write errinfo
Akhir sub
'******************* Fungsi Standar Berakhir ****************
'Berikut ini adalah ekstensi khusus
'Metode: ext_getsimpleblocks (temp, blockname)
'Parameter: temp, konten yang cocok; BlockName, Block Flag Name
'Return: Return to the Collection Object (cocok)
'Fungsi: Dapatkan kumpulan tag blok sederhana
'Contoh: <blok: id baru = loop =/>
Fungsi publik ext_getsimpleblocks (temp, blockname)
Pola redup
Redup blockbegin, blockend
'Mendefinisikan ulang aturan tag
blockbegin = <block:
blockend =/>
pola = blockbegin & []*& blockname &/b [/w/w]*? & Blockend
regex.pattern = pola
Set Ext_GetSimpleBlocks = regex.execute (temp)
Fungsi akhir
'******************* Fungsi Standar Berakhir ****************
'Berikut ini adalah ekstensi khusus
'Metode: ext_getsimpleblocks (temp, blockname)
'Parameter: temp, konten yang cocok; BlockName, Block Flag Name
'Return: Return to the Collection Object (cocok)
'Fungsi: Dapatkan kumpulan tag blok sederhana
'Contoh: <blok: id baru = loop =/>
Fungsi publik ext_getsimpleblocks (temp, blockname)
Pola redup
Redup blockbegin, blockend
'Mendefinisikan ulang aturan tag
blockbegin = <block:
blockend =/>
pola = blockbegin & []*& blockname &/b [/w/w]*? & Blockend
regex.pattern = pola
Set Ext_GetSimpleBlocks = regex.execute (temp)
Fungsi akhir
'Metode: ext_getText (path)
'Argumen: jalur, relatif atau jalur absolut ke teks yang akan dibaca
'Return: kembalikan konten teks
'Fungsi: Baca file
'Contoh: c = ext_getText (tpl.htm)
Fungsi publik ext_getText (path)
Redup fso, f, teks
Pada kesalahan resume berikutnya
Atur fso = createObject (scripting.filesystemObject)
Set f = fso.opentextFile (path)
Teks = F.Readall
Jika err maka
Err.clear
Showerror Sebuah kesalahan terjadi saat membaca file ...
If isObject (fso) kemudian atur fso = tidak ada
Fungsi keluar
Akhiri jika
If isObject (fso) kemudian atur fso = tidak ada
Ext_getText = teks
Fungsi akhir
'Metode: ext_getincludefile (temp)
'Argumen: Temp, apa yang cocok
'Return: Return to the Collection Object (cocok)
'Fungsi: Parse blok <!-#termasuk file = tpl.html->
'Contoh: ext_getincludefile (temp) (0) .submatches (0), kembalikan nama file yang cocok pertama
Fungsi publik ext_getincludefile (temp)
Pola redup
Redup blockbegin, blockend
'Mendefinisikan ulang aturan tag
blockbegin = <!-#Termasuk
blockend =->
pola = blockbegin & []*file []*= []*/([/w/w]*?)/[]*& blockend
regex.pattern = pola
Set Ext_GetIncludeFile = Regex.Execute (Temp)
Fungsi akhir
Kelas akhir
%>
Bagikan: ASP Kode Contoh Lengkap IP Voting Terbatas ASP Karena hubungan kerja, salah satu fungsinya adalah memberikan suara pada pengguna, membutuhkan IP yang sama untuk memberikan suara pada pengguna yang sama hanya sekali, posting kode ASP: % 'Penulis: Wurong Sumber: DB_CONN (DBS) VOOTEUSERNAME = Trim (permintaan.