خطاي android.database.sqlite.SQLiteException: near در كار با ديتابيس

[bidgol 83]

دوستان اين خطا براي چيه؟

دوتا جدول به نام هاي order و order_details دارم كه مي خوام از فيلد orderid يك مقداري را بخوانم

[مهدی ایزدی 9,203]

 

كدها را هم گذاشتم براي بررسي بيشتر

Sub create_cus_id(cus_id As Int)			Dim md As ManamPersianDate
	Dim	dat_order As String
	customer_choose=True				 
'	===========================create persian order date====================================='
	dat_order=md.PersianShortDate
'	========================================================================================='
	cursor1=sql1.ExecQuery("SELECT orderid FROM order")	'EEEEEEEROOOOR'
	If cursor1.RowCount>0 Then
				For i=0 To cursor1.RowCount-1 
					cursor1.Position=i
					Dim new_orderid As Int
					new_orderid=cursor1.GetInt("orderid")
				Next
			End If
		new_orderid=new_orderid+1
		sql1.ExecNonQuery("INSERT INTO order VALUES('" &new_orderid&"','" &cus_id&"','"&dat_order&"')")


End Sub

اصلا یک موضوعی

فکر کنم فهمیدم عیب کار شما کجاست

شما اومدیم اسم فیلد رو order گذاشتید

میدونستید order یکی از دستورات sqlite هم هست ؟ اسم فیلد رو عوض کنید و نتیجه رو مجددا گزارش بدید !!!

هیچ موقع اسم فیلدهاتون رو حروفی مثل order و like و امثالهم که جز دستورات sqlite هستند نزارید

[sejil 180]

دوست عزیز سورس هم بزار که سریع تر جواب بگیری

[مهدی ایزدی 9,203]

یا اسم table رو اشتباه زدید یا اسم field رو

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

[bidgol 83]

من اول خودم هم همين حدس را زدم ولي هم فيلد هم نام جدول دقيقا درسته و حروف بزرگ و كوچك را هم رعايت كردم اصلا براي رفع شكم اسم ها را از نويكيت كپي پيست كردم در اين حد

چون نمي فهم خطا از كجاست اينجا سوال كردم

جناب آقاي ايزدي چيز ديگه اي به ذهنتون نمي رسه

[bidgol 83]

كدها را هم گذاشتم براي بررسي بيشتر

Sub create_cus_id(cus_id As Int)			Dim md As ManamPersianDate
	Dim	dat_order As String
	customer_choose=True				 
'	===========================create persian order date====================================='
	dat_order=md.PersianShortDate
'	========================================================================================='
	cursor1=sql1.ExecQuery("SELECT orderid FROM order")	'EEEEEEEROOOOR'
	If cursor1.RowCount>0 Then
				For i=0 To cursor1.RowCount-1 
					cursor1.Position=i
					Dim new_orderid As Int
					new_orderid=cursor1.GetInt("orderid")
				Next
			End If
		new_orderid=new_orderid+1
		sql1.ExecNonQuery("INSERT INTO order VALUES('" &new_orderid&"','" &cus_id&"','"&dat_order&"')")


End Sub

[bidgol 83]

آقا درست مي فرماييد اصلا يادم نبود مرسي

چقدر آدم گاهي پرت مي شود