VB Forum / Database Access / September 2007

Hi,

Thanks in Advance !

Accutally I have a VB 6.0 Program. I want to return recordset from ASP
file. Is there Any way to return ASP file data in VB 6.0

ASP Code:
<!--#include virtual="/func.asp"-->
<%
Response.Buffer=true
cCountry=Request("Country")

dim  RsXML, Con, SQL

set Con=Server.CreateObject("Adodb.Connection")
Con.open getConn

txt="Select * from CurrencyRate "

Set RsXML = Server.CreateObject("ADODB.Recordset")
RsXML.Open  txt,Con

RsXML.save Response, adPersistXML

set RsXML=nothing
Response.Flush

%>
-------------------------------------
This works fine and return XML
Now my question is how to return this Data to VB 6.0 program
I am trying like this but i cannot return ?

Private Sub Command1_Click()
   Dim RSt As Recordset
   Dim cOnn As Connection

   Set cOnn = Nothing
   Set RSt = New Recordset
   RSt.CursorLocation = adUseClient

   txt = "http://test.com/testload.asp"

   RSt.Open txt

   MsgBox RSt(0)

End Sub

How can i return recordset from ASP to VB sub ??

Thanking lot !
Raghu Bhandari