PDA

View Full Version : سوال: وارد شدن خودکار نام در تکست بوکس



azadich
سه شنبه 01 اسفند 1391, 20:35 عصر
با سلام خدمت اساتید محترم، می خوام در نمونه ای که گذاشتم طوری اصلاح شود که موقعی که کد وارد کردی نام در تکست دومی به صورت خودکار بیاد.خیلی ممنون میشم.زیاد گشتم نمونه پیدا نشد خواهش میکنم اصلاح فرمایید.

SlowCode
سه شنبه 01 اسفند 1391, 21:11 عصر
سلام
نمیدونم چرا هرکی میاد سوال میپرسه میگه: گشتم ولی چیزی پیدا نکردم!
شما باید کار با دیتابیس رو یاد بگیری. دوستان قبلا چندتا نمونه واسه لاگین گذاشته بودن. به هر حال...

با کد زیر میتونی اسم رو بدست بیاری:

data1.recordsource="select * from Table1 where a='" & text1 & "'"
data1.refresh
text2=data1.recordset.fields("1").value


این کد رو نگاه کن ولی برو کار با دیتابیس رو از صفر یاد بگیر، ایرادات زیادی داشتی مثلا:
1- فیلدها رو درست نامگذاری کن
2- فیلدی که توش کد رو نگه میداری از نوع Auto number انتخاب کن تا خودش اضافه کنه. اینجا از نوع text انتخاب کردی که خوب نیست.
3- آدرس دیتابیس رو واسه کنترل Data با کد نویسی تنظیم کن و DataBaseName رو از پراپرتیزش حذف کن. این کد رو بنویس:
Data1.DataBaseName=app.path & "\aaa.mdb"

azadich
سه شنبه 01 اسفند 1391, 21:25 عصر
سلام
نمیدونم چرا هرکی میاد سوال میپرسه میگه: گشتم ولی چیزی پیدا نکردم!
شما باید کار با دیتابیس رو یاد بگیری. دوستان قبلا چندتا نمونه واسه لاگین گذاشته بودن. به هر حال...

با کد زیر میتونی اسم رو بدست بیاری:

data1.recordsource="select * from Table1 where a='" & text1 & "'"
data1.refresh
text2=data1.recordset.fields("1").value


این کد رو نگاه کن ولی برو کار با دیتابیس رو از صفر یاد بگیر، ایرادات زیادی داشتی مثلا:
1- فیلدها رو درست نامگذاری کن
2- فیلدی که توش کد رو نگه میداری از نوع Auto number انتخاب کن تا خودش اضافه کنه. اینجا از نوع text انتخاب کردی که خوب نیست.
3- آدرس دیتابیس رو واسه کنترل Data با کد نویسی تنظیم کن و DataBaseName رو از پراپرتیزش حذف کن. این کد رو بنویس:
Data1.DataBaseName=app.path & "\aaa.mdb"
تشکر فراوان می کنم درسته کد باید اتونامبر بشه. حالا این کد را کجا بزارم.ببخشید

azadich
سه شنبه 01 اسفند 1391, 21:34 عصر
سلام
نمیدونم چرا هرکی میاد سوال میپرسه میگه: گشتم ولی چیزی پیدا نکردم!
شما باید کار با دیتابیس رو یاد بگیری. دوستان قبلا چندتا نمونه واسه لاگین گذاشته بودن. به هر حال...

با کد زیر میتونی اسم رو بدست بیاری:

data1.recordsource="select * from Table1 where a='" & text1 & "'"
data1.refresh
text2=data1.recordset.fields("1").value


این کد رو نگاه کن ولی برو کار با دیتابیس رو از صفر یاد بگیر، ایرادات زیادی داشتی مثلا:
1- فیلدها رو درست نامگذاری کن
2- فیلدی که توش کد رو نگه میداری از نوع Auto number انتخاب کن تا خودش اضافه کنه. اینجا از نوع text انتخاب کردی که خوب نیست.
3- آدرس دیتابیس رو واسه کنترل Data با کد نویسی تنظیم کن و DataBaseName رو از پراپرتیزش حذف کن. این کد رو بنویس:
Data1.DataBaseName=app.path & "\aaa.mdb"
اگه لطف کنید رو نمونه اصلاح فرمایید بی نهایت ممنون میشم

azadich
چهارشنبه 02 اسفند 1391, 13:23 عصر
اگه لطف کنید رو نمونه اصلاح فرمایید بی نهایت ممنون میشم
فرمول رو تو دکمه گذاشتم ولی جواب نداد