システムを書くたびに、プログラムにログインする必要があるため、非常に面倒です。実際、いくつかの一般的に使用される機能モジュールをログイン検証関数に作成できます。では、ASPで一般的に使用されるいくつかの機能モジュールは何ですか?次に、ASPの一般的に使用される機能モジュールの導入を見てみましょう。
[コード]
<%
function chk_regist(requestname、requestpwd、tablename、namefield、pwdfield、reurl)dim cn_name、cn_pwdcn_name = trim(request.form( ""&requestname& "")) thonesponse.write( "<スクリプト言語= javascript> alert(" "アカウントのパスワードを完全に記入してください、あなたの協力に感謝します。" "); history.go(-1)</script>")end ifset rs = createobject( "adodb.recordset")sql = " "&namefield&" = '' "&cn_name&" '' "" rs.open sql、conn、1,1if rs.eof thensponse.write( "<スクリプト言語= javascript> alert(" "このメンバーIDはありません。 session( "cn_name")= rs( ""&namefield& "")response.redirect(reurl)elseresponse.write( "<scripe leganday = javascript> alert(" "アカウントとパスワードは一致しません。数字とuppercaseと小文字に注意を払います。
[コード]
パラメーター説明:
chk_regist(requestname、requestpwd、tablename、namefield、pwdfield、reurl)
RequestNameは、HTMLページに入力された名前を受け入れる入力コントロール名です。
requestPWDは、HTMLページに入力されたパスワードを受け入れる入力コントロールの名前です。
TableNameは、データベースに登録情報を保存するテーブルの名前です
namefieldは、この情報表にユーザー名を保存するフィールド名です
PWDFieldは、この情報表のユーザーのパスワードのフィールド名です
Reurlは、ログインした後にジャンプするページです
引用の例は次のとおりです。
<%call chk_regist( "b_name"、 "b_pwd"、 "cn_admin"、 "cn_name"、 "cn_pwd"、 "admin.asp")%>
2。多くの場合、何かの現在の状態、通常はフィールド(数値タイプ、デフォルト値は0)を判断することができます。
状態スイッチングの効果は、このフィールドの値を変更することにより達成されます。それで、私はそれを簡単にするために別の機能を作りました。
<%関数pvouch(tablename、fildname、autoidname、indexid)dim filtervalueset rs = server.createobject( "adodb.recordset")sql = "select * from"& "&" = "&" = "&indexidrs.open sql、conn、conn、conn = rs") thenfildValue = 1ELSEFILDVALUE = 0END IFRS( ""&fildName& "")= fildValuers.updaters.close set rs = noweend function%>
パラメーター説明:
pvouch(TableName、fildName、autoidName、indexID)
タブネームテーブル名があるデータベースの名前
フィルム名このことは、状態のフィールド名を示すために使用されます(フィールドタイプは数値です)
このテーブルのAutoIDNAMEの自動番号付け名
IndexIDは、状態の対応する自動番号付き値を変更するために使用されます
引用の例は次のとおりです。
<%dowhat = request.querystring( "dowhat")p_id = cint(request.querystring( "p_id"))if dowhat = "tj" and p_id <> "" thencall pvouch( "cn_products"、 "p_vouch"、 "p_id"、p_id)if "p_id")その後、%>>推奨<%else%>>推奨事項<%end if>をキャンセルします
3.多くの中小企業向けのWebサイトを作成します。一般的に、製品ディスプレイは大きなプロジェクトであるため、作成されたページは異なります。
いくつかは水平に配置されているか、いくつかは垂直に配置されているか、ステーション全体が数回投げたり回転したりする必要がありますが、これは非常に面倒で疲れます。
それを緩和するために関数を書くだけなので、それは次のものになりました
<%function showpros(tablename,topnum,fildname,loopnum,typepenum)Set rs = Server.CreateObject ("ADODB.Recordset")sql = "Select top "&topnum&" * from "&tablenames.Open sql,conn,1,1if rs.eof and rs.bof thenresponse.Write("No record at the moment ")elseresponse.write(" ")for i = 1 to rs.RecordCountif(i mod loopnum = 1)thenresponse.write" "end ifselect case typenumcase" 1 "respons.write(" ")respons.write(rs("&fildname& ""))Respons. """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""" ")respons.write(" ")end selectif(i mod loopnum = 0)thonresponse.write" "end ifrs.movenextnextresponse.write(" ")end ifrs.close set rs = noteend function%>
パラメーター説明:showpros(tablename、topnum、filmname、loopnum、typepenum)
どのProが製品の種類を選択します
Topnumとは、抽出されたレコードの数を意味します
FildNameは、デバッグによって表示されるフィールドを表します。このパラメーターは、詳細に適用するときに省略し、関数内で直接使用できます
ループナムは、表示されたループの行ごとのレコード数を表します
Typenumは、円形ディスプレイの方法を表します。現在、同じデータレコード行の異なるレコードの水平方向に平行し、垂直に平行な2つのカテゴリがあります。
引用の例は次のとおりです。
<if request.form( "submit")<> "" thentopnum = request.form( "topnum")loopnum = request.form( "loopnum")typenum = request.form( "typenum")elsetopnum = 8loopnum = 2typenum = 1end if> <%call showpros( "cn_products"、topnum、 "p_name"、loopnum、typenum)%>
上記は、この記事のコンテンツ全体です。この記事の内容があなたの研究や仕事に役立つことを願っています。ご質問がある場合は、メッセージを残してコミュニケーションをとることができます。 New Technology Channelからのご支援に感謝します。