01-12-12, 03:05 PM
تفضل الكود :
PHP كود :
If RS.State = 1 Then RS.Close
sql = "select * from Tabelname where Fieldname =" & Text1.Text & ""
RS.Open sql, DB, adOpenKeyset, adLockOptimistic
RS![Field1] = Text1.Text
RS![Field2] = Text2.Text
RS![Field3] = Text3.Text
RS.Update
MsgBox " تمت عملية التعديل بنجاح", vbInformation
سبحان الله وبحمده سبحان الله العظيم
آللهم لگ آلحمد حتى ترضى .. ولگ آلحمد إذا رضيِت .. ولگ آلحمد بعد آلرضآ
آللهم لگ آلحمد حتى ترضى .. ولگ آلحمد إذا رضيِت .. ولگ آلحمد بعد آلرضآ