Alterar / Editar dados do Banco de Dados SQL (asp)

[Fells 0]

Boa tarde galera do forum.

 

A da vez hoje é o seguinte. Tenho um sistema onde o usuário faz cadastro de produtos. Porém o mesmo pediu que fosse feito um esquema para que ele pudesse alterar o valor do campo Quantidade pois esse valor se altera no estoque. O sistema atualmente insere dados no banco e consulta os mesmo exibindo-os para o usuário. Essa parte de Editar pra mim é coisa nova pois nunca fiz.

 

Sei que tenho que pegar o produto que ele quer alterar a Quantidade, passar por parâmetro para um asp com um formulario para que ele edite o campo Quantidade e logo após salvar a alteração.

 

Porém como faço isso?

 

Obrigado.

 

Abaixo segue o codigo que exibe os dados dos produtos para o usuario

 

<%
While not rs.eof
%>
  <table width="90%" align = 'center' border = '4'>
     <tr><td>

       <table cellspacing="0" width="100%">
	  <tr>
	  	<td width = '2%'></td>
           <td width="10%" align="center" ><font size = "2" color="#27408B"><b>Nº Certificado</b></td>
		<td width = '2%'></td>
           <td width="10%" align="center" ><font size = "2" color="#27408B"><b>Componente</b></td>
		<td width = '2%'></td>
           <td width="10%" align="center" ><font size = "2" color="#27408B"><b>Nº Componente</b></td>
		<td width = '2%'></td>
           <td width="10%" align="center" ><font size = "2" color="#27408B"><b>Data Emissao</b></td>
		<td width = '2%'></td>
		<td width="10%" align="center" ><font size = "2" color="#27408B"><b>Nº Revisão</b></td>
		<td width = '2%'></td>
	  </tr>
     </table>

   <table cellspacing="0" width="100%">
	  <tr>
		<td width = '2%'></td>
'Aqui ao clicar no numero do certificado abre um pdf referente ao mesmo numero
		<td width="10%" align = "center" ><a target = '_blank' href="F:\DADOS\Auditoria da Qualidade\Relatórios\Certificado PSA\Ano_2012\CQPSA_<%=rs.Fields("Certificado") &"-"& Right(rs.Fields("DataEmissao"),2) & ".pdf" %>"><%=rs.Fields("Certificado")%></a></td>
		<td width = '2%'></td>
		<td width="10%" align = "center" ><input readonly style="text-align: center" class="texto" value="<%=UCase(rs.Fields("Componente"))%>"></td>
		<td width = '2%'></td>
		<td width="10%" align = "center" ><input readonly  style="text-align: center" class="texto" value="<%=UCase(rs.Fields("NumComponente"))%>"></td>
		<td width = '2%'></td>
		<td width="10%" align = "center" ><input readonly style="text-align: center" class="texto" value="<%=UCase(rs.Fields("DataEmissao"))%>"></td>
		<td width = '2%'></td>
		<td width="10%" align = "center" ><input readonly style="text-align: center" class="texto" value="<%=UCase(rs.Fields("NumRevisao"))%>"></td>
		<td width = '2%'></td>
	  </tr>
</table>


       <table cellspacing="0" width="100%">
          <tr>
	  	<td width = '2%'></td>
           <td width="10%" align="center" ><font size = "2" color="#27408B"><b>Lote</b></td>
		<td width = '2%'></td>
           <td width="10%" align="center" ><font size = "2" color="#27408B"><b>Qtde</b></td>
		<td width = '2%'></td>
           <td width="10%" align="center" ><font size = "2" color="#27408B"><b>Emitente</b></td>
		<td width = '2%'></td>
		<td width="10%" align="center" ><font size = "2" color="#27408B"><b>Data Desenho</b></td>
		<td width = '2%'></td>
		<td width="10%" align="center" ><font size = "2" color="#27408B"><b>Status</b></td>
		<td width = '2%'></td>
	  </tr>

       </table>

   <table cellspacing="0" width="100%">
 	  <tr>
		<td width = '2%'></td>
		<td width="10%" align = "center" ><input readonly  style="text-align: center" class="texto" value="<%=UCase(rs.Fields("Lote"))%>"></td>
		<td width = '2%'></td>
		<td width="10%" align = "center" ><input readonly style="text-align: center" class="texto" value="<%=UCase(rs.Fields("Qtde"))%>"></td>
		<td width = '2%'></td>
		<td width="10%" align = "center" ><input readonly style="text-align: center" class="texto" value="<%=UCase(rs.Fields("Emitente"))%>"></td>
		<td width = '2%'></td>
		<td width="10%" align = "center" ><input readonly style="text-align: center" class="texto" value="<%=UCase(rs.Fields("DataDesenho"))%>"></td>
		<td width = '2%'></td>
		<td width="10%" align = "center" ><input readonly style="text-align: center" class="texto" value="<%=UCase(rs.Fields("Status"))%>"></td>
		<td width = '2%'></td>
	</tr>
</table>

       <table cellspacing="0" width="100%">
 <tr>
	<td width = '10%'></td>
	<td width="40%" align="center" ><font size = "2" color="#27408B"><b>Status</b></td>
	<td width = '10%'></td>
 </tr>
</table>

       <table cellspacing="0" width="100%">
 <tr>
    <td width = '10%'></td>
           <td width="40%" align = "center" ><input readonly style="text-align: center" class="texto" value="<%=UCase(rs.Fields("Obs"))%>"></td>
    <td width = '10%'></td>
 </tr>
</table>
  </td>
 </tr>
</table>

<br>

<%
   rs.MoveNext
wend

rs.close
%>

[Marrabel 20]

Uma dica,

 

Você pode usar o comando UPDATE, ele serve para atualizar os dados no BD.

 

Uma ideia:

 

Você pode colocar um botão de Atualizar e fazer este comando quando for clicado. Exemplo:

 

NovaQuantidade = Request.Form("txt_quantidade")

SQL = "UPDADE SuaTabela SET Quantidade =" & NovaQuantidade

 

Espero que ajude.

Att.

[Vinicius Ianni 189]

Complementando, é bom usar um identificador unico para o campo que será atualizado, pois sem ele toda a tabela será atualizada.

 

SQL = "UPDADE SuaTabela SET Quantidade ='" & NovaQuantidade &"' where id="& id_do registro

[Marrabel 20]

É verdade, havia me esquecido.

[xanburzum 169]

olha este exemplo, onde você pode alterar direto no form