Ir para conteúdo
  • 0
Person

Atualizar um status sem dar Refresh

Pergunta

Estou fazendo um protótipo de e-commerce com aps clássico e sql server, na parte de administração, o usuário administrativo pode alterar o status do pedido,  para isso ele clica no botão de alterar na pagina principal e é redirecionado para um formulário onde tenho as options, para que ele mude o status, coloquei um botão para que ele passe os parâmetros  (id_pedido e id_status_pedido) para a pagina de manutenção, onde é feito o update e o envio de e-mail com as atualizações. Mas quero retirar esse botão e fazer com que, assim que eu clique em uma opção, ele altere, sem eu precisar ser redirecionado para a tela de manutenção, isso com o Ajax se possível.

 

<body>
<%
call Abredb()
cod = Request.QueryString("cod")
evt  = Request.QueryString("evt")

if cod <> "" then
   cod = cint(cod)
end if

if ucase(evt) = "ALT" then
  sql = "exec SP_TR32_status_frm_SEL"
  	'Response.Write(sql)
  	'Response.End()
	set rs = dbWeb.execute(sql)
	
	estrato = rs("id_status_pedido") 
	
   bot        = "Alterar"
end if
%>
<div class="container">
  <div class="titulo">Formulario</div>
  <form action="manu_pedido.asp" method="post" enctype="multipart/form-data">
    <div class="detalhes-formulario">
      <div class="input-box"> <span class="detalhes">status</span>
        <select class="form-control" name = "status">
          <% do while not rs.eof%>
          <option value="<%=rs("id_status_pedido")%>"><%=rs("descricao")%></option>
          <% rs.movenext
				loop
				rs.close
				set rs = nothing
				%>
        </select>
      </div>
    </div>
        <button><a href="/treinamento/Thau/mini_mercado/adm/manu_pedido.asp?evt=alt&cod="<%=cod%>"&estrato="<%rs("id_status_pedido")%>
  </form>
</div>
<br>


</body>
<%call Fechadb()%>
</html>

Abaixo está o código da minha pagina de manutenção, no qual acontece a alteração do status


<%
Function ZerosEsquerda(Num,tam)
	Dim Zero
	Num = Trim(Num)
	Zero = ""
	For i = Len(Num) To tam - 1
	    Zero = "0" & Zero
	Next
	ZerosEsquerda = Trim(Zero & Num)
End Function

byteCount = Request.TotalBytes
RequestBin = Request.BinaryRead(byteCount)
Set UploadRequest = CreateObject("Scripting.Dictionary")
BuildUploadRequest RequestBin
	
'opc = request.QueryString("opc")
'if opc = "" then	
	'cod = UploadRequest.Item("hfcod").Item("Value")
	'botao = UploadRequest.Item("botao").Item("Value")
	'estrato =      UploadRequest.Item("estrato").Item("Value")
'end if

session.LCID = 1046

call Abredb()


if botao = "Alterar" then
' ALTERANDO OS DADOS RECEBIDOS NA TABELA

sql = "exec SP_TR32_pedido_UPD "&cod&", '"&estrato&"'"
	'response.write sql
	'response.end
 	dbWeb.execute(sql)
	
 


str_html = ""
str_html = str_html & "<HTML><BODY BGCOLOR=#0000FF>"
str_html = str_html & "<h1>produtos</h1>"
sql ="SP_TR32_email__itens_sel "&cod&""	
set rs = dbWeb.execute(sql)
	str_html = str_html & "<table>"
	str_html = str_html & "<thead>"
	str_html = str_html & " <tr>"
	str_html = str_html & "<th>Produtos</th>"
	str_html = str_html & "<th>quantidade</th>"
	str_html = str_html & " <th>Total</th>"
	str_html = str_html & "</tr>"
	str_html = str_html & "  </thead>"
	str_html = str_html & "<tbody>"
do while not rs.eof
	str_html = str_html & "<tr>"
	str_html = str_html & "<td >"&rs("produto")&"</td>"
	str_html = str_html & "<td >"&rs("quantidade")&"</td>"
	str_html = str_html & "<td >"&rs("total")&"</td>"
	str_html = str_html & "</tr>"
 rs.movenext
 loop 
