PDA

View Full Version : آموزش: ساخت فایل اکسس از طریق برنامه



ozzy_mra
دوشنبه 28 فروردین 1391, 09:32 صبح
سلام
مدتی بود دنبال ساخت فایل اکسس از طریق کد بودم قبلاً یه آموزشی در این مورد قرار داده بودم ولی آموزش که امروز براتون میزارم خیلی بهتر و سریعتره
برای این کار اول باید رفرنس های زیر رو به برنامه ادد کنید :
1- از تب net رفرنس adodb رو ادد کنید
2- از تب com رفرنس Microsoft ADO Ext. 2.8 for DDL and Security رو ادد کنید
3- using های زیر رو انجام میدیم :
using ADODB;
using ADOX;
4- تابع زیر فایل رو با فیلد هایی که در بالا تعریف کردیم میسازه و اگر فایل ساخته شد مقدار True رو بر می گردونه

public bool CreateNewAccessDatabase(string fileName)
{

bool result = false;

ADOX.Catalog cat = new ADOX.Catalog();
ADOX.Table table = new ADOX.Table();

//Create the table and it's fields.
#region dbFields
table.Name = "RequestTbl";
table.Columns.Append("RequestPk", ADOX.DataTypeEnum.adInteger, 4);
table.Columns.Append("Field1", ADOX.DataTypeEnum.adInteger, 4);
table.Columns.Append("Field2", ADOX.DataTypeEnum.adInteger, 4);
table.Columns.Append("Field3", ADOX.DataTypeEnum.adWChar, 10);
table.Columns.Append("Field4", ADOX.DataTypeEnum.adDouble);
table.Columns.Append("Field5", ADOX.DataTypeEnum.adInteger, 255);
table.Columns.Append("Field6", ADOX.DataTypeEnum.adBoolean);

#endregion

try
{
cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=" + fileName + ".mdb; Jet OLEDB:Engine Type=5;Jet OLEDB:Database Password=YourPass;");
cat.Tables.Append(table);
//Now Close the database
ADODB.Connection con = cat.ActiveConnection as ADODB.Connection;
if (con != null)
con.Close();

result = true;
}
catch (Exception ex)
{
result = false;
if (File.Exists(fileName + ".mdb"))
{
File.Delete(fileName + ".mdb");
}
MessageBox.Show(ex.Message.ToString());
}
cat = null;
}
return result;
}

ozzy_mra
دوشنبه 28 فروردین 1391, 09:33 صبح
نکته :
اگر بخواهید فایلتو پسورد نداشته باشه قسمت زیر رو از بخش Create حذف کنید
Jet OLEDB:Database Password=YourPass;