% Option Explicit %>
<% Header "Signup Form" %>
<%
'Declare variables
Dim Conn, Returned, SQL
'Start Connection object
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open SQLConnectionParameters
'Check if space is available
SQL = "SELECT COUNT(*) AS NumTrial FROM " & GameAbbreviation & "Players"
Set Returned = Conn.Execute(SQL)
If CInt(Returned("NumTrial")) >= GameMaxPlayers Then
%>
All <%= GameMaxPlayers %> account slots are currently occupied. Please check back tomorrow to see if some
are available - idle accounts are removed nightly.
<% Else %>
Fill out this form to create a new account. Be sure to double check all your entries to make sure they are
correct.
Note About Multiple Accounts
Multiple accounts absolutely are not tolerated on <%= GameName %>. Any user found to hold more than one account
will have all accounts involved deleted. There are no second chances, and this rule is actively enforced.