The world's #1 resource for commodity, international, and currency investors http://www.thecommodityinvestor.com <% Dim connDB Dim rsn set connDB = CreateObject ("ADODB.Connection") connDB.Open "DRIVER=MySQL ODBC 3.51 Driver; SERVER=mysql69.secureserver.net; OPTION=16834; USER=commodity; Password=getrich;DATABASE=commodity" Set rsn = CreateObject("ADODB.Recordset") rsn.Open "SELECT * FROM articles ORDER BY PK DESC LIMIT 0,15", connDB If NOT rsn.EOF then Do Until rsn.EOF Response.Write "" Response.Write "" Response.Write "" &rsn("blurb") & "" Response.Write "http://www.thecommodityinvestor.com/" &rsn("iorc") & "/" &rsn("category") &"/" &rsn("url") & "" Response.Write "" rsn.MoveNext Loop End If rsn.Close Set rsn=Nothing connDB.Close Set connDB=Nothing %>