مشکل در ذخیره اطلاعات در اکسس [بایگانی]

View Full Version : مشکل در ذخیره اطلاعات در اکسس

mehdi1357

سه شنبه 12 مرداد 1389, 09:23 صبح

بانک اطلاعاتی من اکسس می باشد وقتی با دستورات sql رکوردی به دیتابس اضافه می کنم به جدوال مد نظرم در شاخه برنامه اضافه نمی شود ولی در ک÷ی دیتابس که در مسیر bin\Debug ... می باشد اضافه می شود مثل اینکه این دیتابس در دیتابس اصلی کپی نمی شود

ricky22

سه شنبه 12 مرداد 1389, 10:29 صبح

مشکل از Connection string هست.

mehdi1357

سه شنبه 12 مرداد 1389, 12:09 عصر

با سلام و تشکر
connection = New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\SHOP_DATABASE.mdb")
به نظر شما مشکلش کجاست

VB.NET 2010

سه شنبه 12 مرداد 1389, 18:39 عصر

آدرس فایل اکسس رو دقیق بده !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

mehdi1357

چهارشنبه 13 مرداد 1389, 07:36 صبح

سلام من ازDataDirectory استفاده کردم چون ممکن است برنامه در کامپیوتر های مختلف و در درایوهای مختلف نصب شود بنابرین نمی توانم از آدرس ثابت استفاده کنم

Mani_rf

چهارشنبه 13 مرداد 1389, 09:11 صبح

به جای DataDirectory از Application.StartupPath استفاده کن.

Application.StartUpPath & "DataBaseName"

Application.StartUpPath & "\SHOP_DATABASE.mdb"

mahdi1373

چهارشنبه 13 مرداد 1389, 12:53 عصر

سلام،
فکر می کنم connection string درسته، چون من هم وقتی با دیتابیس access کار می کردم همین اتفاق می افتاد. نمیدونم راه حلی داره یا نه...

mehdi1357

پنج شنبه 14 مرداد 1389, 09:12 صبح

سلام Application.StartUpPath هم مسیر bin\Debug... را نشان می دهد

hero4000

پنج شنبه 14 مرداد 1389, 10:10 صبح

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

damas90

پنج شنبه 14 مرداد 1389, 17:19 عصر

با عرض سلام وخسته نباشيد خدمت شما

من يك بانك اطلاعاتي با اكس درست كردم در خصوص اطلاعات كارمندها كه شامل نام وفاميل و... است.
حالا مخوام برنامه اي تو وبي براش بنويسم در خصوص حذف واضافه كردن يك كارمند.

حالا چه كدي بايد براي اين كار بنويسم ميشه كمكم كنيد ممنون ميشم

البته ميدونم سوالم خيلي ساده وآماتوريه اما خيلي كارم گيرشه ميتونيد كمكم كنيد؟؟

mehdi1357

شنبه 16 مرداد 1389, 09:31 صبح

سلام
ابتدا دو متغییر بصورت زیر تعریف کنید

Dim m_connection As SqlConnection

Dim m_select As SqlCommand

یک connection string تعریف کنید مثل بالا مسیر فایل خودتان را بدهید
بعد یک دستور sql از نوع delete query بصورت زیر تعریف کنید

m_select = New SqlCommand(" DELETE ID_DARYFTI,SHREH_DARYFTI FROM DARYFTI_TBL, (M_connection

با دستور

()M_connection.Open

ارتباط با دیتابس برقرار می شود

ta = m_select.ExecuteNonQuery

کوری اجرا می شود

taمتغیری است اگر عمل حذف انجام شود مقدار یک و گرنه صفر را بر می گرداند
سئوال پرسیدن عیب نیست نداستن عیب است