<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% UserName = request.form("UserName") Password = request.form("Password") Level = request.form("Level") query = "INSERT INTO Logon (UserName, Passwords, Levels) " _ & "VALUES (" _ & "'" & replace(UserName,"'","''") & "', " _ & "'" & replace(Password,"'","''") & "', " _ & "'" & replace(Level,"'","''") & "') " 'Response.Write query 'Response.end Set DoInsert = Conn.execute(query) Set DoInsert = nothing %>

New user Confirmation   <% Response.Write UserName & " has been added to the " & Level & " level. " Response.Write " " %>

<%= end_conna() %>