Ir para conteúdo
Fórum Script Brasil
  • 0

Cadastro No Bd

Guest watequate

Perguntado por Guest watequate,

 Share

Pergunta

Guest watequate

Guest watequate

Postado
Postado

Fala pessoal do forum !

sou iniciante em asp mas conheco algumas coisas.

preciso de uma ajuda para fazer um cadastro de algumas informacoes no meu site. Para a pessoa cadastrar Nome, email e cidade apenas e essas informacoes ficarem gravada num bd.

já criei o bd com nome de cadastro.mdb, minha tabela se chama cadast e tem campos nome, email e cidade.

Gostaria de um codigo completo para q eu possa aprender a fazer esse cadastro.

Obrigado.

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0
Himura

Himura

Postado
Postado

olha cara eu tenho um sistema que registra no bd nome, email, e um comentário num campo memorando então você pode adaptar, pras suas necessidades...

<%@ Language= "VBscript" %>

<!-- #include file="mostra.asp" -->

<html>

<style type="text/css">

body {background: #000066; font:Arial, Helvetica 10px; color: white;}

a:link {color: white}

a:visited {color: white}

a:hover {color: red}

</style>

<title>Comentários</title>

<body>

<form action="confirmacao.asp" method="post" name="oForm">

Nome:&nbsp;

<input type="text" name="nome">

<br>

E-mail:&nbsp;

<input type="text" name="email">

<br>

<br>

Comentário:<br>

<textarea rows="10" cols="20" name="comentarios"></textarea>

<br>

<br>

<input type="submit" value="Enviar">

</form>

</body>

</html>

esse código é para o cara que quer se cadastrar dar entrado nos dados...

para processar os dados e jogar no bd é isso aqui...

<%@ Language="Vbscript" %>

<% Option Explicit %>

<!-- #include file="conexaodb.asp" -->

<%

'Session("nome") = Request.Form("nome")

'Session("endereco") = Request.Form("endereco")

'Session("tel") = Request.Form("tel")

'Session("email") = Request.Form("email")

Sub ProcessaPagina

Dim rs, piao

Set rs = Server.CreateObject("ADODB.Recordset")

rs.locktype=2

rs.cursortype=2

rs.open "Select top 1 * From coment", conconexao

rs.Addnew

for each piao in rs.fields

IF Not IsEmpty(request.form(piao.name)) Then piao.value = server.htmlencode(request.form(piao.name))

'Response.Write(Piao.Name&"="&Request.Form(piao.name)&"<br>")

next

'rs.fields("nome") = Session("nome")

'rs.fields("endereco") = Session("endereco")

'rs.fields("fone") = Session("fone")

'rs.fields("email") = Session("email")

rs.update

end sub

processapagina

%>

<html>

<head>

<style type="text/css">

h1 {font: Arial, Helvetica 25px;

color: white;}

body {background: #000066;

font: Arial, Helvetica, 10px; color:#FFFFFF;}

a:link {color: white}

a:visited {color: white}

a:hover {color: red}

</style>

<title> Form </title>

</head>

<body>

<h4>Dados enviados com sucesso!!!</h4>

<a href="comentarios.asp" hidefocus>Ver Registros

</a>

</body>

</html>

o arquivo incluido "conexão.asp" é so um arquivo padrão com conexões aos bd de to o site ... então em vez de você usar este arquivo você pode só setar a conexão no cabeçalho da própria página...

espero que te ajude...

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...