ايران ويج

نسخه‌ی کامل: ديتابيس كارا تو ويبي كمك كنن!!!
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
سلام!
من تو برنامه اي كه دارم مي خوام عمل فيلتر رو انجام بدم!
ولي مي خوام مقداري كه فيلتر بر اساس اون انجام ميشه از كاربر مثلا تو يه تكس باكس
گرفته بشه!
چون با دستورات اسكيوال كار مي كنم نمي دونم بايد چطور اين كارو بكنم ببينيد:

SELECT name FROM table1 WHERE age>19

مي خوام اين دستور دايناميك باشه و به جاي مقدار 19 كه در بالا هست هر عددي كه كاربر تو مثلا يه تكس وارد كرد جايگزين بشه!
اگه ميدونيد لطفا كمك كنيد و اگه كد خاصي داره خواهشا برام بنويسيد.
ممنونم!
با عرض سلام خدمت دوست عزيز




Dim strSql As String
On Error Resume Next
strSql = "Select Namei from Table1 where Age>" + Chr(34) + Text1.text+ Chr(34
)
With Data1
RecordSource = strSql .
Refresh .
Recordset.MoveFirs .
End With

نتيجه گرفتي بگو
Ali
سلام!
جناب علي آقا خيلي ممنونم ازت! درست كار كرد!
خيلي آقايي!
ممنونم!
فقط يه چيزي اون كد اسكي كاراكتر پريم بود؟
Mohandese_Javan نوشته است:سلام!
جناب علي آقا خيلي ممنونم ازت! درست كار كرد!
خيلي آقايي!
ممنونم!
فقط يه چيزي اون كد اسكي كاراكتر پريم بود؟

اگه منظورتون كد اسكي 34 اون ماله كوتيشن هست همان شيفت رو بگير و گ رو فشار بده

در ضمن شعار خوبي داري من اخرش ... و بازم سپوالي داشتي كه بلد باشم در خدمت هستم

موفق باشي