Hi everybody,<BR>I am having a problem with disconnected recordsets and vb.<BR>I made a component in vb that passes a disconnected recordset and the asp page keeps telling me it is closed...Here is the code: (please help) <BR><BR>Public Function Display() As ADODB.Recordset <BR>On Error GoTo ErrorHandler <BR><BR> Dim conn As ADODB.Connection <BR> Dim str_Connect As String <BR> Dim rsDisplay As New ADODB.Recordset <BR> Dim SQL_str As String <BR> <BR> &#039; Open the connection object and execute the SQL command to the database. <BR> Set conn = New ADODB.Connection <BR> str_Connect = "dsn=Security;uid=Security_User;pwd=Security_user1 ;" <BR> conn.Open str_Connect <BR> <BR> &#039;SQL string <BR> SQL_str = "Select b.fname, b.lname, c.Dept_Name, a.DEpt, a.Date_From, a.Date_To, a.Destination, a.Purpose, a.Request_Date, a.Request_ID " _ <BR> & " from Vehicle_Requests.dbo.TRequest a, dboSecurity.dbo.Tsec_USer b, dboSecurity.dbo.TSec_Dept c " _ <BR> & " where a.Driver_ID = b.User_ID and c.Dept_ID = a.Dept Order by a.Date_From, b.Lname" <BR><BR><BR> &#039;Set to client - disconnected recordset <BR> rsDisplay.CursorLocation = adUseClient <BR> rsDisplay.Open SQL_str, conn, adOpenKeyset, adLockBatchOptimistic, adCmdText <BR> Set Display = rsDisplay <BR> rsDisplay.Close <BR> Set rsDisplay = Nothing <BR> conn.Close <BR> Set conn = Nothing <BR><BR> <BR>Exit Function <BR><BR>ErrorHandler: <BR><BR> <BR> <BR> &#039;set connection to nothing upon abort <BR> If Not rsDisplay Is Nothing Then <BR> Set rsDisplay = Nothing <BR> End If <BR> <BR> If Not conn Is Nothing Then <BR> Set conn = Nothing <BR> End If <BR> <BR> <BR> Err.Raise Err.Number, "Intra Vehicle Object: Display disconnected recordset", Err.Description <BR><BR>End Function