formúlario para newletter
Olá pessoal,
Desenvolvi um sistema de newsletter, que através de uma checagem verifica se os dados devem ser inseridos ou não. Segue o código:
nome_newsletter = ""email_newsletter = ""nome_newsletter = request.form("nome")email_newsletter = request.form("email") valor = request("valor")if nome_newsletter <> "" and email_newsletter <> then Set cm = Server.CreateObject("AdoDb.Command")cm.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("base.mdb")&"" cm.CommandText = "Insert into newsletter(nome,email) values('"&nome_newsletter&"','"&email_newsletter&"')"cm.Executenome_newsletter = ""email_newsletter = "" Set cm = Nothingend if<form action="principal.asp" method="post" onsubmit="return valida(this)"><input type="text" name="nome" value= "<%=nome_newsletter%>" class="formulario" /><br /><br /><br /><input type="text" name="email" value = "<%=email_newsletter%>" class="formulario" /><br /><br /><input name="submit" type="image" src="imagens/enviar.jpg" /></form>
O funcionamento estó ok no primeiro acesso, porém caso o visitante após a inserção atualize a página os dados são inseridos mais uma vez. Alguém sabe como "destruir" definitivamente as variáveis, ou uma maneira de evitar que isso aconteça ?
Discussão (12)
Carregando comentários...