| 标题 | asp字数计算函数 |
| 内容 | <% 'asp字数计算函数 function wordcount(strinput) dim strtemp strtemp = replace(strinput, vbtab, ) strtemp = replace(strtemp, vbcr, ) strtemp = replace(strtemp, vblf, ) ' 删除字首字尾空格 strtemp = trim(strtemp) ' 替换为一个空格 do while instr(1, strtemp, , 1) <> 0 strtemp = replace(strtemp, , ) loop wordcount = ubound(split(strtemp, , -1, 1)) +1 end function %> |
| 随便看 |
|
在线学习网考试资料包含高考、自考、专升本考试、人事考试、公务员考试、大学生村官考试、特岗教师招聘考试、事业单位招聘考试、企业人才招聘、银行招聘、教师招聘、农村信用社招聘、各类资格证书考试等各类考试资料。