سلام دوستان یه سوال واجب و فوری داشتم، دلیل خطای زیر چیه و چطوری میشه رفعش کرد؟
لطفا عجله کنید!
سلام دوستان یه سوال واجب و فوری داشتم، دلیل خطای زیر چیه و چطوری میشه رفعش کرد؟
لطفا عجله کنید!
شايد بين نوع فيل هاي بانك اطلاعتيتون و مقداري كه مي خواين توي اون بريزين تفاوت باشه؛مثلا يك متن رو كه حاويه حروف باشه رو بخواي وارد فيلدي بكني كه نوعش number باشه.
سلامسلام دوستان یه سوال واجب و فوری داشتم، دلیل خطای زیر چیه و چطوری میشه رفعش کرد؟
آیا از کامپوننت DateBox استفاده می کنید؟
نخیر فقط از تکست باکس استفاده کردم.آیا از کامپوننت DateBox استفاده می کنید؟
نه پیغام اون فرق می کنه.شايد بين نوع فيل هاي بانك اطلاعتيتون و مقداري كه مي خواين توي اون بريزين تفاوت باشه؛مثلا يك متن رو كه حاويه حروف باشه رو بخواي وارد فيلدي بكني كه نوعش number باشه.
مسئله اینه که وقتی کد زیر رو اجرا می کنه خطا میده:
Data1.recordset.Addnew
آخرین ویرایش به وسیله SlowCode : سه شنبه 08 آذر 1390 در 16:01 عصر
سلاممسئله اینه که وقتی کد زیر رو اجرا می کنه خطا میده:
Data1.recordset.Addnew
شما کد کامل این قسمت رو بزارید تا بررسی بیشتری بشه؟
در ضمن از چه کنترلی به بانک متصل می شید؟
از کنترل Data استفاده می کنم.
Private Sub CmdNew_Click()
Data1.Recordset.AddNew
End Sub
Private Sub CmdSave_Click()
Data1.Recordset.Update
End Sub
البته داده ها رو ذخیره می کنه ولی هنگام اجرای هر دوتا خط اون پیغام رو میده.
آقای محسن 15
پیشنهاد من اینه که از کنترل ado استفاده کنید.
برای متصل شدن به بانک هم از کد زیر استفاده کنید :
برای درج :کد HTML:On Error Resume Next Adodc1.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source= " & App.Path & "\Bank.accdb ;Jet OLEDB:Database Password=;" Adodc1.RecordSource = "SELECT * FROM Table " Adodc1.Refresh
برای حذف :کد HTML:On Error Resume Next Adodc1.Recordset.AddNew Adodc1.Recordset.Fields("name")="ali" Adodc1.Recordset.Update
و ...کد HTML:On Error Resume Next Adodc1.Recordset.Delete