PDA

View Full Version : form buileder



mohammad_d
یک شنبه 21 دی 1382, 10:22 صبح
be name khoda
ba salam
1 - formi jahate vorode dadeh sakhteham ke yeki az fieldha ye an "code" mibashad
(data base dar access ast) va anra primery key tarif kardeh am .
hengami ke user code tekrary vared mikonad errore englisi midahad
ba che dastory dar vb anra control konam ta betavanam peyghame farsi bedaham.
2 - pas az vorode etelat dar form aya mishavad ba yek dastor dadehaye ghabli ke dar form
vorodi moshahede mishavad pak kard?
3 - dar foxpro hengami ke bekhahim roye do bank kar konim az dastoore
sele 1
use table1
....
......
sele 2
use table2
..........
........


estefadeh mishavad moadele an dar vb chist ?
******
ba tashakkor
darayi mohammad

الهام تفریشی
یک شنبه 21 دی 1382, 10:54 صبح
این جواب سوال اولتون
http://www.barnamenevis.org/forum/viewtopic.php?t=5530

الهام تفریشی
یک شنبه 21 دی 1382, 11:54 صبح
جواب سوال دوم
شما باید دستی یعنی با کد نویسی این کارو بکنی
Private Sub
ClearAll()
Dim FCont As Control

For Each FCont In Me
If TypeOf FCont Is TextBox Then FCont = ""
Next


End Sub
حالا به جای textbox میتونی هر object رو که تو صفحه بکار بردی قرار بدی
این تابع رو بعد از عمل Save کردن قرار بده
به غیر از این راه هم میتونی هر object رو مستقیما خالی کنی به این شکل
textbox1.text = ""

کم حوصله
یک شنبه 21 دی 1382, 20:07 عصر
این تابع رو بعد از عمل Save کردن قرار بده

:shock:

چرا ؟؟ به چه علت ؟؟؟؟ :!:
مزیت این چیه؟؟؟ :!:

اصلا به چه دردی می خوره ؟؟؟ که اطلاعات را پاک کنی ؟؟؟ :? :shock: :roll: :!: :?: :idea:

الهام تفریشی
دوشنبه 22 دی 1382, 07:33 صبح
نقل قول:
این تابع رو بعد از عمل Save کردن قرار بده

چرا ؟؟ به چه علت ؟؟؟؟
برای اینکه ایشون میخواد وقتی اطلاعات رو ذخیره کرد باکس هایی که تو صفحه داره خالی بشه
حالا اگه این تابع رو جای دیگه صدا کنه فایده ای نداره باید بعد از ذخیره کردن این تابع رو صدا کنه دیگه


اصلا به چه دردی می خوره ؟؟؟ که اطلاعات را پاک کنی ؟؟؟
سلیقه ای

mohammad_d
دوشنبه 22 دی 1382, 08:50 صبح
به نام خدا
با تشکر
تا من دو تای اولی را چک کنم یک نفر جواب سوال 3 (sele 1 and sele 2 )را هم بدهد

کم حوصله
دوشنبه 22 دی 1382, 09:27 صبح
مرسی خانم تفریشی معذرت من سئوالشو کامل نخونده بودم چون فینگلیش نوشته بود اصلا حوصله خوندنش و جواب دادنش را نداشتم !!! :mrgreen:

قابل توجه دوستانی که فینگلیش می نویسند :-x :-x

در مورد سئوال 2
شما می توانید به هر تعداد که می خواهید در فرمتان شی ارتباطی داشته باشید(ado.dao.rdo...)
حال هر شی را کافی است به جدول خاص خود وصل کنید و از آن طریق کار کنید


dim dbc as adodb.connection
dim Tmp as adodb.recordset
dim Tmp1 as adodb.recordset
dim Tmp2 as adodb.recordset
dim Tmp3 as adodb.recordset
set dbc = new adodb.connection
set tmp = new adodb.recordset
set tmp1 = new adodb.recordset
set tmp2 = new adodb.recordset
set tmp3 = new adodb.recordset
dbc.open "providr ...."
tmp.open "select * from Tbl1",dbc,adado....
tmp.open "select * from Tbl2",dbc,adado....
tmp.open "select * from Tbl3",dbc,adado....
tmp.open "select * from Tbl4",dbc,adado....


به همین راهتی الان می تونی روی 4 تا جدول کار کنی کافی است او شی مورد نظر را که به جدول مورد نظرت اشاره می کنه صدا کنی !!! :wink: :mrgreen:

خوش باشی :P

A.Noor
دوشنبه 22 دی 1382, 09:34 صبح
با سلام
در وی‌بی به بانک کانکشن می‌زنید و روی آن رکوردست ( یا رکوردستهایتان ) را تعریف می‌کنید . این رکوردست است که به Table مورد نظر شما وصل شده . بنابراین وقتی می‌خواهید از فیلدهای Table استفاده کنید باید نام رکوردست را ذکر کنید و لازم نیست که بین جدولها سوپیچ کنید ( با چیزی شبیه Select در فاکس پرو ) .
مجموعه این مباحث در Ado آمده . ( به کتابهای آموزشی مراجعه کنید )

کم حوصله
دوشنبه 22 دی 1382, 09:54 صبح
در مورد سئوال 2

ببخشید اشتباه شد منظورم همون 3 است :oops:


مجموعه این مباحث در Ado آمده .
این مجموعه هیچ ارتباطی به نوع رکورد ست خاصی ندارد ولی می توان مثلا آن را در ado هم پیدا کرد وگرنه ado . dao . Rdo با هم فرقی ندارند و در هر 3 نوع می توان این کار را کرد :roll: :idea:


( به کتابهای آموزشی مراجعه کنید )

و کمی هم بالاتر نمونه هایی آمده است از کم حوصله :mrgreen:

با این حال توضیحات آقای نوربالا بسیار کامل مفید و رسا تر از مثالها بود !!! ممنون علی آقا :wink: :mrgreen:

mohammad_d
سه شنبه 23 دی 1382, 08:54 صبح
به نام خدا
هر سه مود حل شد
با تشکر :)