ASPでは、返品値を持つコードの一部が関数と呼ばれます。コードを記述して、自然数が素数であるかどうかを計算してから、呼び出しプログラムに戻ることができます。今日、新しいテクノロジーチャネルは、ASPの一般的に使用される機能は何ですか？編集者はそれを詳細に説明します。
<％
DIM DB
db = "dbms.mdb"
'****************************************************************
'値を返すことなくSQLステートメントを実行します。最良のSQLステートメントは次のとおりです。
'テーブル名の更新セットフィールド名=値、フィールド名=値フィールド名=値
'フィールド名=値のテーブル名から削除します
'テーブル名に挿入（フィールド名、フィールド名）値（値、値）
'****************************************************************
sub noresult（sql）
dim conn
Dim Connstr
conn = server.createObject（ "adodb.connection"）を設定します
connstr = "provider = microsoft.jet.oledb.4.0; data source ="＆server.mappath（ "＆db＆" "）
conn.open connstr
conn.execute sql
conn.close
conn =何も設定しません
End Sub
'*********************************************************************************
'Selectステートメントを実行し、RecordSetオブジェクトを返します。このオブジェクトは読み取り専用です。つまり、更新することはできません
'*********************************************************************************
関数結果（SQL）
dim conn
Dim Connstr
DIM RCS
conn = server.createObject（ "adodb.connection"）を設定します
connstr = "provider = microsoft.jet.oledb.4.0; data source ="＆server.mappath（ "＆db＆" "）
conn.open connstr
rcs = server.createObject（ "adodb.recordset"）を設定します
rcs.open sql、conn、1,1
set result = rcs
エンド関数
'*********************************************************************************
'ダイアログボックスがポップアップします
'*********************************************************************************
サブアラート（メッセージ）
メッセージ=交換（メッセージ、 "'"、 "/'"）
respons.write（ "<script> alert（ '"＆message＆ "'）</script>"）
End Sub
'*********************************************************************************
'前のページに戻ります。通常、情報が完全に送信されるかどうかを判断した後に使用されます
'*********************************************************************************
sub goback（）
respons.write（ "<script> history.go（-1）</script>"）
End Sub
'*********************************************************************************
'別の接続をリダイレクトします
'*********************************************************************************
サブゴー（URL）
respons.write（ "<script> location.href（ '"＆url＆ "'）</scrip>"）
End Sub
'*********************************************************************************
'HTMLタグを交換します
'*********************************************************************************
関数htmlencode2（str）
薄暗い結果
薄暗いl
isnull（str）の場合
htmlencode2 = ""
出口機能
ifを終了します
l = len（str）
結果= ""
薄暗いi
i = 1からlの場合
ケースミッドを選択します（str、i、1）
ケース "<"
結果= result+"<"
ケース ">"
結果= result+">"
ケースCHR（13）
結果= result+"<br>"
ケースCHR（34）
結果= result+"" "
場合 "＆"
結果= result+"＆"
ケースCHR（32）
'result = result+""
i+1 <= lおよびi-1> 0の場合
中mid（str、i+1,1）= chr（32）またはmid（str、i+1,1）= chr（9）またはmid（str、i-11）= chr（32）またはmid（str、i-1,1）= chr（9）then
結果= result+""
それ以外
結果= result+""
ifを終了します
それ以外
結果= result+""
ifを終了します
ケースCHR（9）
結果= result+""
ケース他のケース
結果= result+mid（str、i、1）
[選択]を終了します
次
htmlencode2 = result
エンド関数
'*********************************************************************************
'SQL文字列に単一の引用符があるかどうかを確認し、ある場合はそれを変換します
'*********************************************************************************
function checkstr（str）
dim tstr、l、i、ch
str =トリム（str）
l = len（str）
i = 1からlの場合
ch = mid（str、i、1）
ch = "'"の場合
TSTR = TSTR+"'"
ifを終了します
TSTR = TSTR+CH
次
checkstr = tstr
エンド関数
％>
今日の記事で新しいテクノロジーチャネルによって導入されたASPで使用される一般的な機能は何ですか？上記の紹介を通して、誰もがそれを徹底的に学んだと思いますが、この知識を統合するためにそれをレビューする必要があります。