نیاز به برنامه با VB جهت تغییر مقداریک فیلد مشخص در اکسس [بایگانی]

ghoghnuse

شنبه 10 آذر 1386, 21:23 عصر

سلام به دوستان عزیز

من یک برنامه با Vb می خوام بنویسم که فرمان زیر را انجام بده :

بانک اطلاعاتی در اکسس وجود داره به اسم Anbar

در این بانک اطلاعاتی ، جدولی با نام Part وجود داره.

این جدول شامل دو فیلد Code و Desc است . من می خوام یک برنامه ای بنویسم که یک کد مشخص در فیلد code رو انتخاب کنه ( مثلا کد 2321 ( و مقدار نظیرش را در فیلد Desc به مقدار متنی دلخواه ( مثل عبارت داشبورد ( تغییر بده . چون شرح این کد نادرست وارد شده .

مثل یکجور update Query در اکسس .

حالا مشکل چیه که توسط Update Query انجام نمی دم ؟؟ چون این نرم افزار روی 100 تا سیستم در استانهای مختلف نصبه و می خوام یک فایل پچ Exe بنویسم تا برای همه اونها ارسال بشه و همه تغییرات را با یک فایل اجرا کنند .

خوب دوستان عزیز ، چه راهی برای حل این مشکل وجود داره ؟؟؟

ممنون از توضیحاتتون .

بدرود

mehdihamedali

یک شنبه 11 آذر 1386, 06:51 صبح

سلام دوست عزیز
شما میتونید این کار رو با برنامه VB.NET اجام بدید
یک گشتی تو هر دو بخش VB تو همین انجمن انجام بدید اگر چیزی پیدا نکردید اون وقت تو همون جا تاپیک بذارید کمکتون میکنند
دستوراتش هم استفاده از Object های زیره برای اتصال و اجرای به روز رسانی
OLEdb
ADODB
Odbc
...
موفق باشید.

hilarr

جمعه 23 آذر 1386, 10:24 صبح

خوب دستورات کاملش چیه
اینا رو که همه میدونند

mostafa-sohrablou

شنبه 24 آذر 1386, 10:53 صبح

سلام
برای اینکار شما ابتدا یک بانک اکسس ایجاد می کنید و از همان جدول Part استفاده می کنید و مقادیری که باید تغییر دهید را در آن ایجاد می کنید. سپس برنامه اکسس زیر را اجرا کنید.

moustafa

شنبه 24 آذر 1386, 16:35 عصر

این کد در وی بی عمل می کنه ؟(در اکسس این کد یه دیتابیس دیگه رو با آدرس مشخص باز می کنه
اعمال خواسته شده رو انجام میده از قبیل باز کردن فرم ،تغیر فیلد ،اجرای کوئری ، چاپ گزارش و...... بعد بسته میشه )

Dim obj As Object
Set obj = CreateObject("Access.Application")
obj.OpenCurrentDatabase ("F:\anbar.mdb")
obj.docmd.openupdatequery"namequery"
set obj=nothing
obj.close

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

obj.docmd.runsql("update part set part.codename="sharh" where part.code=2321")
البته می بایست از کوتیشن وتک کوتیشن درست و اصولی استفاده کنی

HAMRAHSOFT.IR

شنبه 24 آذر 1386, 22:26 عصر

این کد در وی بی عمل می کنه ؟(در اکسس این کد یه دیتابیس دیگه رو با آدرس مشخص باز می کنه
اعمال خواسته شده رو انجام میده از قبیل باز کردن فرم ،تغیر فیلد ،اجرای کوئری ، چاپ گزارش و...... بعد بسته میشه )

Dim obj As Object
Set obj = CreateObject("Access.Application")
obj.OpenCurrentDatabase ("F:\anbar.mdb")
obj.docmd.openupdatequery"namequery"
set obj=nothing
obj.close

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

obj.docmd.runsql("update part set part.codename="sharh" where part.code=2321")
البته می بایست از کوتیشن وتک کوتیشن درست و اصولی استفاده کنی

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

moustafa

شنبه 24 آذر 1386, 22:48 عصر

اگه منظورتون در وی بی ء نمی دونم جواب میده یا نه اما اگه منظورتون در اکسس هستش
این کدها رو کپی کنید و مسیر فایل ،نام دیتابیس و نام کوئری رو ویرایش کنید اگه عمل نکرد نمونه خودتون اپلود کنید اصلاح کنیم