ASPプログラムのパフォーマンスを改善するために、人々は多くの場合、アプリケーションでキャッシュデータを頻繁に使用します。この記事は、False New Technologyチャネルの編集者によるASPプログラムのパフォーマンスをキャッシュして改善することをお勧めします。この知識を学ぶことが役立つことを願っています！
ASPプログラムのパフォーマンスをキャッシュして改善する方法を教えてください
<％
クラスWAWA_APP_GETROWS
パブリック関数wawa_get_list（strapp、strconn、strsql）
'******************************
'関数：アプリケーションから配列を抽出します。アプリケーションのデータが空の値の場合は、WAWA_GET_ROWS（）関数を呼び出して、アプリケーションに値を割り当てます。
'、データベースを変更するときに対応するアプリケーション値を空にクリアでき、ブラウジング時にアプリケーションが自動的に更新されます。
「データベースを更新する場合（データの追加、変更、削除など）、データベースを変更した後、対応するアプリケーション変数を削除します。
'次のステートメントを使用して、STRAPPパラメーターが削除されるアプリケーション変数の名前である指定されたアプリケーション値をクリアします
'Application.Contents.Remove（Strapp）
'www.knowsky.com
'******************************
ディムワワ
wawa = application（strapp）
isempty（wawa）の場合
wawa = wawa_get_rows（strconn、strsql）
アプリケーション（strapp）= wawa
ifを終了します
wawa_get_list = wawa
エンド関数
パブリック関数wawa_get_rows（strconn、strsql）
'******************************
'関数：データベースからレコードを読んで、getRowsメソッドを使用します
'レコードを配列に保存します
'
'******************************
dim rs_wawa
rs_wawa = createObject（ "adodb.recordset"）をset
rs_wawa.open strsql、strconn、1,1
wawa_get_rows = rs_wawa.getRows（）
rs_wawa.close
rs_wawa =何も設定しません
エンド関数
エンドクラス
％>
<％
Dim Strapp、strsql、strconn
strapp = "xinwendongtai"
strsql = "トップ5 IDを選択し、wen where where lei = 161 ID descによるタイトルを選択します」
strconn = "driver = {sql server}; server = 192.168.0.110; database = new; uid = sa; pwd = sa;"
wawa_temp = new wawa_app_getRowsをセットします
arr_xinwendongtai = wawa_temp.wawa_get_list（strapp、strconn、strsql）
％>
<％ubund（arr_xinwendongtai）<> 0 then％>の場合
<％i = 0からubund（arr_xinwendongtai、2）-1％>
<％next％>
<％else％>
<％end if>
上記の記事では、ASPプログラムのパフォーマンスをキャッシュして改善する方法を教えています。誰もが特定の理解を持っていると思います。より多くの技術情報を知りたい場合は、間違った新しいテクノロジーチャネルに注意を払い続けてください！