andrerp

vMensagem=Ucase(Request.Form("recado"))
   vUsuario=Session("usuario")
   cnpath="DBQ=" & Server.MapPath("Dados/BDRM.mdb") 
   DataSource = "Driver={Microsoft Access Driver (*.mdb)}; " & cnpath 
   Set Conn = Server.CreateObject("ADODB.Connection") 
   set rs = Server.CreateObject("ADODB.Recordset")
   Conn.Open DataSource
   
   Sql = "SELECT recado, cod_usuario, data_hora from recados"

   rs.open Sql, conn, 1, 2, adCmdText
   rs.AddNew
   rs.fields("recado").value = vMensagem
   rs.fields("cod_usuario").value = vUsuario
   rs.fields("data_hora").value = Now
   rs.Update
   rs.close   
         
   Conn.Close
   
   if err <> 0 then 
      Response.Write "<h1>Um erro foi encontrado!</h1><p>" & err.number & " - " & err.description & "</p>"
   else 
   Response.redirect "mural.asp?"  
   end if

Deu Certo galera !

Como fecha o tópico ?

taí, se ao invés de fazer código sequenciais, posso utilizar esse seu código para armazenar no banco essa numeração "gigante" ! Blz " ! Valew

Ok ! É muito simples mesmo !

Só que pense bem !

Eu crio uma página ativa.asp e envio um e-mail com esse link. Até aí tudo bem.

Daí usuários com um pouquinho mais de experiência ao invés de ir no e-mail, passam qualuqer e-mail e digitam no endereço o link de ativação. No caso ativa.asp?codigo=14. Entendeu ? Só por isso quero aquela númeração, deve ser um tipo de uma chave gerada, que vem no link. De toda forma, você me ajudou muito com sua postagem, obrigado !

Desculpe-me, devo ter me expressado mal.

Quero saber como eu faço para enviar um e-mail para o fulano e lá no e-mail ele clica num link (que geralmente é gigantesco, cheio de letras e números) que abre uma página do site ativando aquele cadastro, esta verificação que me passou irei executar também, mas uma pessoa pode colocar muito em zfulandos@numsei.com e vai passar numa boa. E quanto ao componente tenho aqui o ASPMail para enviar estes e-mails. Obrigado !