推奨:ASPユーザー向けのログインモジュールを設計しますユーザーログイン検証スクリプト、chkpwd.asp以下は参照されているコンテンツです:% '========ユーザーログイン検証スクリプト======'渡されたオブジェクトがまだ定義されていない場合、それはfalseとして定義され、
このプログラムは、アクセスデータベースにカウンターの数を配置し、もちろん、必要な他のODBCデータソースを使用することもできます。このプログラムは、URLからのカウント情報を読み取ります。次のように:
<img src = id = mytest&seq = default&cells = 7>
パラメーター
id
クライアントWebページのPeugeot(つまり、ユーザー名)。新しいIDを使用するたびに、新しいレコードがデータベースに挿入されます。このIDが存在する場合、そのカウントが1増加します。クライアントが自動的にIDを起動して登録する必要がない場合は、falseに自動的に挿入された値を割り当てます。
seq
オプション。カウンター画像のスタイルを選択するために使用されます。クライアントに表示される画像の名前は.gifです。デフォルト値はdefalut.gifであり、このdefalut.gifは現在の作業ディレクトリに配置する必要があります!
セル
オプション。カウント結果に表示されるビットの数は5ビットです(プログラムでこの値を調整できます)このプログラムの実行方法
このプログラムをサーバー上の必要な場所にコピーします。
データソースWebCounterを作成します。このデータソースメインにはテーブル名がある必要があり、この表のフィールドは次のとおりです。
以下は引用されたコンテンツです。
<テーブルボーダー= 1セルパディング= 3セルペーシング= 1>
<tr>
<th>フィールド< /th>
<th>タイプ< /th>
<th>インデックス付け< /th>
<th>は< /th>を意味します
< /tr>
<tr>
<td>識別< /td>
<td> autonumber </td>
<td>はい< /td>
<td>ニーズのために</td>
< /tr>
<tr>
<td> id < /td>
<td>テキスト< /td>
<td>はい< /td>
<td> username </td>
< /tr>
<tr>
<td> count < /td>
<td> number < /td>
<td> no < /td>
<td>数字< /td>
< /tr>
< /table>
必要に応じてデータベースに許可を割り当てます
GIFグラフィックを保存するディレクトリを作成し、このディレクトリに少なくともdefault.gifグラフィックスグループを配置します。必要に応じて、このファイルに権限を与えます。
このディレクトリにデジタルグラフィックを10で割り当てることができます。
以下は引用されたコンテンツです。
<テーブル幅= 100%境界= 1セルペーシング= 1セルパディング= 2>
<tr>
<td bgcolor =#ccffff> file <b> counter.asp < /b> < /td>
< /tr>
<tr>
<td bgcolor =#ffffcc> <pre>
<%
Response.ContentType = image/gif
Response.Expires = 0
'GIFバーが配置されているディレクトリ。で終わります /
workdir = c:/gifbars/
'自動挿入を無効にしたい場合は、これを偽に設定します
'ユニークでヒットするたびにデータベースに対する新しいカウンターレコード
'ID文字列
auto_insert = true
id = trim(request.querystring(id))
seq = trim(request.querystring(seq))
seq = then seq = defaultの場合
セル=トリム(request.querystring(セル))
細胞= then細胞= 5 else細胞=細胞*1
conn = server.createObject(adodb.connection)を設定します
conn.open webcounter
sql = countを選択し、mainから識別しますwhere id = '&id&'
rs = conn.execute(sql)を設定します
rs.eofではない場合
count = rs(count)1
識別= rs(識別)
rs.close()
conn.execute(メインセットcount = count 1を更新する=&dew =&identy)
conn.close()
shownumbers()
それ以外
rs.close()
auto_insert = trueとid <> thenの場合
conn.execute(メイン(id、count)値に挿入( '&id&'、1))
count = 1
shownumbers()
ifを終了します
conn.close()
ifを終了します
sub shownumbers()
g = createObject(shotgraph.image)を設定します
filename = workdir&seq&.gif
G.getFileDimensions(filename、xsize、ysize、pal)<> 1の場合、exit sub
xdigit = xsize/10
G.CreateImage Xdigit*セル、ysize、ubound(pal)1
g.initclipboard xsize、ysize
G.SelectClipboard True
i = 0からubound(pal)の場合
g.setcolor I、pal(i、0)、pal(i、1)、pal(i、2)
次
G.ReadImageファイル名、PAL、0,0
I = 1細胞の場合
k = getDigit(count、cell-i)
g.copy(i-1)*xdigit、0、xdigit、ysize、k*xdigit、0、srccopy
次
respons.binarywrite g.gifimage(-1,1、)
End Sub
関数getDigit(番号、位置)
number1 = number/(10^位置)
TMP = number1/10
getDigit = number1-tmp*10
エンド関数
%>
<xmp>
< /pre>
< /td>
< /tr>
< /table>
<hr> < /span> < /td>
< /tr>
<tr>
<td width = 50%> < /td>
<td width = 50%> <br> < /td>
< /tr>
<tr>
<td colspan = 2 align = right>
<img border = 0 src = images/bbstitle.gif> <a id = hlkaddmsg href =/addmsg.aspx?id = 234 style = color:red>コメントを残す</a>
<img border = 0 src = mail.gif> <a id = hlkmailto href =/mailto.aspx?id = 234>このページ</a>
<img border = 0 src = images /print.gif> <a href = javascript:window.print()>このページを印刷< /a>
<img border = 0 src = images/profile.gif> <a href = javascript:void(null)onclick = if(!document.execcommand( 'saveas'、 'show.aspx'、1))falseを返します。 >このページを保存< /a>
<img border = 0 src = images/ask.gif> <a href = bbs/index.asp>質問があります</a>
< /td>
< /tr>
<tr bgcolor =#97b9ff>
<td width = 50%> <b> <font color =#fffffff>関連記事< /font> < /b> < /td>
<td width = 50%> <b> <font color =#fffffff>関連コメント< /font> < /b> < /td>
< /tr>
<tr>
<td width = 50%valign = top>
< /td>
<td width = 50%valign = top>
< /td>
< /tr>
<tr>
<td width = 50%>
< /td>
<td width = 50%align = right> <img border = 0 src = images /more.gif> <a id = hlkrela> < /a> < /td>
< /tr>
< /table>
< /td>
< /tr>
< /table>
< /td>
< /tr>
< /table>
< /body>
< /html>
共有:ASP買収プログラムの原則に関する簡単な議論コレクションプログラムの主な手順は次のとおりです。1。収集されたページの内容を取得します2。取得コード1からすべてのデータを抽出します。