Databases,Tables, Views, Indexing and SQL syntax

[kia1349]

موضوعات مربوط به بانکهای اطلاعاتی را در این قسمت مطرح کنید

[binyaz2003]

چه جور دستور select بنویسم که تنها آخرین رکورد موجود رو برام برگردونه؟

[kia1349]

اگر منظور آخرین رکورد نوشته شده در آخرین خط بانک اطلاعاتی است که میتونید از دستور

max(recno())

استفاده کنید

[binyaz2003]

برای کار با تابع sqlexec می خوام برای بانک های sql

[binyaz2003]

سلام
این قضیه ردیف رو چطوری ردیف کنم؟
یک شماره ردیف برای نشان دادن تو گرید و هنگام چاپ :oops:

[kia1349]

توی گرید یه مقدار کار داره
اگه شما با sql از جدولت یه cursor بسازی با یه تابع میتونی به اون فیلد ردیف هم اضافه کنی و بعد اونهارو توی گرید نشون بدی
توی ریپورت هم میتونی از منوی ریپورت بری به قسمت variables و بعد یه متغیر بساز مثلا بنام radif
بعد در قسمت value to store بنویس radif+1
در قسمت initial value هم مقدار 0 صفر را قرار بده
قسمت ریست هم به شما میگه که چه زمانی ردیف را مجددا ریست یا صفر کند

[binyaz2003]

توی گرید یه مقدار کار داره

[binyaz2003]

من تو گرید با ست کردن خاصیت رکردسورستایپش به sql و قرار دادن یک عبارت ساده ست کنم اما وقتی فرم رو اجرا می کنم یک پنجره کوری باز می شه هر کار می کنم باز م باز میشه؟

[binyaz2003]

یافتم یافتم
فقط کافیه یک کالومن به گریدتون اضافه کنید و کنترل سورس اون رو بگزارید this.activerow
اما فوت کاشیگریش اینه که در اکتیویت فرم کد زیر رو هم بنویسین

ThisForm.grid1.ActivateCell(1,1)

ThisForm.grid1.colUMN2.ControlSource="ThisForm.gri  d1.ActiveRow"

ThisForm.Refresh

[binyaz2003]

:sorry:
این همه چیزش خوبه اما وقتی فوکوس رو از دست میده همش صفر میشه اگر بشه همین رو درست کنیم خیلی بهتره چون تابع و اضافه کردن فیلد خیلی دردسر داره مخصوصا اگر وسط کار مثلا یک رکورد رو دلیت کنیم؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟؟؟؟؟؟؟؟

[binyaz2003]

باز هم یافتم
اما باید یک فیلد به جدول اضافه شه
بعد یک برنامه رو صدا میزنم

b=recno()

count for !deleted() to a

for i=1 to a

repla radif with a

skip 1

endfor

go b

