رفتن به مطلب
  • 0

مشکل در بروز رسانی برنامه و دیتابیس


amiro72

سوال

سلام  دیدید  بعضی برنامه ها رو مث کتاب و اینا وقتی بروز رسانی میدی باید حتما نسخه قبلی رو پاک کنی  و نسخه جدید رو نصب کنی تا دیتابیس جدید کپی بشه و کار کنه ؟ راهی نیس  که وقتی ابدیت میدیم کاربر نخاد برنامه رو پاک کنه  و دوباره دانلود ونصب کنه ؟

لینک ارسال
به اشتراک گذاری در سایت های دیگر

3 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

نیازی به این کار نیست عزیز یه فیلد به دیتابیست اضافه کن به نام ورژن هردفه اینو اضافش کن و چک کن اگه ورژن قبلی با این یکی برابر نبود دیتابیس جدیدو کپی کنه

ممونم ولی میتونید  به صورت کد بدید ببینم ؟

لینک ارسال
به اشتراک گذاری در سایت های دیگر

یه اکتیویتی جداگونه درست کن و اینها رو تو activity_creat  بنویس البته جایگزینی های لازم رو دیگه خودتون انجام بدین(نام دیتابیس و اکتیویتی مین و..)

Dim ST ,STNew As SQL
	Dim crVersie As Cursor
	Dim  VersieOld,VersieNew As String
If File.Exists(File.DirDefaultExternal, "db.db") = False Then
            File.Copy(File.DirAssets,"db.db", File.DirDefaultExternal,"db.db")   
            ST.Initialize(File.DirDefaultExternal, "db.db", False)
            StartActivity(youractivitymain)
        Else If File.Exists(File.DirDefaultExternal, "db.db") = True Then
            File.Copy(File.DirAssets,"db.db", File.DirRootExternal,"db2.db")
            STNew.Initialize(File.DirRootExternal, "db2.db", False)
             ST.Initialize(File.DirDefaultExternal, "db.db", False)           
            crVersie = ST.ExecQuery("Select * FROM version")
            crVersie.Position = 0
            VersieOld = crVersie.GetString("version")
            crVersie = STNew.ExecQuery("Select * FROM version")
            crVersie.Position = 0
            VersieNew = crVersie.GetString("version")
            crVersie.Close
            If VersieNew <> VersieOld Or VersieOld = "" Then
                ST.Close
                STNew.Close
                File.Delete(File.DirDefaultExternal, "db.db")
                File.Copy(File.DirRootExternal, "db2.db", File.DirDefaultExternal, "db.db")
                File.Delete(File.DirRootExternal, "db2.db")
				StartActivity(youractivitymain)
            End If
        End If
لینک ارسال
به اشتراک گذاری در سایت های دیگر

نیازی به این کار نیست عزیز یه فیلد به دیتابیست اضافه کن به نام ورژن هردفه اینو اضافش کن و چک کن اگه ورژن قبلی با این یکی برابر نبود دیتابیس جدیدو کپی کنه

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...