AspLib™ 中的AspSortie组件中文说明

    老人家说的好，小孩子做事要有始有终。既然已经翻译了AspLib中的GenObj组件，那么我们就不应该半途而废。今天，我们谈谈其中的另一个组件-AspSortie。
    顾名思义，这个组件是用于排序的，它能对整数、浮点数、字符串、日期/时间等数组进行增序或降序排序，使用非常简单，而且，我发现，这个组件能在Visual Basic中使用，不过在我的机器上产生一个错误，而且这个错误类型是Delphi式的，是不是可以推测这个组件是Delphi写的呢（其实这样的组件，我想很多人都写的出来，不过，既然能用现成的，那就不要再客气了）？
    当然，第一步我们要谈谈安装，同其他大部分ServerObjects出品的组件一样，你必须把这个aspSort.Dll拷贝到一个子目录下，如果你使用Windows NT操作系统，那么推荐你把该aspSort.dll拷贝到Winnt\System32子目录，使用Windows 9X的，则应该拷贝到Windows\System子目录。然后，使用我们的RegSvr32注册该组件。如 Regsvr32 aspsort.dll，如果aspsort.dll不在当前目录，你需要键入aspsort.dll的完整路径。
    可能你拥有aspsort.dll的早期版本，如果你想把它升级到现在这个新版本，你可能要麻烦一些：
    ⒈ 停止IIS有关的全部服务，如ftp,w3srvc等。
    ⒉ 改变目录到AspSort.dll的安装目录，用regsvr32 /u aspsort.dll取消注册。
    ⒊ 其他步骤同上。当然最后你会重新启动iis有关的全部服务。
    接下来我们谈谈正经的。
如何创建AspSortie对象？
在Asp中你可用如下方法创建AspSortie对象
dim sort
Set sort=Server.CreateObject("Aspsortie.Pro")
aspSortie对象具有那些属性？
aspsortie对象具有三个属性，但只有一个属性对我们有用
⒈ Error
返回在调用sort方法期间产生的任何错误。
⒉ Expires
如果你使用的是评估版，这个属性显示该组件使用到期的日期
⒊ RegisteredTo
如果你登记了该组件，则返回你登记的名字，否则，就返回“Evaluation”。
Aspsortie对象具有哪些方法？
很庆幸，只有一个方法。
方法：Sort
语法：aspsortie.Sort(intDirection, intFlags, array)
参数：intDirection-排序方向，0是增序，1是降序。intFlags-文档中没有说明，所以我也不知道，取默认值0。Array-要排序的数组。
一个完整的例子
本人天资愚钝，写这段代码整整用了三天三夜，可能还有不少错误，敬请指正！
Dim Sort
Set Sort=Server.CreateObject("AspSortie.Pro")
Dim varArray(1 to 5)
varArray(1)="Microsoft Visual Basic"
varArray(2)="IBM VisualAge for Java"
varArray(3)="Borland Delphi"
varArray(4)="Borland Jbuilder"
vararray(5)="My Software"
response.write "未排序" & "<br>"
for I=1 to 5
  Respnse.Write varArray(I) & "<br>"
next
response.write "排序-增序" & "<br>"
call sort.sort(0,0,varArray)
for I=1 to 5
  Respnse.Write varArray(I) & "<br>"
next
response.write "排序-降序" & "<br>"
call sort.sort(1,0,varArray)
for I=1 to 5
  Respnse.Write varArray(I) & "<br>"
next
Set Sort=nothing

原文转自：http://www.ltesting.net