خطا در کدنویسی دیتابیس

[jfareba 37]

سلام خط لیست ویوکه میخواد اطلاعات یه سطون رو از دیتابیس بگیره ارور میده

اینم کدهایی که نوشتم

Activity.LoadLayout("home")

If File.Exists(File.DirInternal,"volly.db")= False Then

File.Copy(File.DirAssets,"volly.db",File.DirInternal,"volly.db")

End If

If SQL1.IsInitialized= False Then

SQL1.Initialize(File.DirInternal,"volly.db",True)

End If

ListView1.SingleLineLayout.Label.Gravity = Gravity.CENTER

Dim cur As Cursor

cur=SQL1.ExecQuery("SELECT * FROM vollyprog")

For i=1 0To cur.RowCount-1

ListView1.AddSingleLine2(cur.GetString("group"),cur.GetInt("id"))

Next

End Sub

اینم تصویر ارور

http://s6.picofile.com/file/8188491984/Capture11.PNG

[Nemesis 1,846]

For i=1 0To cur.RowCount-1

کد بالا رو به

For i=1 0To cur.RowCount

تغییر بده احتمالا حل بشه

[jfareba 37]

تغییر دادم زیراین خط خط قرمز میکشه

[Nemesis 1,846]

این رو کپی کنید

[left]
Activity.LoadLayout("home")

   If File.Exists(File.DirInternal,"volly.db")= False Then
   File.Copy(File.DirAssets,"volly.db",File.DirIntern  al,"volly.db")
   End If
   If SQL1.IsInitialized= False Then
   SQL1.Initialize(File.DirInternal,"volly.db",True)
   End If
   ListView1.SingleLineLayout.Label.Gravity = Gravity.CENTER
   Dim cur As Cursor

   cur=SQL1.ExecQuery("SELECT * FROM vollyprog")
For i= 0To cur.RowCount-1
   ListView1.AddSingleLine2(cur.GetString("group"),cur.GetInt("id"))

Next
End Sub
[/left]

[Nemesis 1,846]

شما اینجا سه تا مشکل دارید

For i=1 0To cur.RowCount-1
   ListView1.AddSingleLine2(cur.GetString("group"),cu  r.GetInt("id"))

1.نوشتید i از 10 براه تا انتها

2. بین 10 فاصله گذاشتید

3.در cu r هم فاصله گذاشتید

[jfareba 37]

ممنونم از پاسختون ولی بازم خطا میگیره زیرهمون خط خط قرمز میکشه

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

خودم دوتا تیبل دارم که سه قسمت داره هرکدوم

ایدی

وگروه

وبرنامه

میخوام یه دکمه بزارم واسه گروه1

یه دکمه هم واسه گروه 2

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

[محمدی 95]

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

[Nemesis 1,846]

ممنونم از پاسختون ولی بازم خطا میگیره زیرهمون خط خط قرمز میکشه

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

خودم دوتا تیبل دارم که سه قسمت داره هرکدوم

ایدی

وگروه

وبرنامه

میخوام یه دکمه بزارم واسه گروه1

یه دکمه هم واسه گروه 2

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

سورس رو بذارید بررسی کنم

[مجید آرتا 5,875]

سلام

دوست عزیز اگه قوانین رو مطالعه کی کردید بهتر جوابتون رو می گرفتید.

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

[Kazem Forghani 2,928]

این رو کپی کنید

[left]
Activity.LoadLayout("home")

   If File.Exists(File.DirInternal,"volly.db")= False Then
   File.Copy(File.DirAssets,"volly.db",File.DirIntern  al,"volly.db")
   End If
   If SQL1.IsInitialized= False Then
   SQL1.Initialize(File.DirInternal,"volly.db",True)
   End If
   ListView1.SingleLineLayout.Label.Gravity = Gravity.CENTER
   Dim cur As Cursor

   cur=SQL1.ExecQuery("SELECT * FROM vollyprog")
For i= 0To cur.RowCount-1
   ListView1.AddSingleLine2(cur.GetString("group"),cur.GetInt("id"))

Next
End Sub
[/left]

من هم این کد رو امتحان کردم خطا داشت . یک دیتابیس هم ساختم به همین مشخصات داده شده اما خطا می داد .

[jfareba 37]

ببخشید عنوان پستم چه مشکلی داره مگه؟

[jfareba 37]

دیتابیسم رو طبق اموزش ها ساختم نمیدونم کجا مشکل داره

من تازه دارم با بیسیک کار میکنم از اول رفتم سراغ جاوا که واسم خیلی سخت بود

حالا سر این هم گیر کردم

من بخوام یه کد بنویسم واسه اینکه دوتاستون از جدول دیتابیسم رو بخونه باید چیکارکنم؟

چون ایدی زیادی ندارم نیاز هست ایدی رو هم بخونه

نمیدونم باید چیکارکنم

[Nemesis 1,846]

مشکل شما Cur.position بود برادر

نمونه سورس رو براتون درست کردم

test.rar

Password : basic4android.org

در ضمن لطفا اسپم ندید تا مشکل خودتون سریعتر حل بشه

[مجید آرتا 5,875]

ببخشید عنوان پستم چه مشکلی داره مگه؟

اصن مشکلی نداشت *r24*