mah110011

انشا مودل جديد واكتب Function convert_date(aa As TextBox) Dim a, F As String If aa.text = " " Then GoTo 100 If Len(aa.text) < 8 Then GoTo 100 a = aa.Value If Mid(a, 4, 1) = "/" Then F = Mid(a, 5, 1) + Mid(a, 6, 1) + Mid(a, 7, 1) + Mid(a, 8, 1) + "/" + Mid(a, 3…

باسمه تعالى نعم مااريده هو طباعة اسم المستخدم في اسفل كل تقرير وشكرا على سرعة الاجابة

باسمه تعالى كيف نعرف اسم المستخدم الذي قال بطباعة تقرير مثلا على احد كومبيوترات الشبكة؟