مشکل مرتب سازی در ویبی

[v.b.f1]

با سلام خدمت دوستان من یه مشکل تو مرتب سازی دارم مثلا من چندتا ستون دارم یکیش پلاکه و یکی دیگه رنگ
خب تونستم جداجدا مرتبشون کنم اما میخوام دوتاش با هم مرتب سازی بشه مثلا روی اپشن کلیک کردم دو ستون pelak و rang باهم مرتب بشه مابین همه ستون ها
این کدها جدا واسه مرتب سازی بر اساس پلاکه

Private Sub Option3_Click()
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from shopcar order by pelak"
Adodc1.Refresh
End Sub

اینم واسه رنگه
Private Sub Option4_Click()
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from shopcar order by rang"
Adodc1.Refresh
End Sub

جدولش Shopcar
حالا من خودم فکر میکنم باید یه جوری این دوتا رو کنار هم بنویسم مثلا مثل کد زیر اما چون کد نویسیم خوب نیست ایراد گرفت ولی میدونم جاش همینجاست


Private Sub Option4_Click()
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from shopcar order by pelak,rang"
Adodc1.Refresh
End Sub


با تشکر

 

[the_king]

Adodc1.RecordSource = "SELECT * FROM shopcar ORDER BY pelak ASC, rang ASC"