بانک لغت فارسی دهخدا

بنده امروز توانستم بانک لغات سایت

www.mibosearch.org را با 250 هزار لغت  را بدست آورم البته با کلی زحمت و تلاش 30 ساعته... انتظار نداشته باشین کار به این سختی رو مجانی در اختیار کسی قرار بدم. برای خرید می تونین به من ای میل بزنین  :

[e-mail]

جواب ای میل رو در اولین فرصت می دم.

توجه داشته باشید که فایل access که درون این Demo می باشد یا

User:Guest

Pass:Guest

باز می شود.

لینک دانلود: http://rapidshare.com/files/276340183/Dehkhoda_Demo_Package.rar.html

Tag: بانک لغت ، فرهنگ ، دهخدا ، میبو سرچ ، Mibo search ، mibosearch.com ، دیتا بیس ، سورس دیتا بیس ، سورس دیکشنری ، سورس فرهنگ ، سورس لغات فارسی ، Database 

نمایش شاخه ای (TreeView)

نمایش شاخه ای یکی از تکنیک های خوب برای ارتباط منظم با مخاطبه و وقتی هم که اطلاعاتش از یک Database تامین بشه واقعاً کاملتر و جالب میشه.تو این پست ای موضوع رو واستون در نظر گرفتم.....البته بانک اطلاعاتی یکمی پیچیده داره که باهاش کنار بیاین دیگه....

لینک دانلود : VB TreeView From Database Download

یک مثال از کنترل یک بانک اطلاعاتی (ADO)

این برنامه مثال ساده ولی با ارزشی از ADO هست که واسه تمام برنامه نویسایی که مثل خودم کار DATABASE می کنن مفیده ....

لینک دانلود :  VB ADO Database Project Download

یک ActiveX Object واسه مدیریت دیتا بیس (Database)

این فایل OCX طبق مراحل زیر به نوار ابزارتون اضافه کنین.

روی نوار ابزار RClick کنید و Component سپس Browse .فایل رو انتخاب کنین .Open و بعد ok .تا به نوار اضافه بشه . بعد یکی رو فرمتون بذارین ازش که اسمش DBmanager هست .کد زیر کاملاً مفهوم هست و قسمتی از کارایی این Object رو نشون میده .نتیجه کد در تصویر نشون داده شده .سورس خوده فایل رو بعداً میذارم.....

لینک دانلود : DBManager OCX Download

---

Private Sub Form_Load()
Dim FileName As String
FileName = "c:\test.mdb"
With DBManager1
    .CreateDB FileName, ""
    .DBCreateTable FileName, "Table1"
    .DBAddColumn FileName, "Table1", "FirstName"
    .DBAddColumn FileName, "Table1", "LastName"
End With
End Sub

---

ساختن فایل دیتابیس(Database) با VB

این کد کمکتون می کنه  که اگه تو RunTime برنامتون نیاز به ساختن یک فایل mdb داشت بتونین ایجادش کنین.که البته همون طور که میدونین ماله Access هست.

البته قبل از این کار از منو refrences گزینه microsoft dao 3.5 رو به پروژتون اضافه کنین.

Dim ws As Workspace
Dim db As Database
Set ws = DBEngine.Workspaces(0)
Set db = ws.CreateDatabase("C:\test.mdb", dbLangGeneral & ";pwd=Password")

                 و یا

Set db = ws.CreateDatabase("C:\test.mdb", dbLangGeneral & ";pwd=")

دقت کنید به جای عبارت رنگی شده هر عبارت موجود password فایل ایجاد شده خواهد بود.اگه خواستید به جای اون هیچی ننویسین