% sConnection = "DSN=test;UID=pinebranch_pine;PWD=27D8lud7@;" Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open(sConnection) Set objRS = objConn.Execute("SELECT * FROM missyspotify ORDER BY song") %>

Usage !spotifyplays <songname> Shows Spotify song, with plays counter and a link to it.
Example !spotifyplays interlude
| Available Spotify song names: |
|---|
|
<%
dim a
a = 0
while not objRS.EOF
response.write Lcase(objRS.fields("song")) & " " objRS.movenext a = a + 1 wend %> |