<%Option Explicit%>
Tournament Pyramid ladder - Place Challenge
<%
'This is where we action the save of the challenge.
dim challenge, rs, sql, d, new_match_id
'this is were we actually save the details
challenge=request.querystring("challenge")
If request.querystring("action")="s" then
'this is were we actually save the challenge
'The First thing to do is to add a new match record, to show the challenge details
d = now
SQl="INSERT into matches (Pyramid_ID, Challenger_id, Challenged_id, Challenge_date, Cancelled) values (1," & chr(34) & session("userid") & chr(34) & "," & chr(34) & challenge & chr(34) & ",#" & d & "#, No);"
'response.write sql
conn.execute sql
' Now get the unique ID for this match and put into the user (pyramid) table to show a match is pending.
set rs = server.CreateObject("adodb.recordset")
rs.CursorLocation = 3
sql="select * from matches where challenger_id=" & chr(34) & session("userid") & chr(34) & " and challenge_date=#" & d & "#;"
'response.write sql
RS.Open sql, Conn, adOpenKeyset, AdLockReadOnly
new_match_id = rs("match_id")
set rs= nothing
'Then get the match ID thats created, and update the pending column for the position in the pyramid
SQL="UPDATE users set pending=" & new_match_id & " where pyramid_id=1 and userid in ('" & challenge & "','" & session("userid") &"');"
'response.write sql
conn.execute sql
'Now send user back to Pyramid view
response.redirect "default.asp"
end if
%>
|
|
User: |
<%=session("name")%> |
|
User ID: |
<%=session("userid")%> |
|
Role: |
<%=session("Role")%> |
|
|
|
|
| |
<%'This is the details about the challenge.. %>
Please contact the person you want to challenge using the details below.
The challenge should be resolved (played or cancelled) within one month of
the challenge being made.
You are making a challenge to :
<%
'Get the details of the challengee
challenge=request.querystring("challenge")
set rs = server.CreateObject("adodb.recordset")
rs.CursorLocation = 3
sql="select * from users where userid='" & challenge & "'"
RS.Open sql, Conn, adOpenKeyset, AdLockReadOnly
%>
| Name |
<%=rs("Firstname") & " " & rs("Surname") %> |
| email |
<%= "" & rs("email")%> |
| Phone |
<%=rs("Phone") %> |
| Playing days |
<%=rs("playing_days") %> |
| Location |
<%=rs("location") %> |
| |
|
| |
|
|
<%
set rs=nothing
%>