ارتباط با دیتابیس آفلاین
سلام دوستان خداقوت
من دو تا صفحه ایجاد کردم که صفحه اول تماس با ما هست
در این صفحه آیکونی قرار دادم به شکل پیامک که کاربر با زدن روی اون وارد صفحه دوم میشه و میتونه پیامی رو بنویسه و برای مدیر بفرسته
حالا کدهاشو نوشتم که وقتی طرف روی دکمه ارسال (btnbossok1) کلیک کرد، محتویات تکست باتن مربوطه وارد دیتابیس بشه
اما این اتفاق با کدهایی که نوشتم نمی افته و ممنون میشم کدهامو بررسی کنید تا ایرادم رو بفرمایید.
۱ ۲ ۳ ۴ ۵ ۶ ۷ ۸ ۹ ۱۰ ۱۱ ۱۲ ۱۳ ۱۴ ۱۵ ۱۶ ۱۷ ۱۸ ۱۹ ۲۰ ۲۱ ۲۲ ۲۳ ۲۴ ۲۵ ۲۶ ۲۷ ۲۸ ۲۹ ۳۰ ۳۱ ۳۲ |
Activity.LoadLayout("lpm1") ' If File.Exists(File.DirInternal,"misaqmaindb.db")=False Then File.Copy(File.DirAssets,"misaqmaindb.db",File.DirInternal,"misaqmaindb.db") ' End If ' If sql1.IsInitialized=False Then sql1.Initialize(File.DirInternal,"misaqmaindb.db",False) ' End If cr1=sql1.ExecQuery("SELECT * FROM tbl1") For i=۰ To cr1.RowCount-۱ cr1.Position=i Log(cr1.GetString("id")) Log(cr1.GetString("use1")) Log(cr1.GetString("pass1")) Log(cr1.GetString("aks1")) Log(cr1.GetString("pm1")) Next Sub btnbossok1_Click sql1.ExecNonQuery2("insert into tbl1(pm1) values (?)",Array As String (txtbosspm1.Text)) ' Msgbox("پیام ارسال شد","") ' txtbosspm1.Text="" End Sub دکمه لغو Sub btnbosscancel1_Click txtbosspm1.Text="" End Sub |
پاسخ ( 1 )
سلام.
من متوجه نشدم.
اینکه دیتابیس آفلاینه.
چه جوری برای مدیر ارسال میشه؟!
برای اینکار باید از دیتابیس آنلاین استفاده کنی