rs.close
set rs = nothing
str_html = str_html & " </tbody>"
str_html = str_html & "</table>"
str_html = str_html & "</BODY></HTML>"

sql = "SP_TR32_email_sel "&cod&"" 
set rs = dbWeb.execute(sql)

if estrato<>"" then 
	Set ObjMail = Server.CreateObject("Cdonts.Newmail")
        objMail.Subject     = "Atualização de pedido"
        objMail.From        = "Porto Dourado <contato@email.websupply.com.br>" 
        objMail.To          = "request("email")"
        objMail.BodyFormat  = 0
        objMail.MailFormat  = 0
        objMail.Body       = "Olá"&" "&rs("nome")&" "&rs("sobrenome")&", </br> Houve uma atualização em seu pedido pedido: "&rs("id_pedido")&" </br> o status mudou para: "&rs("descricao")&" </br> endereço de entrega: "&rs("cep")&", "&rs("rua")&", "&rs("bairro")&", "&rs("numero")&", "&rs("cidade")&", "&rs("Uf")&" </br>Total pedido: "&rs("total_pedido")&" </br> "& str_html &" </br></br>"&" Atentamente,"&" </br> "&"Equipe Porto dourado"&" </br></br> "&"Para entrar em contato com a equipe de suporte, entre em contato com o email  ou ligue para nossa central no numero "
  		
		objMail.Send
	Set objMail = nothing
	envio = true %>
<script>
		alert('email com alteração enviado com sucesso!');
	</script>
<%	
end if

if estrato = 6 then
sql = "exec SP_TR32_adm_data_envio_UPD "&cod&""
dbWeb.execute(sql)
end if

if estrato = 4 then 
sql = "exec SP_TR32_adm_data_entregue_UPD "&cod&""
dbWeb.execute(sql)
end if
%>
<script>
    alert("Dados alterado com sucesso!")
    parent.location = "cst_pedido.asp"
</script>
<%
end if
%>
<%call Fechadb()%>

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

0 respostas a esta questão

Recommended Posts

Até agora não há respostas para essa pergunta

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora

  • Conteúdo Similar

    • Por ILR master
      Pessoal, pergunta bem simples. Abaixo tenho o seguinte código:
       
      <script>
      function alerta()
      {
        if (window.confirm("Você realmente quer sair?")) {
          window.open("sair.html");
      }
      }
      </script>
       
      Funciona perfeitamente, só que está abrindo em outra janela e quero que abra na mesma janela.
       
      Alguém pode me ajudar?
    • Por Giovanird
      Olá a todos!
      Tenho uma pagina que possui uma DIV onde coloquei uma pagina PHP.
      Uso a função setInterval para atualizar a pagina inclusa dentro da DIV.
      O problema é que ao acessar o site , a DIV só me mostra a pagina inclusa somente quando completo o primeiro minuto.
      Preciso que a pagina inclusa já inicie carregada
       
      Meu código JavaScript e a DIV com a pagina PHP
       
      <script> function atualiza(){ var url = 'direita.php'; $.get(url, function(dataReturn) { $('#direita').html(dataReturn); }); } setInterval("atualiza()",60000); </script> <div> <span id="direita"></span> </div>  
    • Por Thiago Duarte
      Oi, gostaria de arrastar imagem e ao soltar formar bloco html, meu bloco de html ficaria com nome, content-1.html, content-2.html, etc
       
      Alguem pode me ajudar?
    • Por belann
      Olá!
       
      Estou fazendo o upload de arquivos com fetch dessa forma
      fetch(url, {
              method: 'POST',
              headers: {'Content-Type': 'multipart/form-data',},
              body: formData 
          }).catch((error) => (console.log("Problemas com o Upload"), error));
       
      estou usando input type=file
      e criando uma const formData = new FormData(); 
      mas não faz e não dá nenhum erro.
      estou fazendo o upload com a url="http://localhost/dashboard/dados".
×

Informação importante

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