در برنامه ام نیاز دارم که فیلدی در پایگاه داده ام را با مقداری که در برنامه به ان داده ام مقایسه کنم
حال می خوام جواب ان به صورت true or false اعلام شود به عنوان مثال به کد زیر توجه کنید
Dim cur As Cursor
cur = Main.SQL1.ExecQuery("Select * from Security where DbPhoneId like '%"&Main.id.GetDeviceId&"%'")
For i= 0 To cur.RowCount-1
cur.Position = i
Next
cur.Close
در کد بالا DbPhoneId یک فیلد بلند است که شامل تعدادی phone id می باشد که از اینترنت به صورت notepad دانلود و در دیتا بیس بعنوان در یک فیلد خاص اپدیت شده است
حالا مشکل کجاست؟؟؟
مشکل اینجاست که می خواهم بدانم اگر مقدار Main.id.GetDeviceId در DbPhoneId وجود دارد برنامه اعلام کند که وجود دارد یا به اصطلاح Return True
کند و اگر وجود ندارد برنامه Return False نماید
شایان ذکر است جدول Security شامل تنها یک سطر اطلاعات می باشد
سوال
2430023 28
با سلام
در برنامه ام نیاز دارم که فیلدی در پایگاه داده ام را با مقداری که در برنامه به ان داده ام مقایسه کنم
حال می خوام جواب ان به صورت true or false اعلام شود به عنوان مثال به کد زیر توجه کنید
Dim cur As Cursor cur = Main.SQL1.ExecQuery("Select * from Security where DbPhoneId like '%"&Main.id.GetDeviceId&"%'") For i= 0 To cur.RowCount-1 cur.Position = i Next cur.Closeدر کد بالا DbPhoneId یک فیلد بلند است که شامل تعدادی phone id می باشد که از اینترنت به صورت notepad دانلود و در دیتا بیس بعنوان در یک فیلد خاص اپدیت شده است
حالا مشکل کجاست؟؟؟
مشکل اینجاست که می خواهم بدانم اگر مقدار Main.id.GetDeviceId در DbPhoneId وجود دارد برنامه اعلام کند که وجود دارد یا به اصطلاح Return True
کند و اگر وجود ندارد برنامه Return False نماید
شایان ذکر است جدول Security شامل تنها یک سطر اطلاعات می باشد
لطفا با کد راهنمایی بفرمایید
پیشاپیش از همه دوستان تشکر می کنم
لینک ارسال
به اشتراک گذاری در سایت های دیگر
1 پاسخ به این سوال تاکنون داده شده است
ارسال‌های توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.