منو اصلی

درگاه ورود کاربران
لینک سایت های مفید
تقویم
<    «  بهمن 1390  »    >
شيدسچپج
1234567
891011121314
15161718192021
22232425262728
2930 
آرشیو
امار سایت
آمار مطالب:
  يک ساعت پيش: 0
  امروز: 0
  اين ماه: 7
  مجموع مطالب: 398
  کل نظرات: 309



آمار بازديد:
  بازديد امروز: 3897
  بازديد ديروز: 3512
  مجموع بازديدها: 2495407



آمار کاربران:
  يک ساعت پيش: 0
  امروز: 9
  اين ماه: 347
  مجموع کابران: 7265
  بن شدگان: 2

آخرين عضو:


javad_gh1370

 


کاربران آنلاین:asd1363

رباطها آنلاین: Crawl Bot, Google Bot

در حال حاضر 1 کاربر, 2 رباط, 2 میهمان و در مجموع 5 نفر در سایت حضور دارند.
همکاران سایت

--------------------
نظرسنجی

دوست دارید نرم افزار رو روی چه سیستم عاملی اجرا کنید ؟

Xp
Vista
Seven
Apple
Windows android
تازه های سایت
بخش های پربازدید
اطلاعات سایت
حمایت  فارسی دی بی

 

http://www.farsidb.com/farsidb.gif

برای حمایت از فارسی دی بی کد بالا را در سایت و یا وبلاگ خود قرار دهید با تشکر

رتبه و اطلاعات سایت   

   http://www.farsidb.com/alex.jpg

 

مسير:
Project - Components - Windows MultiMedia Control 6.0

كنترلي هستش كه بعد از نسخه 6 ويژوال بيسيك ارائه شد و براي انجام كارهاي MultiMedia خيلي ساده و كوچيك مورد استفاده قرار ميگيره.

مهمترين خاصيتي كه داره، خاصيت DeviceType اون هستش كه با مقادير زير براي انجام كاراي MultiMedia مقدار دهي ميشه:

WaveAudio - پخش فايل صوتي با فرمت Wave
AviVideo - پخش فايل تصويري كوچيك با فرمت Avi
Scanner - كار با اسكنر
CDAudio - پخش فايل صوتي به صورت Audio از روي CD
....

يكي ديگه از خاصيت هاي مهمش خاصيت FileName هستش كه از نوع String هستش و آدرس دقيق فايل رو برمي گردونه.
يه خاصيت ديگه داره به اسم UpdateInterval كه مياد كنترل رو بر اساس مقداري كه بر حسب ميلي ثانيه گرفته به روز مي كنه.
يه خاصيت ديگه داره به ام Command كه ميشه به كنترل دستورات اصلي پخش در ابزارهاي MultiMedi رو داد. مثل Play,Stop,... كه به صورت زير به كار مي ره:


Objectname.Command = "Command"

ObjectName: نام كنترل هستش كه معمولاً براي راحتي MMC Control ميزارن.
Command: كلمه كليدي

"Command: اعمال اصلي در ابزارهاي ultiMedia هستش مثل:

Play
Eject
Pause
Stop
Next
Previous
Close
Open
Seek
...

يه خاصيت ديگه داره به اسم Mode كه به ما ميگه الان كنترل در چه وضعيتي هستش آيا باز هستش آيا در حال پخش هستش ايا در حال Record هست و...
پخش يه فايل صوتي با فرمت Wave:


MMControl1.DeviceType = "WaveAudio"
MMControl1.FileName = "C:\Kate Ryan.Wav"
MMControl1.Command = "Open"
MMControl1.Command = "Play"

اگر من در خط سوم نوشتم Open به اين دليل هستش كه اين ابزار هم با فايل كار مي كنه و قبلاً اشاره كردم كه براي كار با فايل بايد اول باز بشه پردازش بشه و بعد بسته بشه.

توضیحات بیشتر ...
فرق دستور Input و Line Input در فايل ترتيبي

دستور Input
دستور Input اطلاعات فيلد يك فايل رو به طور كامل مي خونه. يعني اگر ما فيلدهايي رو در يك فايل ترتيبي تعيين كرده باشيم و بهشون مقداري رو داده باشيم، تمامي مقادير اونها رو درون متغيري كه از قبل جلوي دستور Input نوشتيم به ترتيب ميريزه

ادامه مطلب ....

توضیحات بیشتر ...
Arrow پردازش فايل ترتيبي - دستورات نوشتن

هر فايلي كه باز ميشه براي پردازش اون دو حالت وجود داره:

يا براي خوندن اطلاعاتش باز شده
يا براي نوشتن اطلاعات جديد باز شده

