فتى الوادي قام بنشر سبتمبر 14, 2005 قام بنشر سبتمبر 14, 2005 السلام عليكم .... ما هي الصيغة المطلوبة لتعديل سجل وذلك باستخدام عبارة SQL جزاكم الله خير .
محمد طاهر عرفه قام بنشر سبتمبر 15, 2005 قام بنشر سبتمبر 15, 2005 في حالة الحقل الرقمي لتحديث قيمة الي 100 DoCmd.RunSQL "UPDATE [tablename] SET [tablename].[fieldname] = " & 100 & " where(((tablename.fieldname)=[Forms]![formname]![fieldname]));" فى حالة الحقل النصي مطلوب تحديثه الي fff DoCmd.RunSQL "UPDATE [tablename] SET [tablename].[fieldname] = '" & "fff" & "' where(((tablename.fieldname)=[Forms]![formname]![fieldname]));" مثال لتحديث كلمة السر فى جدول بعد التأكد من اسم المستخدم و كلمة السر الحالية حيث هناك مربع نص علي النموذج به اسم المستخدم و كلمة السر و يقوم المستخدم بادخال كلمة السر القديمة و بعد مقارنتها بالاصلية يتم ادخال القيمة الجديدة و تحديثها فى الجدول Private Sub CmdChangePass_Click() Dim x, xx As String x = InputBox("Enter your current password", "Change your password - Step 1") If x = Me.PASS Then xx = InputBox("Enter your new password", "Change your password - Step 2") DoCmd.SetWarnings False DoCmd.RunSQL "UPDATE [USER] SET [USER].[Password] = '" & Trim(xx) & "' where(((USER.Initials)=[Forms]![Start]![users]));" MsgBox "password changed !! ", vbExclamation, "Confimation message" DoCmd.SetWarnings True Else MsgBox "Sorry wrong password", vbCritical, "Incorrect Current Password" Exit Sub End If End Sub
فتى الوادي قام بنشر سبتمبر 16, 2005 الكاتب قام بنشر سبتمبر 16, 2005 السلام عليكم ... أخي وأستاذي محمد طاهر ... غفر الله لي ولك .... هب أحظى بمثال على ما ذكرت
فتى الوادي قام بنشر سبتمبر 16, 2005 الكاتب قام بنشر سبتمبر 16, 2005 أستاذنا محمد طاهر .... غفر الله لك ولوالديك ...... لقد عرفت تركيبة الكود المطلوب عندي ... وقد أستفدت من مثالك جداً ... تحياتي وتشكراتي ... والسلام عليكم .
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.