ASPインターセプト文字列関数の実装方法

ASPはどのようにしてインターセプト文字列関数を実装できますか？多くの人がこの問題に興味があると思います。それでは、文字列関数を傍受するASPの実装方法を見てみましょう。知らない友達、見てみましょう。

ページレイアウトの制限のためにタイトルが長すぎる場合、10文字しかリストできない場合、この関数はそれを達成するのに役立ちます

'インターセプトストリングストルバリュー（タイトル、ワードカウント）

関数strvalue（str、lennum）

DIM P_NUM

薄暗いi

strlen（str）<= lennumの場合

strvalue = str

それ以外

p_num = 0

x = 0

p_num> lennum-2ではありません

x = x+1

ASC（MID（STR、x、1））<0 thenの場合

p_num = int（p_num） + 2

それ以外

p_num = int（p_num） + 1

ifを終了します

strvalue = left（trim（str）、x）＆ "…"

ループ

ifを終了します

エンド関数

function strlen（str）

dim page_len

page_len = 0

strlen = 0

if trim（str）<> "" then

page_len = len（trim（str））

xx = 1からpage_lenの場合

ASC（MID（STR、xx、1））<0の場合

strlen = int（strlen） + 2

それ以外

strlen = int（strlen） + 1

ifを終了します

次

ifを終了します

エンド関数

使い方：

<％= strvalue（ "正確なプログラミング言語、コードの構文を正しく色付けし、コードスニペット説明のいくつかの簡単な単語を入力できます"、10）％>

上記は、文字列関数をインターセプトするASPの実装方法です。コードは非常に簡潔で実用的です。それを必要とする友達はそれを参照できます。