ورود

نسخه کامل مشاهده نسخه کامل : برنامه دفترچه تلفن


sama_65
07-01-2007, 07:46
سلام به اهالی خوب پی سی ورلد

من یه برنامه ی ساده دفتر چه تلفن نوشتم با وی بی که امکان جستجو از طریق شماره تلفن رو داشته باشه.
حالا میخوام یه جوری بشه که این امکان جستجو از طریق دیگر گزینه های اون یعنی : اسم، فامیل، آدرس وجود داشته باشه

ممنون میشم سریعتر کمکم کنین



کد برنامه برای کلید جستجو :



Private Sub Command3_Click()
Open "D:\test.txt" For Input As #1
Do While Not EOF(1)
Input #1, a, b, c
If c = "" & Text3.Text & "" Then
Text1.Text = a
Text2.Text = b
Exit Do
End If
Loop
Close
End Sub



کد برنامه برای کلید ثبت :


Private Sub Command1_Click()
Open "D:\test.txt" For Append As #1
Write #1, Text1.Text, Text2.Text, Text3.Text, Text4.Text
Close #1
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
End Sub
shirazhaker
07-01-2007, 08:25
اگر امكان داره كل كد برنامه رو بزاريد تا ويرايش كنم و بهتون بدم
تکنیک برتر
07-01-2007, 08:27
سلام دوست عزيز من يه نمونه سورس برات گزاشتم كه فكر كنم وقتي بري داخل اين سورس بقير از اينكه سورس مورد نظر خودت را پيدا مي كني يكسري ايدهاي جديد هم در سرت قلومبه مي شه شك ندارم . با اين حال كه كار ساده اي است ولي مي ارزه
[ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ]
اين برنامه خودش دفترچه تلفنه بنظرم رو همين كار كون يا حالا ولي نتيجه كارتو به من بده
sama_65
07-01-2007, 11:26
جناب هکر
کل کد برنامه همینی هیت که اینجا گذاشتم

[ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ]

برنامه ای رو که نوشتم می تونین از اینجا دانلود کنین.
پایگاه داده اش نمیخوام پیشرفته باشه، با نوت پد باشه لطفن !

یکی به داد من بدبخت برسه
کمکککککک
Romina2006
14-01-2007, 22:42
Phone Book :

دانلود ([ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ])
sama_65
15-01-2007, 07:03
دانلود می کنیم ! D:

رومینا2006 :
1) مرسی برای لینک
2) برنامه را دانلود کردم، از این خطش قبل از اجرای برنامه خطا می گیره :


Private Sub Form_Load()
On Error GoTo file
Center Me
Romina2006
15-01-2007, 15:33
دانلود می کنیم ! D:

رومینا2006 :
1) مرسی برای لینک
2) برنامه را دانلود کردم، از این خطش قبل از اجرای برنامه خطا می گیره :


Private Sub Form_Load()
On Error GoTo file
Center Me

برنامه درسته ، چه خطایی می گیره ،میشه اون خطا رو بنویسی
sama_65
15-01-2007, 19:45
Compile Error:
Sub or Function not defined

از همون دو خطی که توی پست قبلی نوشته بودم، خطا میگیره
Romina2006
16-01-2007, 00:24
من دوباره برنامه رو دانلود کردم و اجراش کردم ، برنامه اجرا میشه و مشکلی نداره

آیا این کد در ماژول برنامه وجود داره؟ اگه نیست , این کد در داخل ماژول بنویس


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
sama_65
16-01-2007, 07:11
دقیقن میشه معلوم کنین کجای برنامه بنویسم؟
آخه من توی ماژول که می نویسم، از هر گوشه برنامه یه خطا میگیره.
کلافم کرده ...
Romina2006
16-01-2007, 13:28
برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید


برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
sama_65
22-01-2007, 09:35
دوست عزیز ؛ رومینا 2006

ممنون از همه زحماتی که کشیدی .... !
Romina2006
22-01-2007, 11:14
خواهش می کنم،تونستی ازش استفاده کنی؟
sama_65
22-01-2007, 17:36
بله دوست من
عااااااااااااااااااااالی بود
دست شما درد نکنه
Reza_Daneshjoo67
31-01-2007, 14:20
سلام . من با VisData يک پايگاه اطلاعاتي از نوع اکسس 7 ساختم و از اون در برنامه دفترچه تلفنم استفاده کردم . حالا مي خواهم در يک textbox با نوشتن اسم يا فاميل يا تلفن و يا آدرس آن را به طور هم زمان که من تايپ مي کنم پيدا کند . مرا راهنمايي کنيد. يا به عبارتي جستجوي همزمان داشته باشم :)
shahnameh
18-08-2008, 21:55
سلام
من یک دفتر تلفن میخوام با استفاده از ساختار فایل نه پایگاه داده که بتونه اسم و شماره تلفن را ذخیره کنه و جستجو کنه
در همین حد اگه میتونید من را یاری کنید با تشکر
:19::19::19:
sinaaeeni
05-11-2008, 14:34
این سورس دفترچه تلفن جالب و کاملی است یکی از دوستان زحمت کشیدن

آدرس دانلود :

[ برای مشاهده لینک ، لطفا با نام کاربری خود وارد شوید یا ثبت نام کنید ]