Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

_UsP_

Insere Um Mais Nao O Outro

Recommended Posts

Olha eu de novo! :D

Tipo, tem um sistema de cadastramento ! qaudn o cara se cadastra ao mesmo tempo manda um registro para outra tabela chamada inbox! Ta ae o script :

<%nome = replace(request.form("nome"), "'", "''") sobrenome = replace(request.form("sobrenome"), "'", "''")icq = replace(request.form("icq"), "'", "''")email = replace(request.form("email"), "'", "''")login = replace(request.form("login"), "'", "''")senha = replace(request.form("senha"), "'", "''")ip = request.servervariables("REMOTE_ADDR")Set conecao = Server.CreateObject("ADODB.Connection")Conecao.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("bd.mdb") & ";" & ";"bd = "Select*From cadastro where login='"&login&"'"Set rs = conecao.execute(bd)if not rs.eof thensession("add_erro") = "SIM"response.redirect "cadastro.asp"elseSet conecao = Server.CreateObject("ADODB.Connection")Conecao.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("bd.mdb") & ";" & ";"bd2 = "Insert Into cadastro (nome,sobrenome,icq,email,login,senha,ip) VALUES ('"&nome&"','"&sobrenome&"',"&icq&",'"&email&"','"&login&"','"&senha&"','"&ip&"')"Set rs2 = conecao.execute(bd2)bd3 = "Select*From inbox where para='"¶&"'"Set rs3 = conecao.execute(bd3)if rs3.eof thencontador = 1elsecontador = 1Do until rs.eofcontador = contador + 1rs.movenextloopend ifurl = "<a href=""mapa.asp"">clique aqui</a>"bd4 = "Insert Into inbox (nome,para,assunto,msn,data,contador) values ('administrador','"&login&"','Bem Vindo ao Web Home Editor','Bem vindo, '&'"&login&"'& 'ao Web Home Editor.Caso tenha dúvida de como adiministrar sua conta '&'"&url&"'&'!','"&data&"','"&contador&"')"Set rs4 = conecao.execute(bd4) response.redirect "login.asp"end if%>
Ai vcs perguntão Posta ae o erro!

O pior é que ele nao mostra erro, ele inseri o cara mas nao as "Boas vindas" saco?

To aguardando retorno! :D

Compartilhar este post


Link para o post
Compartilhar em outros sites

Voce quer colocar no banco uma mensagem de boas vindas para todos os usuários do seu site?porque não faz uma funçãozinha para colocar esta mensagem na saida do documento, então não precisa inserir no banco....agora o erro que esta dando creio eu que seja porque voce não esta comocando as boas vindas como texto e sim como variavel....Ha uma coisa legal para voce usar em update e insert é o addnew usando o ADOVBS.INC é muito mais pratico.

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.