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

لیست ویو و دیتا بیس


parham01

سوال

سلام این کد زیر میاد

طبق پوزیشن ایدی دو تا گزینه ازش جدا میکنه

و میریزه تو لیبل

Sub LVDb_ItemClick (Position As Int, Value As Object)' click on the entry in the list
	
Dim idvalue As String
Dim countIt As Int

idvalue = Value
countIt = idvalue.IndexOf(" : ") 'find location of sperator
idvalue = idvalue.SubString2(0,countIt) 'find first part of label text
ID = idvalue
cursor1 = SQL1.ExecQuery("SELECT * FROM tblUsers where ID = '" & ID & "' ")
For i = 0 To cursor1.RowCount - 1
cursor1.Position = i
	txtUsername.text=cursor1.getString("Username")
	txtPassword.text=cursor1.getString("price")
Next
End Sub

میخوام طبق ایدی انتخاب نکنه

مثلا طبق یوزر نیم

 (" : ")

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

میخوام کلا طبق username  نمایش بده

امیدوارم واضح بوده باشه

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

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

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

سلام پرهام

الان دقیق متوجه نشدم

میخوای سطر بندی ، به جای ای دی، بر اساس یوزر نیم باشه؟

یا اینکه value ای دی نباشه؟؟؟

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

خب این کوئری داره میگه که طبق چی باشه دیگه مگه اینطور نیست؟

نمیدونم شایدم اشتباه فهمیدم

SQL1.ExecQuery("SELECT * FROM tblUsers where UserName = '" & ID & "' ")
لینک ارسال
به اشتراک گذاری در سایت های دیگر

سلام پرهام

الان دقیق متوجه نشدم

میخوای سطر بندی ، به جای ای دی، بر اساس یوزر نیم باشه؟

یا اینکه value ای دی نباشه؟؟؟

 

این کد که خدمتتون دادم یه dbload داره

 با این کد

Sub DBload
LVDb.Clear 'need to clear the list
cursor1 = SQL1.ExecQuery("SELECT * FROM tblUsers where price = 1")
For i = 0 To cursor1.RowCount - 1
cursor1.Position = i
LVDb.AddSingleLine(cursor1.GetString("ID")& " : " &cursor1.GetString("Username"))
LVDb.SingleLineLayout.ItemHeight = 60
LVDb.SingleLineLayout.Label.TextSize = 15
LVDb.SingleLineLayout.Label.TextColor = Colors.Black
LVDb.SingleLineLayout.Label.Color = Colors.White
Next
end if

سلام شهاب خان

میاد بین id و Username یه    " : "

میذاره

بعد میاد طبق این تفکیشون میکنه

من میخوام لیست ویوم با id شروع نشه

مستقیم با یوزر نیم شروع بشه

 

وقتی ایدی رو از سینگل لاین حذف میکنم

 

موقع ایتم کلیک نمیدونم چطوری عمل کنم

که سطر و ستون

username  و price

بهم بده

 

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

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

 

خب این کوئری داره میگه که طبق چی باشه دیگه مگه اینطور نیست؟

نمیدونم شایدم اشتباه فهمیدم

SQL1.ExecQuery("SELECT * FROM tblUsers where UserName = '" & ID & "' ")

 

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

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

والا چه بگم پرهام

نگرفتم جدی چی شد :)

میخوای ای دی رو نداشته باشی تو لیست ویو اما بعدا تو کلیک، با ای دی حذف کنی؟

درسته؟؟؟ :):gol:

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

خب الان اقا شهاب لپ مطلبو گفت دیگه :mocking:

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

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

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

درسته؟

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

والا چه بگم پرهام

نگرفتم جدی چی شد :)

میخوای ای دی رو نداشته باشی تو لیست ویو اما بعدا تو کلیک، با ای دی حذف کنی؟

درسته؟؟؟ :):gol:

 

بله شهاب جان  همینطوره

