Newsletter

Jeg har sådan en nyhedssystem, hvor folk kan tilmelde sig til...men jeg har et problem, hvordan skal folk redirects til index.asp efter de har tilmeldt sig...

jeg har prøvet med at skrive response.redir i den sidste linke før %>.....men det virkede ik...den skrive \"Siden kan ik vises\"...

her er scripten:
<%
useraction=request(\"action\")
select case useraction
case \"save\"
    email=lcase(request.form(\"email\"))
    subs=request.form(\"subs\")
    dsn=\"DBQ=\" & Server.Mappath(\"db/db.mdb\") & \";Driver={Microsoft Access Driver (*.mdb)};\"
    set conn=server.createobject(\"adodb.connection\")
    set rs=server.createobject(\"adodb.recordset\")
    sql = \"select * from email where email=\'\"&email&\"\'\"
    conn.open dsn
    rs.open sql,conn
    select case subs
    \'hvis nogen vil tilmelde sig selv
    case \"1\"
        if rs.bof and rs.eof then
            sql2=\"insert into email(email) values(\'\"&email&\"\')\"
            conn.execute(sql2)
            response.write \"<script>alert(\'Thank you\')</script>\"
        else
            response.write \"<script>alert(\'You already registered\')</script>\"
        end if

   
    \'Hvis nogen vil afmelde sig selv
        case \"0\"
    if rs.bof and rs.eof then
            response.write \"<script>alert(\'You didnt registered\')</script>\"
    else
            sql2=\"delete from email where email=\'\"&email&\"\'\"
            conn.execute(sql2)
            response.write \"<script>alert(\'Your name has been deleted\')</script>\"
    end if

       
       
    end select
rs.close
set rs=nothing

end select
%>