Return Zipped recordset in VB6 via the Internet

**Problem description** Our application is a VB6 client server that connects to SQLSERVER. We encounter problems when running application on remote sites using VPN, since the architecture is not internet based, and it takes time to get query results. **What we need** We need a service, or .net web service, or ASP, technology doesnt matter. We want to call this utility with input as query to run and get the result as zipped VB6 recordset This is the process flow: 1. Call utility with input as SQL Query to run 2. The utility execute the SQL and save it to recordset 3. Recordset is zipped 4. Zipped Recordset return to calling procedure 4. Caller unzip recordset