Top 25 Players Easy Game <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "Candlelight", "candlelight", "SSauTWskc" Set Session("PenPals_ConnectionString") = Conn ' Create SQL SELECT String MySQL="Set Rowcount 25 Select PlayerName, Score FROM BeanstalkGameScoresEasy Order By Score DESC" Set RS=Server.CreateObject("ADODB.RecordSet") ' A Static Cursor Must Be Used To Retrieve The TEXT fields RS.Open MySQL,Conn,adOpenStatic Do While Not RS.EOF PlayNumber = PlayNumber + 1 If PlayNumber < 10 then PlaySpace = "  " Else PlaySpace = "" End If Response.Write("" & PlaySpace & PlayNumber & ".   " & RS("PlayerName") & " - " & RS("Score") & " ") RS.MoveNext Loop RS.Close Conn.Close Set RS = Nothing Set Conn = Nothing Set Session("PenPals_ConnectionString") = Nothing %>	Top 25 Players Hard Game <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "Candlelight", "candlelight", "SSauTWskc" Set Session("PenPals_ConnectionString") = Conn ' Create SQL SELECT String MySQL="Set Rowcount 25 Select PlayerName, Score FROM BeanstalkGameScores Order By Score DESC" Set RS=Server.CreateObject("ADODB.RecordSet") ' A Static Cursor Must Be Used To Retrieve The TEXT fields RS.Open MySQL,Conn,adOpenStatic PlayNumber = 0 Do While Not RS.EOF PlayNumber = PlayNumber + 1 If PlayNumber < 10 then PlaySpace = "  " Else PlaySpace = "" End If Response.Write("" & PlaySpace & PlayNumber & ".   " & RS("PlayerName") & " - " & RS("Score") & " ") RS.MoveNext Loop RS.Close Conn.Close Set RS = Nothing Set Conn = Nothing Set Session("PenPals_ConnectionString") = Nothing %>
Play the Easy Game Play the Hard Game NOTE: When you play the game you can make up a player name if you want. But you do not have to. You also do not have to enter an email address to play. We do not ever post or reveal any email addresses.

Back to Games Page