Dalam ASP, sepotong kode dengan nilai pengembalian disebut fungsi. Kita dapat menulis sepotong kode untuk menghitung apakah angka alami adalah bilangan prima, dan kemudian kembali ke program panggilan. Hari ini, saluran teknologi baru akan berbagi dengan Anda apa fungsi ASP yang umum digunakan? Editor akan menjelaskannya kepada Anda secara rinci.
<%
redup db
db = "dbms.mdb"
'********************************************************************
'Jalankan pernyataan SQL tanpa mengembalikan nilai. Pernyataan SQL terbaik adalah sebagai berikut:
'Perbarui Nama Tabel Setel Nama Bidang = Nilai, Nama Bidang = Nilai Di mana Nama Bidang = Nilai
'hapus dari nama tabel di mana nama bidang = nilai
'Masukkan ke dalam nama tabel (Nama Bidang, Nama Bidang) Nilai (nilai, nilai)
'********************************************************************
Sub Noresult (SQL)
redup conn
Connstr
Set Conn = Server.CreateObject ("AdodB.Connection")
connstr = "provider = microsoft.jet.oledb.4.0; sumber data =" & server.mappath ("" & db & "")
Conn.open Connstr
Conn.Execute SQL
Conn.Close
atur conn = tidak ada
Akhir sub
'*********************************************************************************
'Jalankan pernyataan pilih dan kembalikan objek Recordset. Objek ini hanya baca. Artinya, itu tidak dapat diperbarui
'*********************************************************************************
Hasil Fungsi (SQL)
redup conn
Connstr
redup rcs
Set Conn = Server.CreateObject ("AdodB.Connection")
connstr = "provider = microsoft.jet.oledb.4.0; sumber data =" & server.mappath ("" & db & "")
Conn.open Connstr
Setel rcs = server.CreateObject ("adodb.recordset")
rcs.open sql, conn, 1,1
Setel hasil = RCS
Fungsi akhir
'*********************************************************************************
'Kotak dialog muncul
'*********************************************************************************
Sub Alert (pesan)
pesan = ganti (pesan, "'", "/'")
Response.write ("<script> alert ('" & message & "') </cript>")
Akhir sub
'*********************************************************************************
'Kembali ke halaman sebelumnya, biasanya digunakan setelah menilai apakah informasi tersebut diserahkan sepenuhnya
'*********************************************************************************
Sub goback ()
Response.write ("<script> history.go (-1) </cript>")
Akhir sub
'*********************************************************************************
'Mengalihkan koneksi lain
'*********************************************************************************
Sub go (url)
Response.write ("<script> location.href ('" & url & "') </cript>")
Akhir sub
'*********************************************************************************
'Ganti tag HTML
'*********************************************************************************
fungsi htmlencode2 (str)
Hasil redup
redup l
jika isnull (str) lalu
htmlencode2 = ""
fungsi keluar
akhiri jika
l = len (str)
hasil = ""
redup i
untuk i = 1 hingga l
Pilih case mid (str, i, 1)
kasus "<"
hasil = hasil+"<"
kasus ">"
hasil = hasil+">"
case chr (13)
Hasil = Hasil+"<br>"
case chr (34)
Hasil = Hasil+"" "
kasus "&"
Hasil = Hasil+"&"
case chr (32)
'Hasil = Hasil+""
Jika i+1 <= l dan i-1> 0 lalu
Jika mid (str, i+1,1) = chr (32) atau mid (str, i+1,1) = chr (9) atau mid (str, i-1,1) = chr (32) atau mid (str, i-1,1) = chr (9) Kemudian
Hasil = Hasil+""
kalau tidak
Hasil = Hasil+""
akhiri jika
kalau tidak
Hasil = Hasil+""
akhiri jika
case chr (9)
Hasil = Hasil+""
kasus lain
Hasil = Hasil+Mid (Str, I, 1)
Akhiri Pilih
Berikutnya
htmlencode2 = hasil
fungsi akhir
'*********************************************************************************
'Periksa apakah ada satu kutipan di string SQL, dan jika ada, konversinya
'*********************************************************************************
function checkstr (str)
redup tstr, l, i, ch
str = trim (str)
l = len (str)
untuk i = 1 hingga l
ch = mid (str, i, 1)
Jika ch = "'" lalu
TSTR = TSTR+"'"
akhiri jika
TSTR = TSTR+CH
Berikutnya
Checkstr = tstr
fungsi akhir
%>
Apa fungsi umum yang digunakan dalam ASP yang diperkenalkan oleh saluran teknologi baru dalam artikel hari ini? Saya percaya bahwa melalui pengantar di atas, semua orang telah mempelajarinya secara menyeluruh, tetapi masih perlu memeriksanya untuk mengkonsolidasikan pengetahuan ini.