减小字体
增大字体- ·上一篇文章：asp实现表格的行列转换代码
- ·下一篇文章：asp获取表中的表名和字段名
asp教程：asp插入排序法
上一篇文章介绍了asp冒泡排序法，这次介绍另一种排序法：插入排序法。代码如下：
<(鼠标移到代码上去，在代码的顶部会出现四个图标，第一个是查看源代码，第二个是复制代码，第三个是打印代码，第四个是帮助)
%function insertSort(byval b) '插入排序法 for i=1 to ubound(b) j=i key=b(i) while(j>
0) if key <
b(j-1) then t=b(j-1) b(j-1)=key b(j)=t key=b(j-1) end if j=j-1 wend next insertSort = bend functiona=array(49,38,65,97,76,13,27) response.write "初始顺序： "for i=0 to ubound(a) response.write a(i)&
" "nextresponse.write "<
hr>
" a = insertSort(a)response.write "最终排序结果："for i=0 to ubound(a) response.write a(i)&
" "next %>
这里面的insertSort(byval b)函数就是插入排序法的具体写法。
。
asp教程：asp插入排序法
