从Object导出到Excel

我想导出一个查询到Excel中,我得到的查询,然后我保存结果:

Dim _Result As Object = Nothing 

_Result被声明为一个Object。 在下一个代码中查询被保存到_Result

  _Result = _Query.GetRecords(_pOP, _ _pName, _ _pLastName, _ _pAdress, _ _pEFSL, _ ) 

在这一点上一切运行良好,但我想知道如何隐藏导致XLS文件。

nQuerys是一个从DB获取信息的程序,函数GetRecords(函数到nQuerys)回退列表中的信息,然后AJAX_Directory在信息存储在_Result之后接收信息,谢谢你的回答。

这是我的代码完整。 谢谢你的帮助。

 <WebMethod> Public Shared Function AJAX_Directory(_pOP, _ _pName, _ _pLastName, _ _pAdress, _ _pEFSL, _ ) As Object Dim _Query As New nQuerys <--------- This is a class where I have all my procedures that retrieve information from the database Dim _Result As Object = Nothing Try _Result = _Query.GetRecords(_pOP, _ _pName, _ _pLastName, _ _pAdress, _ _pEFSL, _ ) Return _Result Catch ex As Exception Return ex.Message Finally _Query = Nothing End Try End Function