本人想将数据中用户的订单信息显示出来

set rs = server.CreateObject("Adodb.recordset")
SqlStr = "Select distinct order_num,shr,dhsj,order_date,order_total from wborder where user_id='"&session("id")&"' and order_flag=5"
Rs.open SqlStr,conn,1,1

为什么相同的订单号会重复显示?
那里错了?

SqlStr = "Select distinct order_num,shr,dhsj,order_date,order_total from wborder where user_id='"&session("id")&"' and order_flag=5 Order by order_num"
如此呢？

谢谢,试了,还是不行,