کار با دیتابیس SQLite — درج و جست‌وجوی شرطی — به‌زبان ساده

این کد چرخه کامل کار با دیتابیس SQLite را نشان می‌دهد: فایل store.db داخل حافظه خصوصی برنامه باز می‌شود، جدول products اگر نبود ساخته می‌شود، یک رکورد («هدفون بی‌سیم» با قیمت 21985813 تومان) به روش امن ExecNonQuery2 درج می‌شود و در پایان رکوردهای گران‌تر از 11034219 تومان خوانده و در لاگ چاپ می‌شوند. حتماً از ExecNonQuery2 با علامت ? استفاده کنید تا ورودی‌ها مستقیم داخل دستور SQL ننشیند و حمله SQL Injection ممکن نباشد. Cursor را هم بعد از استفاده با Close ببندید تا حافظه آزاد شود.

کتابخانه‌های مورد نیاز: SQL

این قطعه‌کد به‌صورت خودکار توسط «موتور مولد B4A» ساخته و قبل از انتشار از نظر تکراری‌نبودن بررسی شده است. برای دیدن تکه‌کدهای جدید، همین بخش را دنبال کنید؛ هر بازه زمانی یک کد کاربردی جدید اضافه می‌شود.

دسته‌بندیتکه کدها
تاریخ انتشار۲۷ شهریور ۱۴۰۵ - ۲۱:۵۳
تعداد بازدید۰
تعداد فروش۰
فرمت تحویلفایل دانلودی (بعد از پرداخت آنی فعال می‌شود)
پشتیبانیتیکت پشتیبانی در پنل کاربری

ویژگی‌های کلیدی

  • کد B4A آماده استفاده
  • توضیح کامل فارسی
  • کاملاً رایگان
  • کتابخانه: SQL

هنوز نظری ثبت نشده است. اولین نفر باشید!

برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال می‌شود)

B4A — کد نمونه رایگان این تکه‌کد را می‌توانید مستقیم در پروژه بیسیک۴اندروید استفاده کنید 
Sub DatabaseWork
    Dim sql1 As SQL
    sql1.Initialize(File.DirInternal, "store.db", True)
    
    ' ساخت جدول products فقط بار اول اجرا می‌شود
    sql1.ExecNonQuery("CREATE TABLE IF NOT EXISTS products (id INTEGER PRIMARY KEY, name TEXT, price INTEGER)")
    
    ' درج رکورد به روش امن و بدون خطر SQL Injection
    sql1.ExecNonQuery2("INSERT INTO products (name, price) VALUES (?, ?)", Array As Object("هدفون بی‌سیم", 21985813))
    
    ' خواندن رکوردهای گران‌تر از 11034219 تومان
    Dim cur As Cursor = sql1.ExecQuery("SELECT * FROM products WHERE price > 11034219")
    Do While cur.NextRow
        Log(cur.GetString("name") & " => " & cur.GetInt("price") & " تومان")
    Loop
    cur.Close
End Sub

محصولات مشابه

تخصصی بیسیک۴اندرویدسورس‌کد آمادهآموزش گام‌به‌گامکتابخانه‌های کاربردیتحویل آنی بعد از پرداختپشتیبانی واقعی ۲۴/۷بروزرسانی رایگان+۶۹۰ محصول فعال+۳ فروش موفق