Comment ASP peut-il implémenter la fonction de chaîne d'interception? Je crois que beaucoup de gens seront curieux de ce problème. Jetons donc un coup d'œil à la méthode d'implémentation de l'interception des fonctions de chaîne ASP. Des amis qui ne savent pas, jetons un coup d'œil.
Si le titre est trop long, en raison de la limitation de mise en page, vous ne pouvez répertorier que 10 caractères, cette fonction vous aidera à y parvenir
La copie de code est la suivante:'Intercept String Strvalue (titre, nombre de mots)
Fonction Strvalue (Str, Lennum)
DIM P_NUM
dim je
Si strlen (str) <= Lennum alors
strvalue = str
autre
p_num = 0
x = 0
faire tout en pas p_num> Lennum-2
x = x + 1
Si asc (mid (str, x, 1)) <0 alors
p_num = int (p_num) + 2
autre
p_num = int (p_num) + 1
terminer si
strvalue = gauche (garniture (str), x) et "…"
boucle
terminer si
fonction finale
fonction strlen (str)
Dim Page_Len
page_len = 0
strlen = 0
Si Trim (str) <> "" alors
Page_Len = Len (Trim (Str))
pour xx = 1 à page_len
Si ASC (mid (str, xx, 1)) <0 alors
strlen = int (strlen) + 2
autre
strlen = int (strlen) + 1
terminer si
suivant
terminer si
fonction finale
Comment utiliser:
La copie de code est la suivante:<% = strValue ("Langage de programmation précis, peut correctement colorer la syntaxe du code, entrez quelques mots simples de code de code description", 10)%>
Ce qui précède est la méthode d'implémentation des fonctions de chaîne d'interception ASP. Le code est très concis et pratique. Les amis qui en ont besoin peuvent y faire référence.