<% playerid=request.querystring("playerid") if request.form("form1")="true" then Set rsusers= Server.CreateObject("ADODB.Recordset") rsusers.ActiveConnection = con_string strlang="SELECT * from video_requested_users where id=0" rsusers.Source = strlang rsusers.CursorType = 3 rsusers.CursorLocation = 3 rsusers.LockType = 3 rsusers.Open() rsusers.addnew rsusers("fullname")=request.form("fullname") rsusers("address")=request.form("address") rsusers("city")=request.form("city") rsusers("Phone_Number")=request.form("phone") rsusers("emailid")=request.form("emailid") rsusers("playerid")=request.form("playerid") rsusers.update set rsusers=nothing response.write "

A password request is been made successfully. You will get an email with username and password to access this video.

Thank you.

" response.end end if dim theuserid theuserid=session("videouser") %>

Request for a password to access video.
Full Name :	*
Address :
City :
Phone Number :
Email :	*