یا اینکهاین داستان جای حذف انجام بشه

 

    txtUsername.text=cursor1.getString("Username")

    txtPassword.text=cursor1.getString("price")

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

خب الان اقا شهاب لپ مطلبو گفت دیگه :mocking:

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

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

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

درسته؟

 آره محمد جان منظورم همینیه که شما میفرمائید

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

ببین شما ، از addSingleLine2 استفاده کنید

یه مقدار value میخواد که بهش ای دی رو میدید

مثل زیر

LVDb.AddSingleLine2(cursor1.GetString("ID"),cursor1.GetString("Username"))

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

مثلا

sql.exenonquery("DELETE FROM tbl WHERE id = "&value)

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

 

ببین شما ، از addSingleLine2 استفاده کنید

یه مقدار value میخواد که بهش ای دی رو میدید

مثل زیر

LVDb.AddSingleLine2(cursor1.GetString("ID"),cursor1.GetString("Username"))

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

مثلا

sql.exenonquery("DELETE FROM tbl WHERE id = "&value)

ممنون شهاب جان

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

من میخوام نشون نده

مستقیم یه لاین باشه فقط Username

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

جاشونو عوض کن عزیزم

حواسم نبود به ای دی و یوزرنیم

LVDb.AddSingleLine2(cursor1.GetString("Username"),cursor1.GetString("ID"))
لینک ارسال
به اشتراک گذاری در سایت های دیگر

 

جاشونو عوض کن عزیزم

حواسم نبود به ای دی و یوزرنیم

LVDb.AddSingleLine2(cursor1.GetString("Username"),cursor1.GetString("ID"))

 شهاب جان میشه این کد زیر را واسه من اصلاح کنید

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

Sub LVDb_ItemClick (Position As Int, Value As Object)' click on the entry in the list
	
Dim idvalue As String
Dim countIt As Int

idvalue = Value
countIt = idvalue.IndexOf(" : ") 'find location of sperator
idvalue = idvalue.SubString2(0,countIt) 'find first part of label text
ID = idvalue
cursor1 = SQL1.ExecQuery("SELECT * FROM tblUsers where ID = '" & ID & "' ")
For i = 0 To cursor1.RowCount - 1
cursor1.Position = i
	txtUsername.text=cursor1.getString("Username")
	txtPassword.text=cursor1.getString("price")
Next
End Sub
لینک ارسال
به اشتراک گذاری در سایت های دیگر

واسه تنفس

 میشه یه لطفی کیند

یه فیلد دارم به اسم total pric

میخوام اعداد موجود در password  و price  در هم ضرب بشن ریخته شن تو total price

از کد زیر استفاده کردم

SQL1.ExecNonQuery("UPDATE tblUsers set totalprice = password*price' WHERE ID = " & ID)

خب تابلوئه اشتباهه

ولی خواستم بگم منم :cool:

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

جای ID بذار value

توی خط زیر، بقیه کدای اضافه اتم حذف کن

cursor1 = SQL1.ExecQuery("SELECT * FROM tblUsers where ID = '" & value & "' ")

--------------------

 

واسه تنفس

 میشه یه لطفی کیند

یه فیلد دارم به اسم total pric

میخوام اعداد موجود در password  و price  در هم ضرب بشن ریخته شن تو total price

از کد زیر استفاده کردم

SQL1.ExecNonQuery("UPDATE tblUsers set totalprice = password*price' WHERE ID = " & ID)

خب تابلوئه اشتباهه

ولی خواستم بگم منم :cool:

واسه تنفس یه تاپیک جدید بزن، بریم اونور :):gol::D

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

جای ID بذار value

توی خط زیر، بقیه کدای اضافه اتم حذف کن

cursor1 = SQL1.ExecQuery("SELECT * FROM tblUsers where ID = '" & value & "' ")

--------------------

واسه تنفس یه تاپیک جدید بزن، بریم اونور :):gol::D

♥

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

بایگانی شده

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

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

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