مشكل در حلقه Do

[nasser]

با سلام
كسي مي دونه اين كد كه با زبان vbscript است چه اشكالي داره
چون من مي خوام يك فيلد AutoNumber را از Access بخوانم ولي فقط عدد ركورد اول را نشان مي داد
من اومدم يك حلقه به اين صورت گذاشتم

Do While Not objAutoNum.EOF
	lastnum = AutoNum("number")
	objAutoNum.MoveNext
Loop

ولي نمي دونم چرا از AutoNum اشكال مي گيره
من بايد به جاي اين كلمه چي بنويسم تا از فيلد number آخرين ركورد را بخواند

واقعا ممنون مي شم كسي جواب بدهد

 

[miladmovie]

سلام

آقا معمولا فيلدهاي AutoNumber نامشون ID است
بعد Erorrي رو كه ميگره اينجا بنويس تا شايد بشه كمكي كرد
در ضمن اگر آخرين ركورد رو مي خواهي بخوني مي توني با SQL يك كار كني كه فيلد ها رو به صورت نزولي نمايش بده

 

[sasan]

ناصر عزيز
در مورد سورس شما بايد بگم كه اين سورس يك اشكال چاپي داره :

Do While Not objAutoNum.EOF 
lastnum = AutoNum("number") 
objAutoNum.MoveNext 
Loop

كه بصورت زير اصلاح كن

Do While Not objAutoNum.EOF 
lastnum = [u]obj[/u]AutoNum("number") 
objAutoNum.MoveNext 
Loop

اميد وارم كه مشكل شما حل بشه [/u]

 

[xnux]

ببخشيدا
من يكم فوضولي كردم در متن نامه هاتون
يكمي مرتب ترش كردم

قصد بدي نداشتم
فقط لطف كنيد از اين به بعد براي نوشتن سورسهاي خودتون
از تگ CODE كه اون بالاست استفاده كنيد . يكم بهتر و خوانا تر ميشه

 

[dastehbill]

objRs.movelast

ميبرتت به اخرين ركورد تو ديتا بيس

 

[mohsen etemadian]

اصلاح شده كد
[align=left]Do While Not objAutoNum.EOF
lastnum = objAutoNum("number")
objAutoNum.MoveNext
Loop