[parvin]

یه برنامه دارم که توش یه بانک با اکسس داره . یکی از فیلدهای این بانک تاریخ ثبت نام هستش. چطوری میتونم تو vb6 اطلاعات این فیلد رو بر اساس تاریخ ثبت نام مرتب کنم؟

[Amin_Mansouri]

Hi everyone!

I have a question here and I can't seem to figure it out...

I have to import this date value to my table as text because initially it has letters and other bad characters in it. I've already removed all of these characters with my code but now I'm trying to sort the RS on open, using SQL, and make sure it's identifying the ApptDate column as a date when sorting. This is what I have but I keep getting Error 13, Type Mismatch.

Any guidance is always greatly appreciated!!


Code :

کد:

Dim rs As Recordset
Dim RSAppt As Recordset

Set RSAppt = CurrentDb.OpenRecordset("Tbl_Advantix_Appts")
Set rs = CurrentDb.OpenRecordset("SELECT * FROM Tbl_Advantix_Appts ORDER BY " & Format(DateValue(RSAppt.Fields("ApptDate")), "MM/DD/YYYY") & " ASC, PatFullName, DOB")
        
rs.MoveFirst
Debug.Print rs.Fields("ApptDate")

اینجا هم به کارت میاد :
http://www.dreamincode.net/forums/topic/...ess-table/

[parvin]

آقا امین میشه یکمی واضح تر توضیح بدین؟

[Amin_Mansouri]

با ADODB کار نکردی ؟
اصلا واسه دیتابیس کار کردی یا مقدماتی هستی ؟

[parvin]

نه از data تو برنامه باید استفاده کنیم. و باید بانکمون با اکسس باشه. این پروژه درسی هستش

[Amin_Mansouri]

فیلدتو رو date/time ست کن
بعد دستور زیر رو بزن
data1.Recordset.Sort
دیتا یه کنترل خیلی قدرتنمدی نیست
اگر جوابتو نداد دیتابیس رو که ساختی بزار تا برنامشو بنویسیم

[parvin]

data1.recordset.sort جواب نداد. یا اینکه من بلد نیستم استفاده کنم. من می خوام تو فرمم وقتی یک دکمه رو زدم لیست اعضای توی بانک رو بر اساس تاریخ ثبت نامشون مرتب کنه و مرتب شده رو نشون بده . نمیدونم متوجه منظورم شدین یا نه؟

[Amin_Mansouri]

پروژتو بزار طراحیشو انجام بده
و بعد اپلودش کن تا یه نگاه بهش بندازم