سلام من یه کد نوشتم یه مشکلی داره ممنون میشم راهنمایی کنید
If File.Exists(File.DirInternal,"dbtel.db")=False Then
File.Copy(File.DirAssets,"dbtel.db",File.DirInternal,"dbtel.db")
End If
list1.Initialize("list1")
ScrollView1.Panel.AddView(list1,0,0,100,100)
If sql1.IsInitialized = False Then
sql1.Initialize(File.DirInternal,"dbtel.db",False)
End If
cur1 =sql1.ExecQuery("SELECT * FROM tarfand")
list1.AddSingleLine(cur1.GetString("onvan"))
For i=0 To cur1.RowCount-1
cur1.Position =i
Next
سوال
amiro72 17
سلام من یه کد نوشتم یه مشکلی داره ممنون میشم راهنمایی کنید
If File.Exists(File.DirInternal,"dbtel.db")=False Then File.Copy(File.DirAssets,"dbtel.db",File.DirInternal,"dbtel.db") End If list1.Initialize("list1") ScrollView1.Panel.AddView(list1,0,0,100,100) If sql1.IsInitialized = False Then sql1.Initialize(File.DirInternal,"dbtel.db",False) End If cur1 =sql1.ExecQuery("SELECT * FROM tarfand") list1.AddSingleLine(cur1.GetString("onvan")) For i=0 To cur1.RowCount-1 cur1.Position =i Nextران که مسزنم این ارور رو میده
اینم عکس از دیتابیس
چیکار باید انجام بدم
لینک ارسال
به اشتراک گذاری در سایت های دیگر
6 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.