سلام
من میخوام وقتی کاربر میخواد روی رکورد مسافر خاصی ویرایش انجان بده ابتدا برحسب کد مسافر اطلاعات مسافر رو در یک فرم دیگه ببینه و بتونه این ویرایش ها رو ثبت کنه
من جستجو رو انجام میدم پیدا هم میکنه داخل فرم ویرایش هم نشون میده
ولی در فرم ویرایش وقتی ثبت ویرایش رو میزنم ERror میده که نمیتونه فیلدهای ایم فرم رو update کنه
این کد مربوط به جستجومه
If txtcode.Text = "" Then
b = MsgBox("etelat baraye jostejo kafi nist")
Else
Adodc1.RecordSource = "select * from moshtari where kodmoshtari like '" & txtcode.Text & "%'"
Adodc1.Refresh
If Adodc1.Recordset.EOF = False Then
Label2.Visible = False
Label2.Caption = Str(Adodc1.Recordset.RecordCount) + " mored peida shod"
a = MsgBox(Label2.Caption)
frmafzmosafer.Adodc1.Recordset.Fields!kodmoshtari = Adodc1.Recordset.Fields!kodmoshtari
frmafzmosafer.Adodc1.Recordset.Fields!Name = Adodc1.Recordset.Fields!Name
frmafzmosafer.Adodc1.Recordset.Fields!family = Adodc1.Recordset.Fields!family
frmafzmosafer.Adodc1.Recordset.Fields!namepedar = Adodc1.Recordset.Fields!namepedar
frmafzmosafer.Adodc1.Recordset.Fields!kodmeli = Adodc1.Recordset.Fields!kodmeli
frmafzmosafer.Adodc1.Recordset.Fields!shomareshena sname = Adodc1.Recordset.Fields!shomareshenasname
frmafzmosafer.Adodc1.Recordset.Fields!tel = Adodc1.Recordset.Fields!tel
frmafzmosafer.Adodc1.Recordset.Fields!adres = Adodc1.Recordset.Fields!adres
frmafzmosafer.Adodc1.Recordset.Fields!tariktavalod = Adodc1.Recordset.Fields!tariktavalod
frmafzmosafer.Adodc1.Recordset.Fields!meliat = Adodc1.Recordset.Fields!meliat
frmafzmosafer.Adodc1.Recordset.Fields!tedadhamrah = Adodc1.Recordset.Fields!tedadhamrah
frmafzmosafer.Adodc1.Recordset.Fields!mahaletavalo d = Adodc1.Recordset.Fields!mahaletavalod
frmafzmosafer.Adodc1.Recordset.Fields!tarikhevorod = Adodc1.Recordset.Fields!tarikhevorod
frmafzmosafer.Adodc1.Recordset.Fields!shomareotagh = Adodc1.Recordset.Fields!shomareotagh
frmafzmosafer.Show
Else
a = MsgBox("peyda nashod")
End If
End If
واینم کد مربوط به دکمه ثبت ویرایشم
Adodc1.Recordset.Update
خیلی گشتم ولی پیزی پیدا نکردم کمکم کنین.مرسی
بچه ها خواهش می کنم زودتر جوابمو بدین
پروژه ی پایان ترممه