یک مشکل خیلی اساسی در check ها

[jaber]

با سلام من یک مشکل حل نشدنی برام پیش اومده که نمی تونم درست کنم

من تو این سورس که اتچ کردم می خوام مقدار

check1 , check 2

در دیتابیس ذخیره بشه اما در موقع فعال بودن تیک ها وگرنه ذخیره نشه

من اینکار رو کردم به صورت0 و 1 نشون میده اما میخوام

کپشن فایل ذخیره بشه نه اون عدد 0 و 1

ممنون می شم هر کی سورس رو برام درست کنه و اینجا اتچ کنه

[arnh]

من به برنامه نگاه کردم.
اما منظور از کپشن رو نفهمیدم .
کپشن چی رو می خوای . چک باکس رو یا چیز دیگه ای .

[hamed_Arfaee]

کدهات رو بصورت زیر تغییر بده

کد:

Private Sub Command1_Click()
Adodc1.Recordset.AddNew
DataGrid1.AllowAddNew = True
Adodc1.Recordset.Fields(0).Value = Text1
Adodc1.Recordset.Fields(1).Value = Text2
If Check1 Then Adodc1.Recordset.Fields(2).Value = Check1.Caption
If Check2 Then Adodc1.Recordset.Fields(3).Value = Check2.Caption
Adodc1.Recordset.Update
DataGrid1.AllowUpdate = True
End Sub

[jaber]

سلام آقای hamed_Arfaee به خدا تو آخر معرفت آنلانی خیلی ممنون از کمکت

اما اگه میشه به این بخش هم برین ممنون می شم اگه اینو هم جواب بدین

http://forum.iranvig.com/showthread.php?tid=3743
و
http://forum.iranvig.com/showthread.php?tid=3703&page=3

امیدوارم که این هم بتونی اگه برام انجام بدی یک هدیه از طرف من داری