| 发表于:2007-01-10 14:58:03 楼主 |
function cc(str) dim i i=0 set rs_l=server.createobject( "adodb.recordset ") sql_l= "select * from t where id= "&str rs_l.open sql_l,conn,1,1 do while not rs_l.eof if rs_l( "a ")> rs_l( "b ") then i=i+1 end if rs_l.movenext loop cc=i rs_l.close end function 运行后返回值为空,不知道什么原因? |
|
|
|
|