推奨事項: ASP を使用して検索エンジン関数と同様のコードを記述することの解釈まず、アクセス データベースを構築します。データベース内に URLINDEX テーブルがあり、次のように URL フィールドとキーワード フィールドにインデックスが追加されます。 URL テキスト (インデックス: あり (重複なし)) タイトル テキスト 説明テキスト 概要テキスト キーワードテキスト (インデックス: はい (いいえ) を繰り返します)) プログラム ファイル doquery.asp、コード: HTMLHEADTITLE 簡易検索エンジン
left を使用して文字列を直接切り取ると、タイトルに中国語と英語の文字が混在するため、2 つのニュース タイトルの長さが異なることがよくあります。この問題を解決するには、次の関数を使用します。| <% '************************************************ * '関数名: gotTopic '機能: 文字列を切り詰めます。各中国語文字は 2 文字としてカウントされ、英語文字は 1 文字としてカウントされます。 'パラメータ: str---元の文字列 'strlen---- 切片の長さ '戻り値: インターセプトされた文字列 '著作権: asp チュートリアル '************************************************ * FunctiongotTopic(ByValstr,ByValstrlen) Ifstr=その後 gotTopic= 終了関数 EndIf Diml,t,c,i,strTemp str=Replace(Replace(Replace(Replace(str,,),,Chr(34)),>,>),<,<) l=長さ(文字列) t=0 strTemp=str strlen=CLng(strlen) フォーリ=1トール c=Abs(Asc(Mid(str,i,1))) Ifc>255その後 t=t+2 それ以外 t=t+1 EndIf Ift>=strlenThen strTemp=左(str,i) 終了用 EndIf 次 IfstrTemp<>strThen strTemp=strTemp&… EndIf gotTopic=Replace(Replace(Replace(Replace(strTemp,,),Chr(34),),>,>),<,<) エンドファンクション %> <% str=合計 11111w に漢字が含まれています str1=漢字は全部で 5 つあります 応答.writegotTopic response.writegotTopic(str,10)& &gotトピック(str1,10)& 応答.writeleft 応答.writeLeft(str,5)& &Left(str1,5) 応答.終了 %> |
シェア：ウイルス対策ソフトで誤ってASPファイルを削除してしまう問題を解決する方法を公開一部のウイルス対策ソフトウェアは、特定の ASP ファイルをウイルスとして削除することがよくありますが、場合によってはそれを防ぐことができず、ファイルが見つからないためにプログラムが使用できなくなることがあります。これは主に、ウイルス対策ソフトウェアが特定の ASP コードをトロイの木馬キーワードとして扱い、レコードを保存するためです。そのため、このキーワードに遭遇すると、実行が禁止されるか、削除されます。 解決策はこれらのキーワードを与えることです