سجل للزوار خاص بالمواقع

موضوع منقول من المنتدي القديم

الكاتب: سعودي 31

هذا برنامج ( نكبر رأسه شوي ) وهو عبارة عن سجل للزوار خاص بالمواقع .

وأريد منكم الآتي :

أولاً : رأيكم بكل صراحة في البرنامج وما فيه من أكواد ( وتراها من صنع واحد غشيم في البرمجة أو على قولة إخواننا في مصر على أد حاله ) وهو أخوكم في الله .

ثانياً : هل يمكن أن تكشف كلمة المرور في السجل هذا ( أعتقد أنه ممكن من خبراء أمثالكم )

ثالثاً : ما فيه ثالثاً ولا شيء ما فيه إلا سلامتكم .

http://mypage.ayna.com/kuo_kou/sejeel_z.zip

وتقبلوا تحياتي

أعيد وضع البرنامج وتراني أكتب لكم من متصفح 5 فقط ليس 5.5 أو 6

http://mypage.ayna.com/kuo_kou/sejeel_z.zip

رد جارث :

مشكور

مشكور على البرنامج الجميل وجزاك الله خير

بالنسبة لكلمة المرور توصلت إليها عن طريق الخطوات التالية :

أولا استوردت الجدول MSysObjects

ومنه عرفت أسماء الجداول في قاعدة البيانات عندك

ثانيا قمت باستيراد الجدول Pass وذلك بالكود التالي :

    DoCmd.TransferDatabase acImport, "Microsoft Access", "C:11.mde", acTable, "pass", "Newpass", False
حيث "C:11.mde" هو مسار واسم قاعدة البيانات في الجهاز عندي (بعد تعديل الاسم)

ثالثا : بعد استيراد الجدول لاحظت أنه لا زال مخفيا فأظهرته بالكود التالي 
    Set dbs2 = CurrentDb
    For Each tdf In dbs2.TableDefs
    If Left(tdf.Name, 4) <> "msys" And tdf.Attributes <> 1073741824 _
    And tdf.Attributes = 1 Then
            tdf.Attributes = tdf.Attributes - dbHiddenObject
    End If
    Next tdf
    Set dbs2 = Nothing

رابعا : فتحت الجدول في طريقة عرض التصميم وأزلت قناع الإدخال

ثم عرضت الجدول وأظهرت الإعمدة وظهرت كلمة المرور

جزاك الله خير مرة أخرى