急,高分求解,解决马上结贴,在线……
dll 里的函数,编译过后,
conn.rs_sql=sqlUser
set rsUser=conn.Get_rs()
为什么对象不支持此属性或方法: 'rsUser.eof'
求救呀
函数如下:
Public Function Get_rs()
On Error GoTo err
Set rs = New ADODB.Recordset
rs.Open rs_sqls, conn, 1, 3
Get_rs = rs
Exit Function
err:
Response.Write err.Number & err.Description
If Not rs Is Nothing Then
If rs.State = 1 Then
rs.Close
End If
Set rs = Nothing
End If
If Not conn Is Nothing Then
If conn.State = 1 Then
conn.Close
End If
Set conn = Nothing
End If
End Function