Direkomendasikan: Pemisahan Kode dan Halaman di ASP Untuk menghindari kesulitan pemeliharaan yang disebabkan oleh pencampuran program ASP dan kode HTML, artikel ini memperkenalkan metode untuk menggunakan templat untuk memisahkan program dan halaman untuk membuat pemrograman lebih mudah. Saat menggunakan ASP untuk membuat situs, sering ada situasi di mana kode program dan kode HTML dicampur dalam file ASP. Ada banyak kerugian untuk melakukan ini: 1. Belum lagi pemrograman, Anda perlu
Fungsi: Hasilkan nomor telepon pada halaman ke format gambar.
<%
Hubungi com_createValidCode (request.querystring (tel))
Sub Com_CreateValidCode publik (PTEL)
'-------------------------------------------------------------------------------------------------------------------------
Response.expires = 0
Response.addheader Pragma, tanpa cache
Response.addheader cache-ctrol, tanpa cache
Response.contentType = gambar/BMP
Mengacak
Redup i, ii, iii, rndcolor, strlen, sql, rs
Codds const = 5 '----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Const str = 0123456789-
strlen = len (ptel)
rndcolor = chrb (cint (rnd*255)) & chrb (cint (rnd*255)) & chrb (cint (rnd*255))
'-------------------------------------------------------------------------------------------------------------------------
Redup vcolordata (1)
'vcolordata (0) = chrb (0) & chrb (0) & chrb (0)' ----- biru 0, hijau 0, merah 0 (hitam)
'vcolordata (1) = chrb (255) & chrb (255) & chrb (255) '----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'vcolordata (0) = chrb (197) & chrb (106) & chrb (49)' --- biru 0, hijau 0, merah 0 (hitam)
'vcolordata (1) = chrb (238) & chrb (210) & chrb (193)' ------- biru 250, hijau 236, merah 211 (biru muda)
vcolordata (0) = chrb (0) & chrb (0) & chrb (0) '----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
vcolordata (1) = chrb (205) & chrb (237) & chrb (245) '--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'-------------------------------------------------------------------------------------------------------------------------
Mengacak
Redup vcode ()
redim vcode (strlen-1)
Untuk i = 0 ke strlen-1
vcode (i) = instr (1, str, mid (ptel, i+1,1), 1) -1
Berikutnya
'-------------------------------------------------------------------------------------------------------------------------
Redup vnumberberdata (11)
'Verdana Font
Vnumberberdata (0) = 1111111111101111111111111111111111111111111111111111111111111111111
vNumberData(1) = 111111111111101111110111111101111111111101111111111111111111111111111111111111111111111111111
VNumberberdata (2) = 1111111111101111111111111111111111111111111111111111111111111111111111111111111111111111111
Vnumberberdata (3) = 111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
Vnumberberdata (4) = 11111111111111111111111111111111111111111111111111111100111111111111
VNumberberdata (5) = 111111111000001111111111111111000011111111111111111111111111111111111111111111111111
VNumberberdata (6) = 11111111111011111111111.0001111111111111111111111111111111111111111111111111111
VNumberberdata (7) = 11111111110000011101111111111111111111111111111111111111111111111111111111111111
VNumberberdata (8) = 11111111111011111111111111111100011111111111111111111111111111111
VNumberberdata (9) = 111111111110111111111111111111111111111111111.0001111111111111111
Vnumberberdata (10) = 111111111111111111111111111111111111111100000.000111111111111111111111111111111111
VNumberberdata (11) = 1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
'-------------------------------------------------------------------------------------------------------------------------
Response.binarywrite chrb (66) & chrb (77) & chrb (((strlen*8*10*3+54) mod 256)) & chrb ((strlen*8*10*3+54)/ 256) Mod 256) & Chrb ((((Strlen*8*10*3+54)/ 256)/ 25) ((((Strlen*8*10*3+54)/ 256)/ 256)/ 256)/ 256)/ 256)/ CHRB (((Strlen*8*10*3+54)/ & _
Chrb (0) & chrb (0) & chrb (54) & chrb (0) & chrb (0) & chrb (0) & chrb (40) & chrb (0) & _
Chrb (0) & chrb (0) & chrb (strlen*8) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (10) & chrb (0) & _
Chrb (0) & chrb (0) & chrb (1) & chrb (0)
'-------------------------------------------------------------------------------------------------------------------------
Response.binarywrite chrb (24) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & chrb (0) & _
Chrb ((strlen*8*10*3) mod 256) & chrb (((strlen*8*10*3)/256) mod 256) & chrb (((((strlen*8*10*3)/256)/256) Mod 256) & chrb ((((strlen*8*10*3)/256)//256)/MOD ((((Strlen*8*10*3)/256)//256)//)
Chrb (196) & chrb (14) & chrb (0) & chrb (0) & chrb (196) & chrb (14) & chrb (0) & chrb (0) & _
Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0)
Untuk i = 9 hingga 0 langkah -1 '--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Untuk ii = 0 ke strlen-1 '--------- Setelah semua kata
Untuk III = 1 hingga 8 '---------------------------------------------------------------------------------------------------------------
'--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Jika rnd * 99 + 1 <codds maka '------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Response.binarywrite rndcolor
Kalau tidak
Response.binarywrite vcolordata (mid (vnumberberdata (vcode (ii)), i * 8 + iii, 1))
Akhiri jika
Berikutnya
Berikutnya
Berikutnya
Akhir sub
%>
Simpan kode di atas sebagai img.asp, dan masukkan <img src = img.asp? Tel = 0591-26728373> di lokasi di mana nomor telepon ditampilkan.
Sumber: Muziwu Penulis: Dnawo
Bagikan: Tutorial ASP: Tips untuk ASP untuk menghasilkan pseudo-parameter Dua hari yang lalu, saya sedang mengerjakan versi di dalam mesin dari mesin pencari perusahaan dan menemukan bahwa beberapa situs dapat menautkan ke konten situs. . Saya melihatnya dengan aneh dan menemukan bahwa itu terkait sesuai dengan aturan penomoran otomatis dari ID database ~~ Saya membuat hal berikut di waktu luang saya, berharap itu akan membantu semua orang di program ASP penulisan di masa depan! % '' // menghasilkan jumlah acak dari digit yang ditentukan '' // Anda juga dapat menggunakan GUID