要按列标题对经典ASP进行排序，可以使用SQL语句查询数据库并使用排序函数对结果进行排序。

以下是一个示例代码，假设有一个名为"table_name"的表，包含列标题为"column_name"的列：

<%
' 建立数据库连接
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=path_to_your_database.mdb"

' 定义要排序的列标题
Dim sortColumn
sortColumn = "column_name"

' 构建SQL查询语句，使用ORDER BY子句按列标题排序
Dim strSQL
strSQL = "SELECT * FROM table_name ORDER BY " & sortColumn

' 执行查询
Dim rs
Set rs = conn.Execute(strSQL)

' 遍历结果集并输出
Do While Not rs.EOF
    ' 输出每一行的数据
    Response.Write rs("column_name") & "
"
    rs.MoveNext
Loop

' 关闭连接和结果集
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>

请注意，上述示例代码使用了Microsoft Jet OLEDB 4.0提供程序，适用于Access数据库（.mdb文件）。如果您使用的是其他数据库，需要相应地更改连接字符串和SQL语句。

此外，为了实现更复杂的排序功能，您可能需要使用其他排序函数，如ASC（升序）或DESC（降序）。您可以将这些函数与列标题一起使用，以实现更高级的排序。

希望这个示例代码可以帮助您按列标题对经典ASP进行排序。