كمك فوري

[shirani]

سلام كسي ميتونه در مورد اين ارور به من كمك كنه
ADODB.Recordset (0x800A0BCD)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/shirani/Code_page/Category_Edit_code.asp, line 47

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

<%
response.Buffer = True
	
'Make sure this page is not cached
Response.Expires = -1
Response.ExpiresAbsolute = Now() - 2
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl = "No-Store"



	Dim bolFound
	Dim strname

	
	strname = Request.Form ("name")
	
	
		'----------------------
	' Open connection to the database
	Set objRS= server.CreateObject("ADODB.recordset")
	objRS.open  "category",objconn, ,adLockoptimistic ,adcmdtable
	
	
	

	bolFound = false
	
	'Try to find User Entry
	Do Until objRS.EOF Or bolFound
	if (StrComp(objRS.fields("Cat_name").value,strname,vbTextCompare) = 0 )then
		bolFound = true
		Else 
		objRs.Movenext
		End if 
		Loop
		
	
	
	'Edite RecordSet
		objRS ("cat_name")= Request.Form("name")
		objRS.update
		
		 response.Redirect("../Manegment_Category.asp")


	' Close Connection
	objRS.Close 
	Set objRS = Nothing
	objconn.close	
	set objconn = nothing	
%>

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

جدول ديتا بيس Category

نام فيلد ها هم
Cat_ID , Cat_name , Cat_order
من فقط ميخوام Cat_name بروز بشه ولي هر كاري كردم نشد

فايل پيوست هم مربوط به فرم

 

[shirani]

مرسي مشكلم حل شد بالاخره فهميدم

 

[m1pfard]

اشکا از محل Loop بود. نه!

 

[shirani]

نه اشكا اين بود كه من Id را يادم رفته بود تعريف كنم برا همين ميومد فيلد اول را پيش فرض ميگرفت

 

[m1pfard]

;(