% Dim intSongs, songPath, songExtension, coverExtension, playSong %> <% Dim RandNum, nowPlaying, path Path = "content/" songExtension=".mid" coverExtension=".jpg" Randomize RandNum = Int(Rnd * 3) + 1 playSong = path + Song(RandNum, 0) + songExtension nowPlaying = Song(RandNum, 1) %>
|
<%
response.Write "
|