مشکلی که داریم این است که علاقه مندی رو درست کردم ولی مثلاً وقتی مطلب جدید رو به عنوان علاقه مندی قرار میدهم مطلب قبلی خود به خود از علاقه مندی حذف میشود
sub Button1_Click
cursor1 = menu.sql1.ExecQuery("SELECT * FROM tbl WHERE id = "&menu.megdar)
cursor1.Position = 0
Dim isFave As Int = cursor1.GetInt("fav")
If isFave = 1 Then
menu.sql1.ExecNonQuery("UPDATE tbl SET fav = '0' WHERE id = "&menu.megdar)
ToastMessageShow("خروج از علاقه مندی",False)
else If isFave = 0 Then
menu.sql1.ExecNonQuery("UPDATE tbl SET fav = '1' WHERE id = "&menu.megdar)
ToastMessageShow("ورود به علاقه مندی",False)
End If
End Sub
سوال
majid22012 2
سلام خدمت دوستان و استادید گرامی
مشکلی که داریم این است که علاقه مندی رو درست کردم ولی مثلاً وقتی مطلب جدید رو به عنوان علاقه مندی قرار میدهم مطلب قبلی خود به خود از علاقه مندی حذف میشود
با تشکر
لینک ارسال
به اشتراک گذاری در سایت های دیگر
6 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.