国产高清在线免费观看-国产高清在线免费无码-国产高清在线男人的天堂-国产高清在线视频-国产高清在线视频精品视频-国产高清在线视频伊甸园

u2 forum rautinee原創$[br]$http://u2bbs.126.com$[br]一個網友問就寫了一個,:)[br]function checkthechar(thechar,thestring)[br]'thechar="要檢測的字符串"[br]'thestring="待檢測的字符串"[br]if instr(thestring,thechar) then[br]for n =1 to len(thestring)[br]if mid(thestring,n,len(thechar))=thechar then [br]checkthechar=checkthechar+1[br]end if[br]next[br]checkthechar="這個字符"&checkthechar&"次"[br]else[br]checkthechar="0次"[br]end if[br]end function[br]'++++++++++++++++[br]example:[br]response.write checkthechar("大家","a224大家4a434a4大家654arewr4a4a")[br]----------------------------------------------------[br]ok enjoy it and good luck