PDA

View Full Version : سطح کاربری دستی



Fazaeli
چهارشنبه 20 اردیبهشت 1385, 20:20 عصر
یک فرم دارم که با دستور ifنام کابری ورمز عبور (تکست باکس وکمبو باکس)برایش درست کردم که اگر رمز عبور ورودی فرم با تیبل یکی باشد فرم اصلی برنامه را باز کند میخواهم هر نام کابری که وارد میشود باپسورد مخصوص خود نامش را هم در فرم اصلی تایپ کند وهم بتوانم بوسیله یک تکست باکس روی فرم درفیلدی در تیبل اصلی آن را ذخیره کنم.لطفاَ هر چه سریعتر جواب مرا بدهید
باتشکر

moustafa
جمعه 22 اردیبهشت 1385, 09:50 صبح
برنامه ات را بذاریه مقدار توضیح بده کی چی میخواهی
اگه بخواهم اینطور جواب بدم ممکنه ارور بده ومنتج به سوالات دیگر بشه

Fazaeli
شنبه 23 اردیبهشت 1385, 19:53 عصر
برنامه ات را بذاریه مقدار توضیح بده کی چی میخواهی
اگه بخواهم اینطور جواب بدم ممکنه ارور بده ومنتج به سوالات دیگر بشه
دوست عزیز سلام
فایلم گذاشتم حتمی text رو هم مطالعه کن(یالینک زیر رو وارد شو لطفاً)
من میخواهم وقتی userوارد میشودمن بتوانم نام USERرا در فرمها داشته باشم مثلاًnوارد میشود به صفحه بعد از loginدرهرجا که من بخواهم چه در فرم چه در کئری هر گاه خواستم بدانم که وارد شده( به من بگوید) یا اصلاً تمام صفحات ورودی آن کاربر با نام او مشخص شود وبتوانم نام او را در تیبلها بصورت دیفالت ذخیره کنم.
باتشکر

moustafa
یک شنبه 24 اردیبهشت 1385, 20:17 عصر
اگر منظورت درست متوجه شدم :
در رویداد کلیک باتن go بجای بستن فرم ویزیبل ان را فالز کردم درصورتی که شرط درست باشد

Me.Visible = False
این کدهم به فرم اسلش اضافه کردم

Private Sub Form_Open(Cancel As Integer)

Me.Caption = Forms!frmlogon!cboEmployee.Column(1)
End Sub
هر کاربر نامش در فرم نشان داده میشه

متاسفانه فایل اپلود نشد

Fazaeli
دوشنبه 25 اردیبهشت 1385, 00:00 صبح
اگر منظورت درست متوجه شدم :
در رویداد کلیک باتن go بجای بستن فرم ویزیبل ان را فالز کردم درصورتی که شرط درست باشد

Me.Visible = False
این کدهم به فرم اسلش اضافه کردم

Private Sub Form_Open(Cancel As Integer)

Me.Caption = Forms!frmlogon!cboEmployee.Column(1)
End Sub
هر کاربر نامش در فرم نشان داده میشه

متاسفانه فایل اپلود نشد
دوست عزیز سلام
خیلی کمکم کردی ممنون
اما من هنوز قادر نیستم نام USERدر هر tableی که خواستم ذخیره کنم مثلا وقتی کاربر nرمزواسم خود راوارد میکند وارد صفحه بعد میشود اگر در آن صفحهtableمتصل باشد به فرم وآقای n
اطلاعات خود را وارد کند اتوماتیک نام کاربر را در tableذخیره کند(قبل در tableفیلدتعریف شده)

moustafa
دوشنبه 25 اردیبهشت 1385, 06:24 صبح
نمونه و تیبل بذار در ان دقیقا مشخص کن چی می خواهی

Fazaeli
دوشنبه 25 اردیبهشت 1385, 08:00 صبح
نمونه و تیبل بذار در ان دقیقا مشخص کن چی می خواهی
یک نمونه گذاشتم با توضیحات بالا امیدوارم منظورم متوجه بشوید
خیلی ممنون

moustafa
دوشنبه 25 اردیبهشت 1385, 15:12 عصر
Private Sub Form_Open(Cancel As Integer)
On Error Resume Next
DoCmd.GoToRecord acDataForm, "maintbl", acNewRec
User = Forms!frmlogon!cboEmployee.Column(1)
End Sub
این فرم باید پس از فرم لاگین باز شود

Fazaeli
دوشنبه 25 اردیبهشت 1385, 15:48 عصر
Private Sub Form_Open(Cancel As Integer)
On Error Resume Next
DoCmd.GoToRecord acDataForm, "maintbl", acNewRec
User = Forms!frmlogon!cboEmployee.Column(1)
End Sub
این فرم باید پس از فرم لاگین باز شود
دوست عزیز سلام
وبا تشکر از حسن توجه شماخیلی عالی وآموزنده بود برای من، ولی
میدونم گیر دادم !!!!!اما چه جوری میشود بدون خروج از فرم برای رکوردهای بعدی user موردنظر در فیلد خودش قرارگیرد مثلاً با n وارد شدم تمام رکوردهای ورودی توسط nدر تیبل ذخیره شود در DEMO درست شده توسط شما باید حتماًیک بار از فرم خروج شود
باتشکر
ممنون از پاسخ های زیبا وآموزندیتان

