Recommended: Tutorial on using EVAL function in ASP In the past two days, I have learned the EVAL function of ASP. It feels very practical. If used properly, it can reduce the amount of code written and make the code more concise and clear. Prototype of EVAL function: EVAL (expression) where expression is a string parameter, can be an expression, a variable, or even a statement. But they all appear in the form of strings. For example b=EVA
Function FormatStr(str)
Dim s1,s2
If str<> then
str=replace(replace(Trim(str),chr(32)&chr(32),),chr(9),)
DO While (instr(str,>)>0 and instr(str,<)>0)
s1=InStr(str,<)
s2=Instr(s1,str,>)
If s1>0 and s2>0 then
str=replace(str,mid(str,s1,s2-s1+1),)
End if
Loop
str=replace(replace(str,<,<),>,>)
str=Replace(Replace(Replace(replace(replace(replace(replace(replace(str,chr(13),),chr(10),),),),','),,)
FormatStr=str
Else
FormatStr=
End if
End Function
Share: ASP highlights case-insensitive keywords Today, I encountered a problem: how to highlight case-insensitive keywords in a web page, such as: text abcaBcabCaBCabcaBCa, keyword bc, in case-insensitive situation, there are 6 matches in total. Then the abcaBcabCaBCabcaBCa is displayed on the web page. Many people think of it as a replace function. The prototype is Replace(string, find, replacewith[,