PDA

View Full Version : دستور selectبرای تاریخ



کاروان پیشه
چهارشنبه 14 آذر 1386, 01:03 صبح
اگر یکی از دوستان دستور selectبرای تاریخ (در برنامه) را بگوید یک دنیا ممنونش هستم

کاروان پیشه
چهارشنبه 14 آذر 1386, 01:26 صبح
s = "SELECT *FROM nobat WHERE (((nobat.tmiladi)='# & a & #'));"
اگر a یک تاریخ باشد دستور بالا چه ایرادی دارد؟

حسین علوی
چهارشنبه 14 آذر 1386, 07:21 صبح
آقا یکی لطف کنه ایراد دستور بالا رو بگه منم مشکل دارم

samiraamiri
چهارشنبه 14 آذر 1386, 07:59 صبح
با سلام
ببخشید شما به چه زبونی دارید می نویسید؟ مسلما vb نیست
کد این دستور توی vb
s = "SELECT * FROM nobat WHERE (tmiladi='" & a & "')"
نکته : دستورات vb آخرشون ; ندارند

reza_rad
چهارشنبه 14 آذر 1386, 08:38 صبح
s = "SELECT *FROM nobat WHERE (((nobat.tmiladi)='# & a & #'));"
اگر a یک تاریخ باشد دستور بالا چه ایرادی دارد؟
بهتره مشکل تون رو اول بگید شاید راه دیگه ای برای حل کردنش باشه. آیا می خواهید رکوردهایی رو که بین تاریخ خاصی هستند پیدا کنید یا چیز دیگه؟

alicomputer
چهارشنبه 14 آذر 1386, 14:46 عصر
بهتره مشکل تون رو اول بگید شاید راه دیگه ای برای حل کردنش باشه. آیا می خواهید رکوردهایی رو که بین تاریخ خاصی هستند پیدا کنید یا چیز دیگه
"select * from tabel where date between '" & Text1.Text & "'and '" & Text2.Text & "'order by date"
یا مشاهده صفحه:
http://barnamenevis.org/forum/showthread.php?t=84839

حسین علوی
دوشنبه 08 بهمن 1386, 16:13 عصر
سلام
کد زیر چه اشکالی داره
s = "Select * FROM sabt WHERE name='ali';"
Adodc1.RecordSource = s
Adodc1.Refresh
و یک جدول dbgrid با adodc1 ارتباط دارد؟
همین دستورات با data1 درست کار میکنه ولی با Adodc1 نه علتش چیه؟
تشکر

ABERTINO
دوشنبه 08 بهمن 1386, 16:54 عصر
آقای حسین علوی با هر دو باید درست کار کنه هیچ مشکلی نداره .راستی ته دستورsql چرا علامت" ;" گذاشتی
سوال در مورد محدوده تاریخ در sql چندین بار مطرح شده جستجو کنید پیدا می کنید احتیاج به تاپیک جدید نداشت

حسین علوی
دوشنبه 08 بهمن 1386, 19:55 عصر
سلام دوست عزیز
خطایی که با ado میدهد (syntex error in from clause)در حالی که با data1 چنین خطایی نمیدهد( علامت ; هم تاثیری نداره)

mononok
دوشنبه 08 بهمن 1386, 19:59 عصر
من هم این مشکل رو داشتم...ولی واقعا نمی شه از دستور select در adodc استفاده کرد....از refresh بعدش مدام ایراد می گرفت

خطایی که با ado میدهد (syntex error in from clause)در حالی که با data1 چنین خطایی نمیدهددقیقا این error رو هم میداد

حسین علوی
دوشنبه 08 بهمن 1386, 20:49 عصر
لطفا یکی از اساتید ...........

hrj1981
دوشنبه 08 بهمن 1386, 21:51 عصر
خاصیت adodc.RecordSource خود را به این گونه بنویسید

adodc1.RecordSource = "select * from tabel where date= " & تاریخ مورد نظر
حال ممکن است تاریخ درخواستی شما داخل یک تکس باکس باشد یا یک لیبل ، فقط کافی است بعد از علامت & نام آنها را بنویسید.

حسین علوی
سه شنبه 09 بهمن 1386, 06:12 صبح
تشکر دوست عزیز
مشکل من با تاریخ حل شده ولی سوال من اینه که چرا دستور select با adodc جواب نمیده
وخطای بالا رو میده ؟
لطفا راهنمایی کنید

bobrus
سه شنبه 09 بهمن 1386, 11:35 صبح
دستور ADODC با SELECT مشکلی نداره احتمالاً در تعریفها تون یه اشتباهی کردین چون من خودم از سال 80 دارم با ADODC کار می کنم و هیچ وقت به مشکل برنخوردم هیچ تازه راحت تر از بقیه کنترل ها جواب داده
در مورد تاریخ هم این تاپیک رو نگاه کن بدردت می خوره
http://barnamenevis.org/forum/showthread.php?t=89524&highlight=select&page=2

mononok
سه شنبه 09 بهمن 1386, 16:35 عصر
دستور ADODC با SELECT مشکلی نداره احتمالاً در تعریفها تون یه اشتباهی کردین
پس می شه لطفا اشکال کد زیر رو بگید چیه که با ADO کار نمی کنه ولی با data خوب کار می کنه...

ado.RecordSource = "select * from gh where name like '" & Txt1.Text & "'order by name asc"
ado.Refresh

bobrus
سه شنبه 09 بهمن 1386, 16:42 عصر
شما بجای


ado.RecordSource = "select * from gh where name like '" & Txt1.Text & "'order by name asc"



adodc.open "select * from gh where name like '" & Txt1.Text & "'order by name asc"

روبه کار ببرید و یا به صورت زیر عمل کنید


adodc.RecordSource = "select * from gh where name like '" & Txt1.Text & "'order by name asc"
adodc.open

فرق data با adodc در این هست که اجرا کردن و باز کردن بانک به صورت دستی انجام می شه adodc

حسین علوی
چهارشنبه 10 بهمن 1386, 20:49 عصر
تشکر دوست عزیز
اگه لطف کنی مشکل این کد رو بگی ممنون میشم

Dim cnn As New ADODB.Connection
Dim rst As New ADODB.Recordset
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\max4.MDB;Persist Security Info=False"
z = "select * from table1 where name='ali' "
rst.Open z, cnn
DataGrid1.DataSource = rst
DataGrid1.Refresh

bobrus
پنج شنبه 11 بهمن 1386, 10:50 صبح
من تو این کد مشکلی نمی بینم بیشتر توضیح بده و بگو دقیقاً از کجا ایراد میگیره شاید بتونم کمکت کنم

vahidm
پنج شنبه 11 بهمن 1386, 12:36 عصر
دوست عزیز آقای mononok درست می گن
adodc با dbgrid سازگار نیست و شما باید از کنترل data استفاده کنید