您的位置:程序门 -> web 开发 -> asp



如果将记录集作为参数传递给函数


[收藏此页] [打印本页]选择字色:背景色:字体:[][][]


如果将记录集作为参数传递给函数[已结贴,结贴人:zgmaike]
发表于:2007-04-30 10:35:09 楼主
function   getrecordsettopage(rs)
getrecordsettopage   =   rs.fields.count
end   function

提示对象不支持此属性或方法,传入的参数是没错的。
发表于:2007-04-30 10:38:421楼 得分:0
sf
发表于:2007-04-30 10:45:422楼 得分:0
function   getrecordsettopage(rs)
    dim   objrs
    set   objrs   =   server.create( "adodb.recordset ")
    set   objrs   =   rs
    getrecordsettopage   =   objrs.fields.count
end   function
发表于:2007-04-30 10:54:533楼 得分:0
function   getrecordsettopage(rs)
    dim   objrs
    set   objrs   =   server.create( "adodb.recordset ")
    set   objrs   =   rs
    getrecordsettopage   =   objrs.fields.count
end   function

这种方法试了,不行的。
发表于:2007-04-30 11:04:044楼 得分:5
function   getrecordsettopage(rs)
    dim   objrs
    set   objrs   =   server.createobject( "adodb.recordset ")
    set   objrs   =   rs
    getrecordsettopage   =   objrs.fields.count
end   function
发表于:2007-04-30 11:05:125楼 得分:5
不好意思,少写了object
发表于:2007-04-30 11:06:196楼 得分:0
我写了object还是不行呀,我刚才不是拷过去,是自己写的。
发表于:2007-04-30 11:09:537楼 得分:10
<%
function   getrecordsettopage(rs)
    dim   objrs
    set   objrs   =   server.createobject( "adodb.recordset ")
    set   objrs   =   rs
    getrecordsettopage   =   objrs.fields.count
end   function

set   conngraph=server.createobject( "adodb.connection ")
conngraph.connectionstring= "provider=sqloledb;data   source=(local);initial   catalog=newdb;user   id=sa;password= "
conngraph.open

set   objrs   =   server.createobject( "adodb.recordset ")
strsql   =   "select   *   from   img   where   id=1 "
objrs.open   strsql,   conngraph,   3,   2  
response.write   getrecordsettopage(objrs)
response.end
%>

这是我的测试代码,没有问题
发表于:2007-04-30 11:56:148楼 得分:0
谢谢楼上的,我再试试。


快速检索

最新资讯
热门点击