اطلاعات = ركورد
خواندن فايل
براي خواندن فايل بايد حالت دسترسي به فايل Input باشه تا بشه اطلاعاتش رو خوند. دستوري كه ميشه باهاش اطلاعاتش رو خوند دستور Line Input هستش.



ادامه مطلب مراجعه کنید ...

توضیحات بیشتر ...
شكل كلي دستور:

Open FilePath For Mode Access AccessType As FileNumber Len = Width

Open: كلمه كليدي جهت باز كردن فايل
FilePath: آدرس دقيق فايل (با پسوند) كه اشاره گر جهت پيدا كردن موقعيت فايل به آدرس فايل ميره.
For: كلمه كليدي
Mode: حالات دسترسي به فايل
Access: كلمه كليدي

AccessType: نوع دسترسي به فايل با مشخصات زير:

Shared: در شبكه كاربران مي توانند همزمان يك فايل رو باز كنند.
Lock Read: كاربر فايل رو فقط مي تونه بخونه
Lock Write: كاربر اجازه ويرايش يا تغييرات رو در فايل دارند.
Lock Read Write: كاربر مي تونه فايل رو بخونه بنويسه


ادامه مطلب مراجعه کنید ....

توضیحات بیشتر ...
Filing System
در ابتدا سيستم ذخيره و بازيابي بانك اطلاعاتي توسط سيستم فايلينگ انجام مي شد.
يعني داده هايي كه درون فيلدها به صورت ركورد ذخيره شده بود به صورت يك فايل متني ذخيره مي شد.(بعداً فايل دودويي بوجود مياد) يعني هر ركوردي درون يك فايل ذخيره مي شد. اين نوع ذخيره سازي باعث به وجود اومدن Redundancy (بروز افزونگي) در سيستم فايل مي شد. مثلاً در يك ركوردي اگر فيلدي Computer Software مقدارش بود و در ركورد ديگري همان فيلد مقدار Computer Sftware Engeening وجود داشت باعث بوجود اومدن يك افزونگي در نحوه بازيابي(جستجو يا بازكردن) فايل مي شد. كه بعد ها پايگاه داده رابطه اي بوسيله ادگارد فرانك كاد با نمونه برداري از مجموعه ها در رياضي ساخته شد.

توضیحات بیشتر ...
اين جستجو بر اساس فيلدي كه Index شده باشه انجام مي پذيره.
مثال:

Dim DB As DataBase
Dim Rs As Recordset
Set DB = OpenDataBase ("DataBaseName.mdb")
Set Rs = OpenRecordset ("TableName")
Rs.Index = "IndexName")
Rs.Seek "=" , 18


DataBaseName.mdb: نام پايگاه داده يا بانك اطلاعاتي
TableName: نام جدول مورد نظر كه يكي از فيلدهاي اون قبلاً Index شده
IndexName: ايندكسي كه قبلاً ايجاد شده.

يا:

Rs.Seek "=" , "Ali"


يا:


Rs.Seek ">1369/06/10"

توضیحات بیشتر ...
براي فعال كردن يه Index در يك جدول بايد از متدAppend استفاده كنيم.

Dim DB As DataBase
Dim NewIndex As New Index
Set DB = OpenDataBase ("DataBaseAddress.mdb")
NewIndex.Name = "IndexName"
NewIndex.Fields = "FieldName"
NewIndex.Uniqe = False
DB.TableDefs ("TableName").Indexes.Append NewIndex
MsgBox "ايندكس فعال شد." , vbInformation , "پيام"

DB.Close



DataBaseName.mdb: نام بانك اطلاعاتي هستش
IndexName: نام Index ما هستش كه قرار در مجموعه Indexes (ايندكس هاي جدول) اضافه بشه
FieldName: ايندكس رو برحسب اون فيلد مورد نظر مي سازه.
NewIndex.Uniqe = False: باعث ميشه تا از ورود داده هاي تكراري تويه ايندكس جلوگيري بشه
در خطي كه متد Append نوشته شده NewIndex (همون متغير بالايي) رو به جدول (TableName) از بانك اطلاعاتي (DataBaseName.mdb) اضافه مي كنه.

توضیحات بیشتر ...
سورس عضویت و ورود به برنامه به زبان ویژوال بیسیک


بسیاری از برنامه نویسان قسط دارند تا در قسمت اصلی برنامه و یاقبل از ورود به برنامه امنیت را حاصل کنند

شما می توانید از این سورس برای قسمت ورود به برنامه استفاده کنید


توضیحات بیشتر ...


پشتیبانی شده توسط سرور باران