各位大虾：你们好！
我在设计一行关于数据库排序的代码，可是不知道是那里有问题，总是不能正确显示，请高手执教。
代码如下：
<%@LANGUAGE=\"VBSCRIPT\" CODEPAGE=\"936\"%>
\'定义变量
Dim MM_market_STRING
Dim lb_cx
lb_cx=1
\'连接数据库
path=server.MapPath(\"Connections/stock_market.mdb\")
MM_market_STRING =\"provider=microsoft.jet.oledb.4.0; data source=\"&path&\"\"
Set lb_Re = Server.CreateObject(\"ADODB.Recordset\")
lb_Re.ActiveConnection = MM_market_STRING
\'选择记录集
If lb_cx=1 Then
lb_Re.Source = \"SELECT * FROM Agu ORDER BY code DESC\"
elseif lb_cx=0 then
lb_Re.Source = \"SELECT * FROM Agu ORDER BY code ASC\"
end if
lb_Re.CursorType = 0
lb_Re.CursorLocation = 2
lb_Re.LockType = 1
lb_Re.Open()
。
。
。