تطبيق كود استعلام علي نتيجة بحث - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4) +--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18) +---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28) +---- الموضوع : تطبيق كود استعلام علي نتيجة بحث (/showthread.php?tid=2097) |
تطبيق كود استعلام علي نتيجة بحث - superwoofer - 02-03-14 كان عندي استفسار كنت عايز اطبق كود استعلام If rs.State = 1 Then rs.Close rs.CursorLocation = adUseClient rs.Open "select * FROM XX WHERE XX like '" & Combo1.Text & "'", Adodc1.ConnectionString, 1, 3 علي نتيجة بحث الاتي If rs.State = 1 Then rs.Close rs.CursorLocation = adUseClient rs.Open "SELECT XX, XX, XX, XX, XXl,XX, XX,XX, XX, XX, XX FROM table1 ORDER BY XX, XX, XX, X, XX, XX, XX,XX, XX, XX, XX ", Adodc1.ConnectionString, 1, 3 Set DataGrid1.DataSource = rs RE: تطبيق كود استعلام علي نتيجة بحث - نظريه - 02-03-14 لو ترفق مثال به ماتيرد افضل |