I need to return data from the DNN Database as XML. I have an OpenLaszlo app running in an IFrame which needs to pull data from an asp file that returns XML. I found this which seems to do what I want, but I have no clue how to make it connect to the DNN Database. I've tried a bunch of modifications to the cn.Open line but nothing works as I'm pretty much shooting in the dark. There's probably a pretty simple solution so if anyone could help I'd appreciate it.

Thanks
 

Hmm guess I wasn't clear enought. I just made an .asp page with the code that the page I linked to shows:

<%
'Very Important : Set the ContentType property of
'the Response object to text/xml.

Response.ContentType = "text/xml"

Dim cn
Dim rs
Dim xmlDoc

Set cn=Server.CreateObject("ADODB.Connection")
Set rs=Server.CreateObject("ADODB.Recordset")

'Replace the ADO Connection string attributes
'in the following line of code to point to your
'instance of SQL Server, and to specify the
'required security credentials for User ID and Password.

cn.Open "Provider=SQLOLEDB.1;" & _
        "User ID=host;" & _
        "Password=dnnhost;" & _
        "Data Source=SQLEXPRESS"

rs.CursorLocation = 3
rs.Open "Select * from Users",cn

Set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")

'Persist the Recorset in XML format to the DOMDocument object.
'The constant value for adPersistXML is 1.

rs.Save xmlDoc,1

rs.Close
cn.Close

Set rs = Nothing
Set cn = Nothing

'Write out the xml property of the DOMDocument
'object to the client Browser
Response.Write xmldoc.xml
%>

I get an error on this line:
cn.Open "Provider=SQLOLEDB.1;" & _
        "User ID=host;" & _
        "Password=dnnhost;" & _
        "Data Source=SQLEXPRESS"

It says:

Error Type:
Microsoft OLE DB Provider for SQL Server (0x80004005)
[DBNETLIB][ConnectionOpen (Connect()).]SQL Server does not exist or access denied.
/dnnn/xml.asp, line 19

As I said before I have no idea what to put on that line, but I'll keep trying stuff.