comecei a estudar asp a muito pouco tempo, para desenvolver um sistema de cadastro... mas.... quando eu vou salvar no BD... ele dá erro....
vale lembrar que eu estou fazendo as ligações com o BD em cima de conhecimentos em VB, então se tiver alguma falha muito basica....
mas... seria de grande ajuda... se alguém puder me ajudar....
o código da pagina que salva um novo cadastro é esse ae...
<!--#include file = "config.asp"-->
<%
'Abre a conexão com o banco de dados
Set Conex = Server.CreateObject ("ADODB.Connection")
Conex.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("database/dados.mdb")
'Pega os dados digitados no forluário
negocio = request("negocio")
ambiente = request("ambiente")
tipo = request("tipo")
descricao = request("descricao")
bairro = request("bairro")
valor = request("valor")
referencia = request("referencia")
'verificamos os campos do formulário
if negocio = "" then
alerta = alerta + "<br>- negocio"
erro = true
end if
if ambiente = "" then
alerta = alerta + "<br>- ambiente"
erro = true
end if
if tipo = "" then
alerta = alerta + "<br>- tipo"
erro = true
end if
if descricao = "" then
alerta = alerta + "<br>- descricao"
erro = true
end if
if bairro = "" then
alerta = alerta + "<br>- bairro"
erro = true
end if
if valor = "" then
alerta = alerta + "<br>- valor"
erro = true
end if
if referencia = "" then
alerta = alerta + "<br>- referencia"
erro = true
end if
'Se encontrar erros exibe uma mensagem com o nome dos campos
if erro = true then
response.Write("<b>Os seguintes erros foram encontrados:<br></b>")
response.Write(alerta)
response.Write("<br><br><a href='' onclick='javaScrip:window.history.go(-1)'>Voltar</a>")
'caso contrário
else
'Salva os dados
Set salva = Server.CreateObject("ADODB.Recordset")
sql = "Select * from imoveis"
salva.open sql, conex, 3,3
salva.addnew
salva("nogocio")= negocio
salva("ambiente") = ambiente
salva("tipo") = tipo
salva("descricao") = descricao
salva("bairro") = bairro
salva("valor") = valor
salva("referencia") = referencia
salva.update
'Exibe a mensagem de que a mensagem foi enviada corretamente
response.Write("<html><head><title>"&titulo_site&"</title><meta http-equiv='Content-Type' content='text/html; charset=iso-8859-1'></head><body bgcolor='#999999'><style type='text/css'><!--a:link { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #CCCCCC; text-decoration: none;}a:visited { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #CCCCCC; text-decoration: none;}a:hover { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #CCCCCC; text-decoration: underline;}a:active { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #CCCCCC; text-decoration: none;}--></style><table width='100%' height='100%'><tr><td><table align='center'><tr><td><div align='center'><font color='#FFFFFF' size='1' face='Verdana, Arial, Helvetica, sans-serif'>A mensagem foi enviada corretamente.<br><br><a href='#' onClick='javaScript:window.close()'>Fechar </a></font><br></div></td></tr></table></td></tr></table></body></html>")
end if
%>
Pergunta
Dead-Drunk
seguinte....
comecei a estudar asp a muito pouco tempo, para desenvolver um sistema de cadastro... mas.... quando eu vou salvar no BD... ele dá erro....
vale lembrar que eu estou fazendo as ligações com o BD em cima de conhecimentos em VB, então se tiver alguma falha muito basica....
mas... seria de grande ajuda... se alguém puder me ajudar....
o código da pagina que salva um novo cadastro é esse ae...
<!--#include file = "config.asp"--> <% 'Abre a conexão com o banco de dados Set Conex = Server.CreateObject ("ADODB.Connection") Conex.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("database/dados.mdb") 'Pega os dados digitados no forluário negocio = request("negocio") ambiente = request("ambiente") tipo = request("tipo") descricao = request("descricao") bairro = request("bairro") valor = request("valor") referencia = request("referencia") 'verificamos os campos do formulário if negocio = "" then alerta = alerta + "<br>- negocio" erro = true end if if ambiente = "" then alerta = alerta + "<br>- ambiente" erro = true end if if tipo = "" then alerta = alerta + "<br>- tipo" erro = true end if if descricao = "" then alerta = alerta + "<br>- descricao" erro = true end if if bairro = "" then alerta = alerta + "<br>- bairro" erro = true end if if valor = "" then alerta = alerta + "<br>- valor" erro = true end if if referencia = "" then alerta = alerta + "<br>- referencia" erro = true end if 'Se encontrar erros exibe uma mensagem com o nome dos campos if erro = true then response.Write("<b>Os seguintes erros foram encontrados:<br></b>") response.Write(alerta) response.Write("<br><br><a href='' onclick='javaScrip:window.history.go(-1)'>Voltar</a>") 'caso contrário else 'Salva os dados Set salva = Server.CreateObject("ADODB.Recordset") sql = "Select * from imoveis" salva.open sql, conex, 3,3 salva.addnew salva("nogocio")= negocio salva("ambiente") = ambiente salva("tipo") = tipo salva("descricao") = descricao salva("bairro") = bairro salva("valor") = valor salva("referencia") = referencia salva.update 'Exibe a mensagem de que a mensagem foi enviada corretamente response.Write("<html><head><title>"&titulo_site&"</title><meta http-equiv='Content-Type' content='text/html; charset=iso-8859-1'></head><body bgcolor='#999999'><style type='text/css'><!--a:link { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #CCCCCC; text-decoration: none;}a:visited { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #CCCCCC; text-decoration: none;}a:hover { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #CCCCCC; text-decoration: underline;}a:active { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #CCCCCC; text-decoration: none;}--></style><table width='100%' height='100%'><tr><td><table align='center'><tr><td><div align='center'><font color='#FFFFFF' size='1' face='Verdana, Arial, Helvetica, sans-serif'>A mensagem foi enviada corretamente.<br><br><a href='#' onClick='javaScript:window.close()'>Fechar </a></font><br></div></td></tr></table></td></tr></table></body></html>") end if %>valeu...
fui....
Link para o comentário
Compartilhar em outros sites
4 respostass a esta questão
Posts Recomendados
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.