Here's the VBS equivalent of what I'm looking for in PHP. As you can see there is no loop. Is it even possible to dump data all at once instead of looping in PHP?
<%
Response.buffer = true
%>
<BODY BGCOLOR=BLACK>
<FONT COLOR=YELLOW SIZE=1 FACE=Verdana>
<STYLE>
col.lightblue {color:lightblue; font-family: verdana;font-size:10px;}
col.orange {color: orange; font-family: verdana;font-size:10px;}
col.lightyellow {color: lightyellow; font-family: verdana;font-size:10px;}
</STYLE>
<TABLE>
<COL class=lightblue></COL>
<COL class=orange></COL>
<COL class=lightyellow></COL>
<TR><TD>
Dim CN
Dim RS
Set CN = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")
CN.Open("DSN=datasource;DATABASE=dbname;UID=user;PWD=password")
dim strGetData
dim a, b, c
RS.Open("SELECT * from table ORDER BY column DESC"), CN, 0
a = RS(0)
b = RS(1)
c = RS(2)
strGetData = RS.getstring(2,,"</td><td>","</td></tr><tr><td>"," ")
response.write (strGetData)
</TD></TR>
</TABLE>
<%
Set RS = Nothing
Set CN = Nothing
response.flush
%>