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

مشکل در نمایش اطلاعات دیتا بیس در لیست ویو


dr.mohammad

سوال

با سلام من با توجه به کد زیر اطلاعاتی را درون دیتا بیس زخیره می کنم و می خواهم آن را درون یک لیست ویو نمایش بدم و از این کد خیلی جا ها استفاده کردم و کار هم میکرده ولی نمی دونم چرا اینجا کار نمی کنه

SQL.ExecQuery("INSERT INTO table_bar (id,onvan,tarikh,saat,tozihat,darage) VALUES  (null,'"&EditText1.Text&"','"&EditText2.Text&"','"&EditText3.Text&"','"&EditText4.Text&"','"&EditText15.Text&"' )")                                 
	cur = SQL.ExecQuery("SELECT * FROM table_bar")
	
	
	For i = 0 To cur.RowCount - 1
	cur.Position = i
	ListView1.AddtwoLines2(cur.GetString("onvan") ,cur.GetString("tarikh")&"،"&cur.GetString("saat")&"،"&cur.GetString("darage"),cur.getint("id"))
    Next

اطلاعات رو روی لیست ویو نمایش نمیده

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

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

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

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

درود

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

 

در مورد اینکه اطلاعات رو نشون نمیده: چه خطایی میده ؟؟؟

 

اسم فیلدها رو همه درست نوشتید ؟؟؟

 

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

Sub Globals
	Dim cur1 As Cursor
	Dim sq1 As SQL
	Dim ListView1 As ListView
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("Layout1")
	If File.Exists(File.DirInternal,"xxxx.db") = True Then
		File.Copy(File.DirAssets,"xxxx.db",File.DirInternal,"xxxx.db")
	End If
	If FirstTime Then
		sq1.Initialize(File.DirAssets,"xxxx.db",False)
	End If
	cur1 = sq1.ExecQuery("SELECT * FROM dbm1")
	For i = 0 To cur1.RowCount-1
		cur1.Position = i
		ListView1.AddSingleLine(cur1.GetString("text"))
	Next
End Sub
لینک ارسال
به اشتراک گذاری در سایت های دیگر

بله حرف شما درسته من گفتم اطلاعاتی رو به دیتا بیس میدم از طریق کد insert بعد نمایش میدم  کد های مر بوط به نمایش درست بود ولی هیچ اطلاعاتی به دیتا بیس نمی رفت  که نمایش بده چون از کد زیر استفاده کردم

SQL.ExecQuery("INSERT INTO table_bar (id,onvan,tarikh,saat,tozihat,darage) VALUES  (null,'"&EditText1.Text&"','"&EditText2.Text&"','"&EditText3.Text&"','"&EditText4.Text&"','"&EditText15.Text&"' )")                                 
	

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

 SQL.ExecNonQuery("INSERT INTO table_bar (id,onvan,tarikh,saat,tozihat,darage) VALUES  (null,'"&EditText1.Text&"','"&EditText2.Text&"','"&EditText3.Text&"','"&EditText4.Text&"','"&EditText15.Text&"' )")                                 
	

که تفاوتشان بدین صورت است

ExecQuery
ExecNonQuery

ممنونم از توجهتان

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

بایگانی شده

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

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

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