PDA

View Full Version : سوال: مشکل یا دیتاگرید در vb6


ایلیا آخوندزاده
یک شنبه 13 بهمن 1392, 23:39 عصر
من میخوام تو vb6 دیتاگریدم رو از پایین نشون بده (آخرین رکورد ثبت شده) آیا ممکنه؟
vbhamed
دوشنبه 14 بهمن 1392, 00:06 صبح
سلام
بايد اطلاعات رو به صورت برعكس مرتب كنيد، مثلا اگر فيلد Id داريد دستور Sql به شكل زير باشه
Select * from table_name order by id desc
ایلیا آخوندزاده
دوشنبه 14 بهمن 1392, 00:18 صبح
سلام
بايد اطلاعات رو به صورت برعكس مرتب كنيد، مثلا اگر فيلد Id داريد دستور Sql به شكل زير باشه
Select * from table_name order by id desc

مشکلم حل شد فقط یه سوال دیگه هم داشتم اونم اینکه من یه نرم افزار ثبت نوشتم و به طور AutoNumber شماره گذاری میکنه و میخوام شماره ردیف جدید رو که میخواد روی اون ثبت کنه رو نشون بده! میشه کمک کنید
vbhamed
دوشنبه 14 بهمن 1392, 10:57 صبح
سلام
با دستور زير آخرين شماره رو بدست بياريد، يكي بهش اضافه كنيد و نشون بديد
Select Count(*)+1 As NewRow From table_name
ایلیا آخوندزاده
دوشنبه 14 بهمن 1392, 12:05 عصر
سلام
با دستور زير آخرين شماره رو بدست بياريد، يكي بهش اضافه كنيد و نشون بديد
Select Count(*)+1 As NewRow From table_name
ببخشید چون من مبتدی هستم میشه بفرمایید این کد رو کجا باید قرار بدم؟
vbhamed
دوشنبه 14 بهمن 1392, 13:12 عصر
سلام
در خاصيت RecordSource يك كنترل ديتا يا ADO
از DAO استفاده مي‌كنيد يا Adodc يا Adodb ؟
ایلیا آخوندزاده
دوشنبه 14 بهمن 1392, 13:57 عصر
سلام
در خاصيت RecordSource يك كنترل ديتا يا ADO
از DAO استفاده مي‌كنيد يا Adodc يا Adodb ؟
از adodc استفاده میکنم
درضمن استاد میخوام روی یک لیبل یا تکس باکس شماره بعدی نشون داده بشه
vbhamed
دوشنبه 14 بهمن 1392, 17:10 عصر
سلام
مسير ديتابيس و نام جدول خودتون رو بزاريد

Dim cnn As New ADODB.Connection
Dim rst As New ADODB.Recordset
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Test.mdb;Persist Security Info=False"
cnn.Open

rst.LockType = adLockOptimistic
rst.Open "Select Count(*)+1 As NewRow From table_name", cnn, adOpenDynamic

Label1 = Val(rst!newrow & "")
rst.Close
cnn.close
ایلیا آخوندزاده
سه شنبه 15 بهمن 1392, 11:48 صبح
قبول نمیکنه نام جدولم هم come است نام شیئ هم adodc1 می باشد
vbhamed
سه شنبه 15 بهمن 1392, 16:20 عصر
سلام
از روي عبارت قبول نمي‌كنه نميشه فهميد مشكل چيه، اگر پيام خطايي هست دقيق بزاريد وگرنه برنامتون رو بزاريد تا بررسي بشه
ایلیا آخوندزاده
پنج شنبه 24 بهمن 1392, 12:57 عصر
سلام
از روي عبارت قبول نمي‌كنه نميشه فهميد مشكل چيه، اگر پيام خطايي هست دقيق بزاريد وگرنه برنامتون رو بزاريد تا بررسي بشه
استاد میشه این کد رو رو یه پروژه با شئ های adodc , datagrid ,label سوار کنین و ضمیمه اش کنید ؟