برگزیده های پرشین تولز

ساخت ي ديتابيس اكسس

cracki

Registered User
تاریخ عضویت
23 مارس 2004
نوشته‌ها
672
لایک‌ها
23
سن
38
سلام به همه دوستان
اولا سال نو رو صميمانه به همتون تبريك مي گم و اميدوارم سالي خوش همراه با موفقيت در پيش داشته باشيد

مي خواستم بدونم بهترين راه براي ساخت يه فايل ديتابيس از روي نتيجه يك جستجو در ديتابيس چيه؟
بزاريد توضيح بدم
من يه ديتابيس دارم
توش سرچ مي كنم و نتايجي به وجود مياد
مي خوام يه فايل ديتابيس داشته باشم كه اين نتايج فقط توض باشه
ديتابيس= Access
 

m3hrz4d

Registered User
تاریخ عضویت
21 سپتامبر 2005
نوشته‌ها
620
لایک‌ها
1
محل سکونت
اصفهان
مطمین نیستم بهترین راه باشه ولی
شما میتونی یه فایل دیتا بیس خالی (که هیج tableی توش نیست ) رو جایی داشته باشی.بعد وقتی میخوای اطلاعات جدیدت رو توی یک فایل بریزی اون فایل رو کپی کنی جایی که میخوای.بعد Connection ش رو Open کنی و Table هایی که لازم داری رو درست کنی و بعد رکورد هات رو بهش اضافه کنی و بعد ببندییش.
بازم میگم من تو کار ِ دیتابیس وارد نیستم شاید راه ِ خیلی بهتری هم باشه.
 

cracki

Registered User
تاریخ عضویت
23 مارس 2004
نوشته‌ها
672
لایک‌ها
23
سن
38
فكر خوبيه
روش استانداري براش نيست؟
گرچه اين روش استاندارده

دوستان نظري ندارن؟
 

balabala

کاربر قدیمی پرشین تولز
کاربر قدیمی پرشین تولز
تاریخ عضویت
22 می 2005
نوشته‌ها
8,362
لایک‌ها
5,745
سن
41
محل سکونت
یه خورده اونورتر
من هم همین کار رو میکنم معمولا، چون راحت تره.
ولی با خود کد ویبی هم میشه: (با کامپوننت ADOX)
.
.
.
کد:
Option Explicit
Sub CreateAccessDatabase(sDatabaseToCreate)
   Dim catNewDB As ADOX.Catalog
   Set catNewDB = New ADOX.Catalog
   catNewDB.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
       "Data Source=" & sDatabaseToCreate & _
       ";Jet OLEDB:Engine Type=5;"
       ' Engine Type=5 = Access 2000 Database
       ' Engine Type=4 = Access 97 Database
  Set catNewDB = Nothing
End Sub
http://p2p.wrox.com/topic.asp?TOPIC_ID=6942
 

cracki

Registered User
تاریخ عضویت
23 مارس 2004
نوشته‌ها
672
لایک‌ها
23
سن
38
مثل هميشه عالــــي ! ممنون balabala جان
 
بالا