فکر کنم از این به بعد باید سوال و جواب رو خودم با هم بنویسم
بابا آخه چه خبره اینجا :mad:
بخش های دیگه هر روز سه چهار تاپیک جدید دارند
خوب شاید هم بچه های اینجا همه دیگه آخر آخرشن فقط من اشکال دارم :(

[kia1349]

نه بی نیاز جان
موضوع اینه که تا یه سوالی مطرح می کنی ماشاءالله خودت هم خیلی سریع دنبال جوابش میگردی و پیداش میکنی

[ALI RAFFIE]

غیر از این موضوع فکر کنم همه بچه های این بخش هر کدوم حسابی مشغولن.انشاء الله همه موفق باشید و خدا قوت.

[binyaz2003]

خدا کنه همینطور باشه

[binyaz2003]

من با دستورات spt یک کرسر updateable می سازم و تو گرید نمایش می دم وقتی delete می کنم و tableupdate بعدش هم گرید رو رفرش می کنم اما رکورد از تو گرید حذف نمیشه اما در بانک حذف شده چیکار کنم؟

[kia1349]

جناب بی نیاز من دیدم که دوستمون آقای معمار بدنبال حل مشکل شما هست (ردشو توی سایتهای اونور آب گرفتم)

برای شماره رکورد توی گرید یکی از دوستان اونور آبی این کدها رو ارسال کرده بود

*Grid.Init

With This

  .AddProperty('CurrentOrder',0)

  Select Recno() As RcNo, 1 As OrderCol ;

    from (.RecordSource) ;

    order By OrderCol  ;

    into Cursor crsOrdering ;

    readwrite

  Select crsOrdering

  Index On RcNo Tag RcNo

  Select (.RecordSource)

  Set Relation To Recno() Into crsOrdering

  .Columns(.ColumnCount).ControlSource = "(Recno('crsOrdering'))"

Endwith



*Grid.Refresh

Local lcOrder, lnOrder

With This

  Select (.RecordSource)

  lnOrder = Val(Sys(21))

  If .CurrentOrder # m.lnOrder

    lcOrder = Iif(m.lnOrder = 0,'1',Key(m.lnOrder))

    Select Recno() As RcNo, &lcOrder As OrderCol ;

      from (.RecordSource) ;

      order By OrderCol  ;

      into Cursor crsOrdering ;

      readwrite

    Select crsOrdering

    Index On RcNo Tag RcNo

    Select (.RecordSource)

    Set Relation To Recno() Into crsOrdering

    .CurrentOrder = m.lnOrder

  Endif

Endwith

[binyaz2003]

تو کدوم سایت؟

[rezamim]

http://www.universalthread.com :wink:

[rezamim]

البته من متاسفانه فرصت تست این کد را که دوستی از ترکیه فرستاده پیدا نکردم . لطفا تست کنید و نتیجه را بگوپید.

[reza_z]

سلام به همه دوستان
ایا امکان اینکه با استفاده از progrees bar بتونیم تعداد رکوردهایی که در همون لحظه به بانک اضافه میشه بصورت حقیقی نشان داد ؟
مثلا وقتی از دستورات copy ,appened استفاده میکنیم درصد حقیقی رکورد های اضافه شده از اول کپی تا انتهای کپی در پروگرس بار نشان دهد ؟
ممنون

[rezamim]

فقط میگم که این progress bar ها سرعت پردازش رو پایین میارن

[reza_z]

سرعت برام خیلی مهم نیست
ایا راهی داره ؟؟؟؟؟

[kia1349]

بله میشه
اگر با دستورات sql کار کنید میتونید یه فیلد فانکشنی به اون اضافه کنید که پارامترهای لازم رو بگیره و روی صفحه با دستورات wait اون پارامترهای تحلیل شده را نمایش بدهد

[naderigh]

با سلام
من دو جدول دارم تغریبا همانند هم از هر لحاظ ولی اطلاعات آنها مقداری با هم متفاوت هستند مثلا تمام اطلاعات جدول شماره دو در جدول شماره یک موجود میباشد و تعدادی رکورد در جدول یک هست که در جدول شماره دو نیست حالا من یک query میخوام که خروجی آن ردیفهاپی که در جدول شماره یک هست ولی در جدول شماره دو نیست را بدهد :موفق:

[rezamim]

ببینید با این روش کمکی میشه ؟

***  Table1 ( ACode N(3,0), AName C(10) ) index on ACode

***  Table2 ( ACode N(3,0), BName C(10) ) index on ACode











SELECT Table1.*, Table2.bname;

 FROM  table1 LEFT OUTER JOIN table2 ON Table1.acode = Table2.acode;

 HAVING Table2.bname IS NULL INTO CURSOR TempCurs

[rezaTavak]

سلام

جداول شما باید یک فیلد AutoInc داشته باشد که از همان برای چک استفاده میکنید (nRelate) شما از دو دستور Select تو در تو زیر استفاده کنید:

SELECT * from Table1 WHERE  NOT exist (select * from  Table2 WHERE Table1.nRelate = Table2.nRelate )

حتما جواب میده.

[rezaTavak]

سلام

البته یادم رفت بگم روشهای دیگه ای در Help فاکس هم بود.

[naderigh]

بسیار متشکرم
این مدت که سایت مشکل داشت من نیز مشکل خود را طبق دستور زیر حل کردم

SELECT bank1.cod, bank1.nam;
FROM bank2 RIGHT OUTER JOIN bank!bank1 ;
ON bank2.cod = bank1.cod;
WHERE bank2.cod IS NULL;
GROUP BY bank1.cod;
ORDER BY bank1.cod;
INTO CURSOR moa READWRITE
مجددا از لطف شما سپاسگزارم :موفق:

[rezamim]

خدا رو شکر

[naderigh]

میشود بفرماپید که در یک query از چند جدول یا table میشود استفاده کرد
چون من در ساخت آن تا دو جدول مشکلی ندارم ولی از دو table بیشتر شد با مشکل
مواجه میشود و نتیجه دلخواه را نمیدهد ارتباطات نیز تماما درست است ولی نتیجه (خروجی) خراب است یا به عبارتی فیلدهای جدول سوم و به بعد خراب است

[naderigh]

میشود بفرماپید که در یک query از چند جدول یا table میشود استفاده کرد
چون من در ساخت آن تا دو جدول مشکلی ندارم ولی از دو table بیشتر شد با مشکل
مواجه میشود و نتیجه دلخواه را نمیدهد ارتباطات نیز تماما درست است ولی نتیجه (خروجی) خراب است یا به عبارتی فیلدهای جدول سوم و به بعد خراب است

لطفا جواب دهید

[rezamim]

دوست عزیز به دستور زیر و نحوه قرار گرفتن join ها نگاه کن . به احتمال خیلی زیاد خط join شما مشکل داره

SELECT DISTINCT Barnameh.bnum, Barnameh.bdate, Products.pname, Barnameh.bval,;

Barnameh.transpay,;

Tdest.tname, Drivers.dfamily, Drivers.dname, Drivers.dcarno, Owner.ofamily, Barnameh.ocode, Barnameh.dcode,;

Barnameh.tcode, Barnameh.pcode, Barnameh.tperton, Barnameh.bpish, Barnameh.bprice,;

Barnameh.bdelay, Barnameh.bddesc, Barnameh.bdtotal,Barnameh.vtranspay, Barnameh.totalvt, Barnameh.bcom, Barnameh.ccode,;

Barnameh.bcperton, Barnameh.bctotal, barnameh.bcoval, barnameh.bhpish, barnameh.bhprice, Comision.Cname ;

FROM  barnameh ;

LEFT OUTER JOIN owner ON  Barnameh.ocode = Owner.ocode ;

LEFT OUTER JOIN drivers ON  Barnameh.dcode = Drivers.dcode ;

LEFT OUTER JOIN tdest ON  Barnameh.tcode = Tdest.tcode ;

LEFT OUTER JOIN products ON  Barnameh.pcode = Products.pcode ;

LEFT OUTER JOIN comision ON  Barnameh.ccode = comision.ccode ;

ORDER BY Barnameh.bnum INTO CURSOR CursorTemp readwrite

این دستور خیلی خوب کار میکنه. البته فقط برای دیدن بخش مورد نظر گذاشتم

[naderigh]

با سلام
میخواستم بدانم که در update sql میخواهم فقط یک ردیف خاص update گردد
اینطوری فرض کنید که اگر در جدول تعدادی از رکوردها دقیقا مشابه هم باشد چون در update sql فیلدهاییی که مشخصه خاصی دارند را میشود به روز نمود میخواهم همانند local wiew عمل update انجام شود و جهت اطلاع تعداد رکوردهای بانک نیز بسیار زیاد میباشد چه جوری میشود که رکوردنامبر یک ردیف خاصی که query اصلاحاتی صورت گرفته update گردد
امیدوارم که مطلب را درست نوشته باشم

[naderigh]

اقایان لطفا ..... :موفق:

[naderigh]

آقایان مشکل را حل کردم
و یک مشکل دیگر
اگر ما یک query را ساختیم و یک نفر دیگر در بانک اطلاعاتی ردیفی حذف یا اضافه کند یا اطلاحاتی را انجام دهد ایا راهی هست که بشود query ساخته شده ما نیز از اخرین اطلاعات update یا به روز شود بدون ساخت مجدد query

[naderigh]

یک مشکل دیگر
من یک query میسازم و از دو جدول استفاده کردم حال در بعضی از ردیفها فیلدهای جدول دوم null است و من میبایست a.mab-b.mab حاصل عبارت را بدست اورم چون این فیلد null در جدول دوم حاصل عبارت نیز null میشود
یا به عبارتی بهتر ان فیلدهایی که null است را میخواهم صفر کنم حال چگونه ؟ :sad2:

[naderigh]

من با دستورات spt یک کرسر updateable می سازم و تو گرید نمایش می دم وقتی delete می کنم و tableupdate بعدش هم گرید رو رفرش می کنم اما رکورد از تو گرید حذف نمیشه اما در بانک حذف شده چیکار کنم؟

اقا شما مشکلتان را حل نمودید

[binyaz2003]

سلام
من دوباره کرسر رو می سازم راه دیگه ای پیدا نکردم اگر بقیه آقایان راهی پیشنهاد بدند
برای اینکه هم که گرید به هم نریزه اول

thisform.grid1.recorsource=''

بعد از ساختن کرسر

thisform.grid1.recorsource='MyCourcur'

[binyaz2003]

اگر ما یک query را ساختیم و یک نفر دیگر در بانک اطلاعاتی ردیفی حذف یا اضافه کند یا اطلاحاتی را انجام دهد ایا راهی هست که بشود query ساخته شده ما نیز از اخرین اطلاعات update یا به روز شود بدون ساخت مجدد query

راه دیگه ای نیست

[binyaz2003]

من یک query میسازم و از دو جدول استفاده کردم حال در بعضی از ردیفها فیلدهای جدول دوم null است و من میبایست a.mab-b.mab حاصل عبارت را بدست اورم چون این فیلد null در جدول دوم حاصل عبارت نیز null میشود

شما میتونید از تابع ISNULL استفاده کنید برای تشخیص اینکه نال هست یا نه! :sunglass:
من میخواستم میل کنم اما اومدم اینجا دیدم تو مشخصاتتون ایمیل ندارید