这样就可以了。
<%
set rssql=Server.CreateObject("ADODB.Recordset")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "PROVIDER=SQLOLEDB;DATA SOURCE=AIMIN;UID=sa;PWD=11111;DATABASE=myPratice"
set rssql=getrs("select * from myuser",1)%><%
function getrs(sql,i) set recordset=server.CreateObject("adodb.recordset")
set getrs=server.CreateObject("adodb.recordset")
select case i
case 1
recordset.LockType=3
recordset.CursorType=3
case 2
recordset.LockType=4
recordset.CursorLocation=3
recordset.CursorType=3
case 3
recordset.CursorType=3
case else
end select
recordset.Open sql,conn
Response.Write recordset.recordcount
getrs=recordset
end function
%>
可能你的错误在于用一个变量把recordset对象传递了。这是无法完成的。它是一个记录集。
<%
set rssql=Server.CreateObject("ADODB.Recordset")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "PROVIDER=SQLOLEDB;DATA SOURCE=AIMIN;UID=sa;PWD=11111;DATABASE=myPratice"
set rssql=getrs("select * from myuser",1)%><%
function getrs(sql,i) set recordset=server.CreateObject("adodb.recordset")
set getrs=server.CreateObject("adodb.recordset")
select case i
case 1
recordset.LockType=3
recordset.CursorType=3
case 2
recordset.LockType=4
recordset.CursorLocation=3
recordset.CursorType=3
case 3
recordset.CursorType=3
case else
end select
recordset.Open sql,conn
Response.Write recordset.recordcount
getrs=recordset
end function
%>
可能你的错误在于用一个变量把recordset对象传递了。这是无法完成的。它是一个记录集。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货