Janna

انا اعلم ان هناك synchronisation بين الOutlook و الSharepoint بس لا أدري ممكن نتخلى عن الoutlook و ماذا يستعمل الsharepoint بالظبط Pop3 or MAPI or exchange or what???

ألف شكر لك على هذا الشرح المبسط و الكافي أستاذنا الكريم..

انا اعمل ان هناك synchronisation بس لا أدري ممكن نتخلى عن الoutlook ماذا يستعمل الsharepoint بالظبط Pop3 or exchange or what???

شكرا لكم..

ألف شكر لك أخي الكريم..

اخي الكريم.. جعل الله هذا المقال في ميزان حسناتك.. لأنه ببساطة رائع.. لا تبخل علينا بالمزيد..

نعم أخي وفقك الله أولا و آخراً.. هناك شركات عربية تبرمج ألعاباً لا بأس بها أذكر من الألعاب : تحت الرماد و تحت الحصار و أهل الثغور و القوة الخاصة \2 و غيرها الهادفة.. و كما قال الأخ قبلي تقدر تعمل عن طريق الانترنت، تسوي فريق افتراضي و تبيع اللعبة الى شركة عملاقة.. و انا أنصحك أن تراسل الشركات التي أسلفت و من ثم أن يكون من يساعدك كالأصوات و غيرها.. وفققك الله..

السلام عليكم هذا هو الكود لاغلاق الموضوع و للمشاركة مع الجميع.. لقد أغلقت الحقل New لكيلا يعدّل به يدوياً و وضعت على الحقل Barcode الأوامر التالية قبل تحديث السجل.. Private Sub barcodenb_BeforeUpdate(Cancel As Integer) stLinkCriteria = "[barcodeNb]" If DCount("BarcodeNb", "Stock", [barCodeNb] > 0) And Me.NEW.Value = True Then DoCmd.CancelEvent Me.Undo End If [code/][/color][/center]

أختي و أستتاذتي جزيت خيرا لقد أجبرته ان كان الباركود جديدا ان يشغل الNew لوحده و يتأكد أن رقم المنتج أيضا غير مكرر.. أبعثه غدا ان شاء الله لمن أراد.. آسفة لازعاجك..

جزاك الله كل خير أختي.. و لكن انا أقفلت الNew بشكل ان ادخلوا الباركود جديد، و لم يكن موجودا يتحول الNew إلى On فكيف ذلك ?

السلام عليكم طبعا عندي مشكلة قفل رأسي و لم أستطع فكها، فممكن إلقاء نظرة على الكود هذا و انا اضفته بbeforeupdate . جزاك الله خيراً '********************************* 'Code '********************************* Dim SID As String Dim stLinkCriteria As String Dim rsc As DAO.Recordset Set rsc = Me.RecordsetClone SID = Me.BarCodeNb.Value stLinkCriteria = "[BarcodeNb]" If DCount("BarcodeNb", "Stock", _ stLinkCriteria) > 0 Then Me.[NEW] = True MsgBox "This is a New Product" Else MsgBox "No Dupplicate - old but new off" 'Me.[NEW] = True 'MsgBox "This is a New Product" End If End SubPrivate Sub barcodenb_BeforeUpdate(Cancel As Integer)

فقط في حالة الحقل جديد - New On علينا أن نتأكد بأن الأرقام المدخلة غير موجودة .. وشكرا للاهتمام من أحد

السلام عليكم السؤال هو في النموذج الفرعي في النموذج الفرعي إذا كان الحقل New "On، و أدخل باركود اريد ان يتأكد بأن الباركود و الprodId جديدين، و الا ان يعطيني رسالة بأن أعيد إدخال الباركود أو الProdID . فكيف؟ و ها قد أرسلت لكم البرنامج - و بإمكانكم رؤية البضائع التي توضع في الstock Form ِشكراًً جزيلاً Question_No_Duplicate.zip

شكرا لكم جميعا..

يا جماعة ممكن مساعدة ..؟؟ فقط أفكار؟؟