تغییر مقدار ستونها در دیتا بیس فاکس پرو

[shahinsoft]

با سلام میخواستم در مورد اینکه مقدار یک ستون رو کلا عوض کنم منو راهنمایی کنید
مثلا همه اعداد رو در ستون x به عدد 7 تغییر بده
و دوم اینکه اعداد موجود در ستون y رو مثلا 15 درصد افزایش یا کاهش بده
البته عدد رو از کاربر بگیره
خیلی معطلم ممنون میشم راهنمایی کنید

[abdorreza]

سلام خدمت شما

میتونید از دستورات زیر استفاده کنید



replace all x with 7




replace all y with y+((y/100)*15)

[shahinsoft]

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

[gh_khajehzade]

خوب برنامتو exe كن يك جستجو تو همين بخش مشكلتو كاملا حل ميكنه.

[shahinsoft]

مشکل من اینه که برنامه رو که exe میکنم اجرا نمیشه و حطای resorce file version mismatch میده
در هنگام بیلد هم میگه can not build a dll without OLE public classes
تو سایت هم جستجو کردم چیزی نیافتم
ضمنا یه تکست باکس ایجاد کردم چطوری مقدار اون رو بخونم و تو یه متغیر قرار بدم تو سی شارپ مینوشتیم مثلا x=textbox1.text

[farhad_shiri_ex]

برای پیغام Resource یکبار در شاخه ای که برنامه Exe تون اونجاست دوتا فایل Foxuser.dbf و fpt رو پاک کنید برای پیغام خطای دوم هم نحوه کامپایل کردن و بیلد کردنتون اشتباه است باید گزینه Win32 exe/com server را نتخاب نمائید گزینه Recompile all files رو هم تیک بزنید.البته اگر DLL نمی سازید و میخواهید exe 32 بیتی درست کنید اگر هم dll میخواهید بسازید که مقوله مفصلی

[shahinsoft]

سلام خدمت شما

میتونید از دستورات زیر استفاده کنید



replace all x with 7




replace all y with y+((y/100)*15)


خوب حالا یه سئوال دیگه
به جاب all دقطعه کد پایینی میشه نوشت اگر مقدار ستون دیگه مثلا z بربر صفر شد مقدار y رو افزایش یا کاهش بده؟
چند تا سئوال دیگه هم دارم
1- یه تکست باکس ایجاد کردم روی یک فرم و دیتا تایپ اون رو numeric کردم حالا وقتی عدد میزنم نمیشه اعشاری وارد کرد
2-چطور میشه مقدار اون تکست باکس رو تو یه متغیر ذخیره کرد

[abdorreza]

سلام

میتونی اینطوری بنویسی


replace all y with y+((y/100)*15) for z=0


پاسخ سوال 1 : اگر تکست باکس متصل به فیلد است ممکن است فیلد شما اعشار تعریف نشده باشد و اگر به فیلدی متصل نیست ممکن است در قسمت شکل ورود تکست باکس فقط عدد صحیح را وارد کرده باشید

پاسخ سوال 2 : میتونید از دستور زیر استفاده کنید :



name=form1.text1.value


دوست عزیز این سوالاتی که میکنید را براحتی از راهنمای خود ویژوال فاکس هم میتوانید پیدا کنید.

موفق باشید

[shahinsoft]

یه سئوال دیگه
قول میدم دیگه سئوال نپرسم :دی
چطور میشه روی فرم دکمه browse برای table ایجاد کرد؟
میخوام اول جدول رو توسط browse پیدا کنه بعد تغییرات روش اعمال بشه

[abdorreza]

سلام
سوال شما رو متوجه نشدم. میشه واضحتر بگین ؟

اگر منظورتون اینه که مقادیر جدول روی فرم نمایش داده بشه باید از Grid استفاده کنید.

ممنون

[shahinsoft]

سلام
سوال شما رو متوجه نشدم. میشه واضحتر بگین ؟

اگر منظورتون اینه که مقادیر جدول روی فرم نمایش داده بشه باید از Grid استفاده کنید.

ممنون
نه منظورم اینه که فرم رو ایجاد کنم ولی کاربر دیتا بیس رو مشخص کنه
بالفرض چند تا دیتا بیس همسان و همنام تو فولدر های جداگانه هستند وقتی فایل exe اجرا شد از کاربر مسیر فایل رو سئوال کنه
و بپرسه مسیر جدول کجاست یعنی یه پنجره باز کنه و کاربر از مسیر مورد نظرش فایل رو انتحاب کنه و تغییرات روی اون فایل اعمال بشه

[abdorreza]

سلام
خوب شما میتونید با استفاده از دستور زیر فایل های دیتابیس را بخونید و آنها را داخل یک ComboBox قرار دهید


NUM=ADIR(array,'filename','F')


NUM : تعداد فایل ها را برمیگرداند
array : آرایه ای که اسامی فایل ها داخل آن قرار میگیرد
filename : نام فایلها . مثلا فایلهای دیابیس شما با حروف dt شروع میشود ، میتوانید بجای filename قرار دهید dt*.*

سپس کاربر دیتابیس را از ComboBox انتخاب میکند و بقیه کارها ...

[shahinsoft]

من میخوام دکمه browse بذارم
یعنی کاربر روی دکمه کلیک کنه و یه پنجره یاز بشه و بره فایل رو انتخاب کنه و فقط فایل های با پسوند dbf
همون اول هم گفتم که فایل ها تو پوشه های جداگانه هستند

[abdorreza]

سلام

از تابع GetFile استفاده کنید. فرم کلی تابع و دیگر موارد در راهنمای فاکس هست

[shahinsoft]

حالا همه کارها رو انجام دادم فقط مونده قفل نرم افزاری
چیکار میتونم بکنم که یه قفل نرم افزاری یا یه سریال یکبار مصرف برای برنامه ایجاد کنم؟