moustafa
دوشنبه 25 اردیبهشت 1385, 17:49 عصر
در هرکجا که خواستی با دستور

Docmd.RunSQL("insert into table1(user) values(Forms!frmlogon!cboEmployee.Column(1)")(
اطلاعات را وارد کن پس از ورود توسط فرم لاگین از طریق دکمه go یا پس از بسته باز شدن یا بسته شدن فرم اشلش بعد از ان
البته کد بالا را ازلحاظ نام جدول و دابل کوتیشن و سینگل کوتیشن اصلاح کن من یذره تنبلی کردم

moustafa
دوشنبه 25 اردیبهشت 1385, 18:04 عصر
راستی نکنه منظورت اینکه در فرم فوق نام یوزر برای رکورد بعدی default بشه ؟
یعنی اول که فرم باز میشه یه رکورد جدید با نام کاربر وارد میشه رکوردهای بعدی که دستی توسط شما ایجاد میشه دوباره نام کاربر خودکار وارد بشه ؟
اگه اون میخواهی در تاپیک "رکورد defualt " جواب ان را دادم
http://www.barnamenevis.org/forum/showthread.php?t=44942

Fazaeli
دوشنبه 25 اردیبهشت 1385, 20:19 عصر
راستی نکنه منظورت اینکه در فرم فوق نام یوزر برای رکورد بعدی default بشه ؟
یعنی اول که فرم باز میشه یه رکورد جدید با نام کاربر وارد میشه رکوردهای بعدی که دستی توسط شما ایجاد میشه دوباره نام کاربر خودکار وارد بشه ؟
اگه اون میخواهی در تاپیک "رکورد defualt " جواب ان را دادم
http://www.barnamenevis.org/forum/showthread.php?t=44942
دوست عزیز سلام
میشه فایل اکسس من رو اصلاح کنی منظور من همینه(تاپیک رکورد defualt )،ولی Error میده
سعی میکنم دیگه اذیتتون نکنم
باتشکر

moustafa
دوشنبه 25 اردیبهشت 1385, 22:38 عصر
دستور1

Private Sub Form_BeforeInsert(Cancel As Integer)
On Error Resume Next
DoCmd.GoToRecord acDataForm, "maintbl", acLast
m = CYL
n = ID
DoCmd.GoToRecord acDataForm, "maintbl", acNewRec
CYL = m
ID = n + 1
User = Forms!frmlogon!cboEmployee.Column(1)
SPH.SetFocus
End Sub
دستور2

Private Sub Form_Open(Cancel As Integer)
DoCmd.GoToRecord acDataForm, "maintbl", acNewRec
End Sub
دستور3:

Private Sub SPH_GotFocus()
SPH = 1
End Sub
فیلد id را از اتو نامبر به نامبر تبدیل کردم
فیلد date را به datecur

شاپرک
سه شنبه 26 اردیبهشت 1385, 07:15 صبح
جالب بود ممنون

Fazaeli
چهارشنبه 27 اردیبهشت 1385, 15:11 عصر
خیلی خیلی ممنون

moustafa
چهارشنبه 27 اردیبهشت 1385, 17:33 عصر
بالاخره اون چیزی را که میخواستی شد یا رودرواسی گیر کردی
مشکلی نیست ادامه بده

tooba1380
شنبه 06 خرداد 1385, 09:10 صبح
دوست عزیز سلام
شما ابتدا یک تیبل بنام یوزرها بسازید و در یک فرم که به این تیبل وصل است یوزر نیم و پسور بگذارید و بعد اگر یوزر نیم و پسورد درست بود فرم را هایدHide نمایید. و هرجا که خواستی در فرمها یوزر را نمایش بدهید دیفالت ولیو و یا کنترل سورس آن را با این فرم اراتباط دهید.

asfs110
شنبه 01 اردیبهشت 1386, 15:40 عصر
شما در فرم یک combobox گذاشته و ادیت یا ماسک ادیت و در formactive آن همه فیلد های کاربری یعنی یوزر را اتوماتیک در آن بریزد و در combobox دستور if همخوانی یوزر و پسورد را نوشته.
در ضمن کد های مربوطه را تا 2 روز دیگر برای شما می فرستم.

Tiamijavad
پنج شنبه 17 دی 1388, 16:33 عصر
fبا سلام من میخوام فرمی طراحی کنم که ضمن اینکه از پرسنل یوزر و پسورد میگیره نام کاربری آن یوزر رو، هم در جدول مر بوط به اون فرم بده یعنی در ردیف نام واحد در Table و هم در بالای فرم با عنوان نام واحد مربوطه نشون بده تا فرد نتونه اطلاعات غلطی رو در واحد دیگه ای ثبت کنه. به عنوان مثال یوزر با نام Edari و پسووردش وارد می شه ولی در لینک هایی که گفتم نام "امور اداری و منابع انسانی"ثبت بشه. خیلی برام حیاتیه کمک