推奨:ASPでループを使用するためのヒントこの記事では、主にASPのforループのヒントを共有しています。私は本当にそれに注意を払いません。 ASPを理解している友人がそれを参照できることを願っています。
<%
'===============================================================
'関数リスト:
'1:データベース接続Connopenを確立する(DatabaseConnectStr、DBType、conn_object)
'2:データベースconnclose(conn_object)を外します
'3:SAFEREQUESTのSQL注入を防ぐ(パラナーム、パラタイプ)
'4:Format dateformat(datestr、dateType)
'5:エラーメッセージシャワーを表示(errstr)
'6:クエリ文字列selectStr(contentsStr、patternStr、patternnum)で特定のデータを検索します
'7:指定された文字リーチ(ContentsStr、Badwords)をフィルタリングする
'8:リモートファイルコンテンツクローリングSeize(urlstr)
'9:データフローエンコード処理bytestobstr(body、cset)
'10:CookiesCodeCookieのエンコード(ContentsSTR)
'11:Coodies DecodeCookie(contentstr)をデコード
'12:データ提出ソースが法的chkpost()であるかどうかを確認します
'13:パーソナライズされた暗号化myencrypt(strpassword)
'14:nobuffer()は、このページでキャッシュされることを禁止されています
'15:Webページフォーマット入力テキストhtmlencode(fstring)
'16:頭からの文字列の指定された長さを(文字の数で)gottopic(str、strlen)をインターセプトする
'17:確認コードCheckRadompass(radompass)を確認する
'18:検証コードgetCode()を生成します
'19:クライアントオペレーティングシステムバージョンを取得getsystem()
'20:データベーストランザクションconnmanage(conn_object)
'21:QuickSort(再帰)QuickSort(arr、low、high)
'22:配列の要素を特定の文字列arr_join(arr、character)に接続します
'23:文字列の数を特定の分割文字count_character(str、character)で割った数を返します
'24:Splitter inter_str_by_character_num(str、character、start、numを含む文字列内の指定された文字列の数をインターセプトする
'25:ストリームを使用してファイルをダウンロードしていますdownloadfile(strfile)
'26:メッセージsend_backを返す(結果語)
'27:エラーメッセージget_err()を取得
'28:Saferesponse(コンテンツ)に反して
'29:RemoteFileを保存(localFileName、remotefileurl)
'30:...
dimlanguage_arr(10)
Language_arr(0)=データベース接続のパラメーター設定が正しくありません!
Language_arr(1)=データベース接続のタイプパラメーター設定が正しくありません!
Language_arr(2)=データベース接続に失敗しました!
Language_arr(3)=違法なパラメーター値!
Language_arr(4)=パラメーター値は有効な日付形式ではありません!
Language_arr(5)=操作に失敗しました!
Language_arr(6)=列には重複した名前があります!
Language_arr(7)=列名は空です!
Language_arr(8)=列フォルダーの作成に失敗しました!
Language_arr(9)=この許可はありません!
'
'関数ID:1
'関数関数:データベースへの接続を確立します
'変更時間:
'後継者パラメーター:
'ConnectStr:データベース接続文字列
'ConnectType:データベースカテゴリ数と数字のタイプ、0はアクセス、1はMS SQL
'返品値:
'
Sub Connopen(databaseconnectstr、dbtype、conn_object)
conn_object = server.createObject(adodb.Connection)を設定します
DatabaseConnectStr =の場合、Showerr(Language_arr(0))を呼び出します
dbtype = 0の場合
conn_object.open driver = {microsoftアクセスドライバー(*.mdb)}; dbq =&databaseconnectstr
elseif dbtype = 1次に
conn_object.openプロバイダー= sqloledb.1; &databaseconnectstr
それ以外
Showersr(Language_arr(1))に電話する
ifを終了します
err.clear
End Sub
'
'関数ID:2
'関数:データベースを切断します
'変更時間:
'後継者パラメーター:
'返品値:
'
sub connclose(conn_object)
conn_object.close
conn_object = Nothingを設定します
End Sub
'
'関数ID:3
'関数関数:SQL注入を防ぎます
'変更時間:
'後継者パラメーター:
'パラナーム:パラナメキャラクター
'paratype:paratype:パラメータータイプ数と数字タイプ(上記のパラメーターが数字であることを意味し、0は上記のパラメーターが文字であることを意味します)
'返品値:
'フィルタリングされた文字列
'
function Saferequest(Paraname、Paratype)
薄暗いパラバルー
paravalue = request(paraname)
ケースパラタイプを選択します
ケース0
paravalue = cheplage(paravalue、 '、[System:34])
paravalue = cheplage(paravalue、=、[System:61])
ケース1
is -numeric(paravalue)ではない場合は、showerr(language_arr(3))に電話してください
ケース-1
is -numeric(paravalue)ではない場合は、showerr(language_arr(3))に電話してください
paravalue =の場合、paravalue = 0
ケース他のケース
Len(Paravalue)> Paratypeの場合、Showerr(Language_arr(3))に電話してください
paravalue = cheplage(paravalue、 '、[System:34])
paravalue = cheplage(paravalue、=、[System:61])
[選択]を終了します
Saferequest = Paravalue
エンド関数
'==================================='関数ID:4
'関数関数:フォーマット日
'変更時間:
'後継者パラメーター:
'Datestr:Datestr:
'Paratype:日付タイプと数字のタイプ
'返品値:
'フォーマット日
functionDateformat(datestr、dateType)
薄暗いDateString
isdate(datestr)= falseの場合
shoperr(language_arr(4))に電話する
ifを終了します
ケースデータタイプを選択します
ケース1
DateString = year(datestr)& - &month(datestr)& - &day(datestr)
ケース2
DateString = year(datestr)&。&month(datestr)&。&day(datestr)
ケース3
DateString = year(datestr)&/&month(datestr)&/&day(datestr)
ケース4
DateString = month(datestr)&/&day(datestr)&/&year(datestr)
ケース5
DateString = day(datestr)&/&month(datestr)&/&year(datestr)
ケース6
DateString = month(datestr)& - &day(datestr)& - &year(datestr)
ケース7
DateString = month(datestr)&。&。&day(datestr)&。&year(datestr)
ケース8
DateString = month(datestr)& - &day(datestr)
ケース9
DateString = month(datestr)&/&day(datestr)
ケース10
DateString = month(datestr)&。&day(datestr)
ケース11
DateString = month(datestr)&language_arr(6)&day(datestr)&language_arr(7)
ケース12
DateString = day(datestr)&language_arr(7)&hour(datestr)&language_arr(8)
ケース13
DateString = day(datestr)&language_arr(7)&hour(datestr)&language_arr(8)
ケース14
DateString = hour(datestr)&Language_arr(8)&minute(datestr)&language_arr(9)
ケース15
DateString = hour(datestr)&:&minute(datestr)
ケース16
DateString = year(datestr)&Language_arr(5)&month(datestr)&Language_arr(6)&day(datestr)&language_arr(7)
ケース他のケース
DateString = DateString
[選択]を終了します
dateformat = datestring
エンド関数
'
'関数ID:5
'関数関数:エラープロンプトを表示します
'変更時間:
'後継者パラメーター:
'errstr:エラープロンプト - 文字タイプ
'返品値:送信ページに戻ります
'
共有:Ewebeditor v3.8列ディレクトリタイトル:ASP EWEBEDITOR v3.8列ディレクトリの脆弱性(その他のバージョンはテストです)
2ページの前のページ12次のページ次のページ