Inserindo Dados No Bd
#1
Posted 02/09/2004, 19:58
todos mque obsverei, mostravam como fazer isso..mas de outra maneira..
gostaria de saber como inserir no bd e mostrar depois um campo sim/não
- da maneira que sei, eu insiro num campo de texto normal e depos filtro isso no select..mas eu queria fazer de outra forma..usando o campo sim/nao msm..
valeu. t+
---------------------------------------------------------------------------
> BRdesign.NET - Soluções em Websites e Sistemas E-Commerce.
---------------------------------------------------------------------------
> BR-ecommerce - Sua loja virtual na internet! - Apenas R$99,90 mensais (hospedagem inclusa)!
#2
Posted 02/09/2004, 20:33
INSERT INTO Tabela (SimNao) VALUES (1)
Na hora de mostrar, como os campos do tipo SimNao podem ser considerados booleanos, eu uso assim:
If Rs("SimNao") Then Response.Write "Sim" Else Response.Write "Não" End If
Se você fizer assim:
Response.Write Rs("SimNao")
se não me engano, ele vai retornar "Verdadeiro" para Sim e "Falso" para Não.
#3
Posted 03/09/2004, 02:47
mas qd coloco 0 ou 1 true ou false verdadeiro ou falso sim ou não
sem dá o erro:
Microsoft OLE DB Provider for ODBC Drivers error '80040e07'
[Microsoft][Driver ODBC para Microsoft Access] Data type mismatch in criteria expression.
membros.asp, line 10
linhas 8 9 10:
sql = "INSERT INTO Tabela (Login_Automatico,Receber_Newsletters) "
sql = sql & "VALUES('" & Request.Form("login_automatico") & "','" & Request.Form("receber_newsletters") & "' )"
conexao.execute(sql)
e o campo que to usando é do tipo um sim/não..
---------------------------------------------------------------------------
> BRdesign.NET - Soluções em Websites e Sistemas E-Commerce.
---------------------------------------------------------------------------
> BR-ecommerce - Sua loja virtual na internet! - Apenas R$99,90 mensais (hospedagem inclusa)!
#4
Posted 03/09/2004, 08:57
if RecSet("simnao") = true thentipo, ja´etntei assim pra inserir..
mas qd coloco 0 ou 1 true ou false verdadeiro ou falso sim ou não
sem dá o erro:
Microsoft OLE DB Provider for ODBC Drivers error '80040e07'
[Microsoft][Driver ODBC para Microsoft Access] Data type mismatch in criteria expression.
membros.asp, line 10
linhas 8 9 10:
sql = "INSERT INTO Tabela (Login_Automatico,Receber_Newsletters) "
sql = sql & "VALUES('" & Request.Form("login_automatico") & "','" & Request.Form("receber_newsletters") & "' )"
conexao.execute(sql)
e o campo que to usando é do tipo um sim/não..
response.write "sim"
else
response.write "não"
end if
Qualquer dúvida, fale
#5
Posted 03/09/2004, 14:15
---------------------------------------------------------------------------
> BRdesign.NET - Soluções em Websites e Sistemas E-Commerce.
---------------------------------------------------------------------------
> BR-ecommerce - Sua loja virtual na internet! - Apenas R$99,90 mensais (hospedagem inclusa)!
#6
Posted 03/09/2004, 14:19
#7
Posted 03/09/2004, 14:31
mas se resume assim:
form.html
<form action="adiciona.asp" method="post">
<input name="login_automatico" type="checkbox" id="login_automatico" value="sim">
<input name="receber_newsletters" type="checkbox" id="receber_newsletters" value="sim" checked>
</form>
e adiciona.asp
sql = "INSERT INTO Tabela (Login_Automatico,Receber_Newsletters) "
sql = sql & "VALUES('" & Request.Form("login_automatico") & "','" & Request.Form("receber_newsletters") & "' )"
conexao.execute(sql)
isso eu tentando adicionar em um campo sim/não como disse..
já tentei trocar o sim do form.html por true, 0,1 e nada..
---------------------------------------------------------------------------
> BRdesign.NET - Soluções em Websites e Sistemas E-Commerce.
---------------------------------------------------------------------------
> BR-ecommerce - Sua loja virtual na internet! - Apenas R$99,90 mensais (hospedagem inclusa)!
#8
Posted 03/09/2004, 14:37
form.html
<form action="adiciona.asp" method="post"> <input name="login_automatico" type="checkbox" id="login_automatico" value="1"> <input name="receber_newsletters" type="checkbox" id="receber_newsletters" value="1" checked> </form>
adiciona.asp
Login = Request.Form("login_automatico") Recebe = Request.Form("receber_newsletters") If Login = "" Then Login = "0" If Recebe = "" Then Recebe = "0" sql = "INSERT INTO Tabela (Login_Automatico,Receber_Newsletters) VALUES(" & Login & "," & Recebe & ")" conexao.execute(sql)
Não funciona? Hum... Se bem que já li em algum canto que, no Access, e em algumas outras aplicações da MS, verdadeiro é -1, e não 1. Ninguém sabe o porquê. Por via das dúvidas, é bom testar dos dois modos então.
<form action="adiciona.asp" method="post"> <input name="login_automatico" type="checkbox" id="login_automatico" value="-1"> <input name="receber_newsletters" type="checkbox" id="receber_newsletters" value="-1" checked> </form>
Bom, roda aí e diz pra gente o que acontece.
#9
Posted 03/09/2004, 14:55
com 1 e com -1
---------------------------------------------------------------------------
> BRdesign.NET - Soluções em Websites e Sistemas E-Commerce.
---------------------------------------------------------------------------
> BR-ecommerce - Sua loja virtual na internet! - Apenas R$99,90 mensais (hospedagem inclusa)!
#10
Posted 05/09/2004, 17:11
A lá, Agente Linhares, o cara conseguiu do mesmo jeito que eu falei que funcionava. Deve ter alguma errada com o seu PC. Já tentou hospedar pra testar? Pode ser que o problema seja local.
#11
Posted 05/09/2004, 22:11
eu tava com este problema hoje mas, consegui resolver com 1 - ativado e 0 - desativado. Não sei se tem alguma coisa haver mas não uso o INSERT para inserir um novo registro. Dá uma olhada:
form.html
<form action="adiciona.asp" method="post"> <input name="login_automatico" type="checkbox" id="login_automatico" value=1> <input name="receber_newsletters" type="checkbox" id="receber_newsletters" value=1 checked> </form>
o value tem que ser colocado sem aspas como no exemplo acima.
adiciona.asp
Login = Request.Form("login_automatico") Recebe = Request.Form("receber_newsletters") sql = "tabela" Set rsTabela = Server.CreateObject("ADODB.Recordset") rsTabela.Open sql, conn, 3, 3 rsTabela.AddNew rsTabela("Login_Automatico") = login rsTabela("Receber_Newsletter") = recebe rsTabela.Update rsTabela.Close
Tenta aí!!
==============================================
Esqueci de postar este conn é um objeto.
Vai aí o código:
Set Conn = Server.CreateObject("ADODB.Connection") ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=" & Server.MapPath("bd.mdb") & ";" & _ "Persist Security Info=False" Conn.Open(ConnectString)
Edição feita por: LeoB, 05/09/2004, 22:32.
#12
Posted 06/09/2004, 05:10
- gora deu certu!!
tinha dado certo so pelo add.new, mas depois consegui tb pelo execute..
não sei o que tinah de errado, mas vo vê se descubro..
e o lance do if tb num funfo..mas isso tranquilo..é fácil de resolvê..
valeu a ajuda galera. t+
------
agora deu td ok msm..
o if fiz assim:
If Login = "" Then
end if
Login = "0"
If Recebe = "" Then
Recebe = "0"
end if
aí foi tanquilo..sobre o q eu tava fazendo de errado , era coisas no cmapo msm..
e juntando ao if foi blz..
t+ gente
Edição feita por: Agente Linhares, 06/09/2004, 22:17.
---------------------------------------------------------------------------
> BRdesign.NET - Soluções em Websites e Sistemas E-Commerce.
---------------------------------------------------------------------------
> BR-ecommerce - Sua loja virtual na internet! - Apenas R$99,90 mensais (hospedagem inclusa)!
0 user(s) are reading this topic
0 membro(s), 0 visitante(s) e 0 membros anônimo(s)