Kami dapat menambahkan beberapa hyperlink di ASP, tetapi apa yang harus kami lakukan jika kami tidak membutuhkannya setelah menambahkannya? Sekarang mari kita lihat metode untuk menghapus semua hyperlink dari ASP. Jika Anda ingin tahu, silakan merujuk mereka.
<%
'***********************************
'Fungsi: lepashref_a (htmlstr)
'Argumen: htmlstr, string yang akan dihapus
'Penulis: Alixi
'Tanggal: 2007/7/12
'Deskripsi: Hapus semua hyperlink di string
'Contoh: <%= RemoveHref_A ("<a href =/abc/h.html> tes </a>")%>
'***********************************
Fungsi lepasHREF_A (htmlstr)
Redup, str1, str2, str3, str4
Htmlstr = lcase (htmlstr)
Untuk n = 1 ke ubound (split (htmlstr, "<a"))
str1 = instr (htmlstr, "<a")
str2 = instr (str1, htmlstr, ">")
Htmlstr = kiri (htmlstr, str1-1) & kanan (htmlstr, len (htmlstr) -len (kiri (htmlstr, str2)))))
Htmlstr = ganti (htmlstr, "</a>", "")
Hapushref_a = htmlstr
Berikutnya
Fungsi akhir
%>
Secara teratur menghilangkan semua hyperlink dalam string
<%
'***********************************
'Fungsi: regremovehref (htmlstr)
'Argumen: htmlstr, string yang akan dihapus
'Penulis: Alixi
'Tanggal: 2007/7/12
'Deskripsi: Hapus semua hyperlink dalam string secara teratur
'Contoh: <%= regremovehref ("<a href =/abc/h.html> tes </a>")%>
'***********************************
Fungsi regremovehref (htmlstr)
Setel ra = regexp baru
ra.ignorecase = true
ra.global = true
ra.pattern = "<a [^>]+> (.+?) <// a>"
Regremovehref = ra.replace (htmlstr, "$ 1")
Fungsi akhir
%>
Di atas adalah semua konten artikel ini. Saya berharap konten artikel ini akan membantu untuk belajar atau bekerja semua orang. Saya juga berharap dapat mendukung saluran teknologi baru yang salah!