Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

access rs.recordcount£¬Ôõô»áµÃµ½-1£¿

Dim ebfs
Set ebfs = Server.CreateObject("ADODB.Recordset")
ebfs.ActiveConnection = conn
ebfs.Source = "SELECT id from goods where lei=1 ORDER BY ID DESC"
ebfs.CursorType = 0
ebfs.CursorLocation = 2
ebfs.LockType = 1
ebfs.Open()

if not ebfs.eof then
response.write ebfs.recordcount
maxnum=ebfs.RecordCount
end if


Ϊʲô×ÜÊÇÊä³ö £­1£¿£¿

thanks


Ïà¹ØÎÊ´ð£º

MSHFelxGrid Óë ACCESS MEMOÀàÐÍ×ֶεÄÒÉÎÊ

×î½ü×¼±¸Îª¹«Ë¾ÍøÕ¾ÓÃVB×ö¸ö²úƷչʾÉú³É£¬Éú³É²¿·Ö»ù±¾Ã»ÎÊÌ⣬
ÎÊÌâ³öÏÖÔÚ²éѯ²¿·Ö£¬Ê¹ÓÃÁËMSHFelxGrid(DATAGrid²»ÄÜÂú×ã²Ù×÷ÐèÇó)£¬±¾À´ÒÔΪÊÕ¹¤ÁË£¬×òÌìÔٴβâÊÔµÄʱºò·¢ÏÖÁËÒÔÏÂÎÊÌâ

µ±Êý¾Ý¿â×Ö¶ÎΪ¡ ......

¸ßÈ˽ø £¡£¡access Êý¾Ý¿âÎÊÌâ~~

±í½á¹¹£º
ProductSeriesID ×Ô¶¯±àºÅ
ProductSeriesName Îı¾
ProductSeriesRemark ±¸×¢

Ö´ÐÐǰ
ProductSeriesID ProductSeriesName ProductSeriesRemark
2 LVϳµ¶ÏµÁÐ LVϳµ¶ÏµÁÐ
3 ÎÙ¸ÖÉá ......

50ÍòÌõÊý¾ÝACCESSÊý¾Ý¿â,Ä£²éѯÓÐʲô·½·¨ÄÜ¿ìЩ...

ÎÒÓÃÁËÒ»°ãµÄ²éѯÓï¾ä³öÀ´,,,ÍÛºÃÂý°¡................



ʹÓÃ×é¼þ

DBgrid  ADOQuery  DATASOurce

¿ì²»ÁË£¬Ö»Äܾ¡¿ÉÄܵÄÓÅ»¯°É
ÓÅ»¯Êý¾Ý½á¹¹£¬½¨Ë÷Òý£¬²»¹ý½¨Òé²»ÒªÒ»´Î¶Á³öËùÓ ......

ÈçºÎ¶ÁÈ¡ÕâÖÖÊý¾Ý£¬ÔÚaccessÀïÃæ¡£Çó½Ì¸ßÊÖ

ÎÒµÄÒ»¸öaccessÊý¾Ý¿âÖеÄphoto×Ö¶ÎÖеÄÄÚÈÝÊÇÕâÑùµÄ£º

|/UpFiles/Picture/admin/200910162300187612.jpg|/UpFiles/Picture/admin/200910162300187612.jpg||||/UpFiles/Picture/admin/200910162300187612.jpg ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