caras esta dando erro no meu codigo para cadastrar pq??
eu tirerei como base um q eu peguei aki no forum
obrigadooooo!!!!
if Request.QueryString("proposta") <> "" then
set rsquery = conn.execute ("select * from propostas where proposta = " + Request.QueryString("proposta"))
p_proposta = rsquery("proposta")
p_nome = rsquery("nome")
end if
<tr align="left" valign="middle" bgcolor="#FFFFFF">
<td width="20%" height="25" > <input type="hidden" name="proposta" value="<%=p_proposta%>"><%=p_proposta%> </td>
<tr align="left" valign="middle" bgcolor="#FFFFFF">
<td width="20%" height="25" > <input type="hidden" name="proposta" value="<%=p_proposta%>"><%=p_proposta%> </td>
</tr>
.....codigo da pagina q processa o inserção...
<%
Response.Expires = 0
Response.Buffer = True
Dim strQuery,proposta,vigencia,valor,datacadastro,nome,tipopessoa,CNPJcpf,inscrest,ddd,telefone,complemento,comsid
proposta = Request.Form("proposta")
nome = Request.Form("nome")
if proposta = "" then
proposta = Numera("propostas", "proposta")
strQuery = "INSERT INTO propostas (proposta,nome) VALUES ('"&proposta&"','"&nome&"')"
end if
Response.Redirect "proposta.asp?proposta='"&proposta&"'"
o q acontece ele nao insere dado nenhum no campo da tabela apenas o campo proposta ele cria um novo numero e cria uma nova linha na tabela mais nao inclui o nome no campo nome pq???
podem me ajudar ou me passar um exeplo semelhante?
Erro Em Incluir
Started By Reluviari, 02/07/2003, 16:59
2 replies to this topic
#2
otavio
-
- Usuários
-
- 443 posts
http://www.cursosvirtuais.net
- Sexo:Não informado
Posted 02/07/2003, 17:33
no primeiro codigo use:
no outro use:
Duas coisas:
1) Se o campo proposta for numerico e vc tiver usando access coloque:
" & proposta & " senão '" & proposta & "'
2) o que é proposta = Numera("propostas", "proposta")
Abraços,
t+
if Request.QueryString("proposta") <> "" then
set rsquery = conn.execute ("select * from propostas where proposta = '" & Request.QueryString("proposta") & "';")
p_proposta = rsquery("proposta")
p_nome = rsquery("nome")
end if
no outro use:
<%
Response.Expires = 0
Response.Buffer = True
Dim strQuery,proposta,vigencia,valor,datacadastro,nome,tipopessoa,CNPJcpf,inscrest,ddd,telefone,complemento,comsid
proposta = Request.Form("proposta")
nome = Request.Form("nome")
if proposta = "" then
conn.execute ("INSERT INTO propostas (proposta,nome) VALUES ('" & proposta & "','" & nome & "')";")
end if
Response.Redirect "proposta.asp?proposta=" & proposta
%>
Duas coisas:
1) Se o campo proposta for numerico e vc tiver usando access coloque:
" & proposta & " senão '" & proposta & "'
2) o que é proposta = Numera("propostas", "proposta")
Abraços,
t+
#3
Reluviari
-
- Usuários
-
- 78 posts
Normal
- Sexo:Não informado
Posted 03/07/2003, 09:48
eu uso sql cara ................
Numera("propostas", "proposta")isso aki cara é yuma função q eu faço para se alto numera assim q um cliente fizer um cadstro.............
a função é esse se tiver uma melhor me passe por favor valewwwwww
<%
function Numera(Tabela, Campo)
query = "select max(" + campo + ") as qtd from " + Tabela
set query = Conn.Execute(query)
Numera = query("qtd") + 1
end function
%>
Numera("propostas", "proposta")isso aki cara é yuma função q eu faço para se alto numera assim q um cliente fizer um cadstro.............
a função é esse se tiver uma melhor me passe por favor valewwwwww
<%
function Numera(Tabela, Campo)
query = "select max(" + campo + ") as qtd from " + Tabela
set query = Conn.Execute(query)
Numera = query("qtd") + 1
end function
%>
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)
