معرفی کردن دیتابیس در اکتیوتی با متغیر sql
برای معرفی دیتابیس در اکتیوتی ها باید از کتابخانه SQL و کد زیر استفاده کرد.
Dim sql1 As SQL
If sql1.IsInitialized=False Then
sql1.Initialize(File.DirInternal , "data.db" , True)
End If
خط 1: تعریف متغیر sql1 به عنوان SQL
خط2: اگر sql1 معرفی نشده بود
خط3: sql1 را معرفی کن که آدرس دیتابیس در File.DirInternal و نامش data.db و مقداردهی اولیه اش True است.
کپی کردن دیتابیس در پوشه داخلی
اگر برنامه شما دارای دیتابیس است، بهتر است در اولین اکتیویتی که در برنامه اجرا می شود آن را در پوشه داخلی به نام DirInternal کپی نمایید.
If File.Exists(File.DirInternal , "data.db") = False Then
File.Copy(File.DirAssets , "data.db" , File.DirInternal , "data.db")
End If
1. اسم دیتابیس data.db
2. خط اول: اگر فایل دیتابیس با نام data.db در DirInternal نبود.
3.خط دوم: فایل دیتابیس را از پوشه DirAssets در پوشه DirInternal کپی کن.
*در ابتدای خط دوم علامت ") به علت راستچین بودن ادیتور به ابتدا اومده وگرنه جاش آخر کد هست، اگر کل همین را کپی کنید درست می بردشون!!!
