Function Highlight(strText, strFind, strBefore, strAfter) Dim nPos Dim nLen Dim nLenAll nLen = Len(s
很多朋友问到这样的问题,这里提供代码,该代码以只读方式打开,并可以显示行号,如果想修改的话,只需把打开时的属性改一下即可 <% strtextfile = server.mappath("you
说明:一个英文字符或是标点为一个字符,一个汉字为二个字符 <script language="vbscript"> Function LeftStr(Str) TextCount = Le
初学者往往总这样问:装了IIS可不能看ASP文件说500-内部服务错误谁知道怎么解决啊?其实他们都忽略了IE的设置: 工具---internet选项-----高级------去掉“显示友好的HTTP错
<script language="VBScript"> Function addCopy(num) Dim ranValue, i, resultChr resultChr = "" f
1.函数array() 功能:创建一个数组变量 格式:array(list) 参数:list为数组变量中的每个数值列,中间用逗号间隔 例子: <% i = array ("1","2"
<BR>&lt;%<BR>function gen_key(digits)<BR>dim rndnum,num<BR>Randomize<
以前看到一个帖子讲用ID+1和ID-1的办法判断“上一篇下一篇”,在用的过程中发现一个问题:当删除数据库中的一篇文章时,就会造成ID不连续,如果用ID+1和ID-1来判断就会出现找不到记录的问题,在这
如何才能让搜索出来的关键字变红色? 如何才能让搜索出来的关键字变红色? 输入内容:cnbruce love cnrose 输入查询内容: cn 你会发现结果的。
输入内容:cnbruce love cnrose 输入查询内容: cn 你会发现结果的。 <script language=javascript> strText=window.