INSERT e UPDATE

G10 · Julho 6, 2012

Bom dia Amigos, gostaria de uma ajuda aqui

estou criando um sistema de noticias onde eu tenho a página

inserirArtigo.asp onde eu faço um INSERT no banco com as informações do formulario preenchido,

após isso sou direcionado para outra página que chama

inserirFotoNoticia.asp , onde tenho um campo input type="file

a pessoa seleciona a foto referente a noticia e faz o upload

qué é feito pela página uploadFotoNoticia.asp,

o problema é que não tenho idéia de como fazer para gravar a imagem no mesmo ID da notícia

ao invez de gravar em outro ID como mostra a imagen abaixo:

SEGUE O CÓDIGO DAS PAGINAS

inserirArtigo.asp

<%
  if not session("status") = "ok" then
     response.redirect("login.asp?erro=negado")
  else
%>

<!--#include file="html.asp"-->
<title><%=tituloSite%> - Notícias</title>
<script>
	function preview1(){
	if (form.titulo.value == ""){
	visualizacao.innerHTML = "<div id='iconeArtigoDetalhe'> </div><h2>"+ form.titulo.value + "</h2><span class='dataNoticia'><b>Data:</b> " + form.data.value + "<br><span class='dataNoticia'><b>Autor:</b> " + form.autor.value + "<br><br></span><div class='separadorNoticias'> </div><br>" + form.materia.value}
	else{
	visualizacao.innerHTML = "<div id='iconeArtigoDetalhe'> </div><h2>"+ form.titulo.value + "</h2><span class='dataNoticia'><b>Data:</b> " + form.data.value + "<br><span class='dataNoticia'><b>Autor:</b> " + form.autor.value + "<br><br></span><div class='separadorNoticias'> </div><br>" + form.materia.value}
	}

	function name1change(){
	form.titulo.value = form.titulo2.value
	}

	function validaForm(){
    d = document.form;

	//valido a data
    if (d.data.value.length==0){
       alert("Preencha o campo DATA")
       d.data.focus()
       return(false);
    }

    //valido o título
    if (d.titulo.value.length==0){
       alert("Preencha o campo TÍTULO DO NOTÍCIA")
       d.titulo.focus()
       return(false);
    } 

	//valido a materia
    if (d.materia.value.length==0){
       alert("Preencha o campo TEXTO DO NOTÍCIA")
       d.materia.focus()
       return(false);
    } 

    d.submit(); 
   	}   
</script>


<!-- DECLARANDO EDITOR HTML -->
   <script language="Javascript" src="HtmlBox/jquery-1.3.2.min.js" type="text/javascript"></script>
   <script language="Javascript" src="HtmlBox/htmlbox.min.js" type="text/javascript"></script>
<!-- FIM -->



<!--#include file="header.asp"-->
<!--#include file="htmlClose.asp"-->
<body class="bodySistema">
   <div id="tudo">
       <div id="conteudo">
           <div id="header">
		<%			

		If session("paginaArtigo") = "0" Then 
		  	Response.redirect "index.asp"
		  	Response.End
		End If

		%>
           	<div id="logo">
               	<a href="index.asp"><img src="../imagens/logo.png" border="0" /></a>
               </div>
               <div id="menuSistema">
				<!--#include file="controleSistema.asp"-->
				<div id="tabsMenu">
					<!--#include file="menu.asp"-->
				</div>
               </div>
		</div>
		<div id="luzTopo">
			 
		</div>
           <div id="info">
               <div id="barraTituloSistema">
				<div id="icone"><img src="../imagens/iconeArtigo.png" border="0" /></div>
			<% 
			nomeCategoria = request.querystring("categoria")
			%>
				<div id="tituloSistema">
					<a href="inserirArtigo.asp?categoria=<%=nomeCategoria%>" title="Inserir"><img src="imagens/botaoInserir.png" border="0" alt="Inserir" align="absmiddle" /></a> notícias » <%=nomeCategoria%> » inserir notícia
				</div>
			</div>

			<a href="javascript:self.history.go(-1)" class="voltar">« voltar</a>
			<br><br>
			<%
			inputnum = request.querystring("inputnum")
			If IsEmpty(inputnum) or inputnum = "" then
			%>
			<form id=form method="POST" action="inserirArtigo.asp?inputnum=1" name="form">
               	<div id="conteudoEsquerda">
					<input type="hidden" name="categoria" value="<%=nomeCategoria%>" size="13" class="inputArtigos" />
					<input type="hidden" name="autor" value="<%=session("nome")%>" size="13" class="inputArtigos" />
					<label>Data</label><br>
					<input type="text" name="data" value="<%=Date%>" size="13" class="inputArtigos" />
					<br><br>
					<label>Título do notícia</label><br>
					<input type="text" name="titulo" value="" size="50" class="inputArtigos" />
					<br><br>
					<label>Texto do notícia</label><br>
					<textarea id="materia" rows="10" name="materia" style="width:420px;" class="inputArtigos"></textarea>

					<br><br>
					<div class="alignRight">
						<input type="button" title="Cadastrar" value="Cadastrar" onClick="validaForm()" name="cadastrar" />
						 
						<input type="button" value="Visualizar" name="visualizar" onClick="preview1()">
					</div>
				</div>
				<div id="conteudoDireita">
					<div id="visualizacao">

					</div>						
				</div>					
				</form>

<!-- APLICANDO JS NO TEXTATEA -->					
<script language="Javascript" type="text/javascript">
var hb = $("#materia").htmlbox({
   buttons:[
     ["bold","italic"]
],
icons:"default",
skin:"silver"
});
</script>
<!-- FIM -->


			<% else
			data = request.form("data")
			If data = "" Then data = date()
			dia = DatePart("d", data)
			If dia < 10 Then dia = "0"&dia
			mes = DatePart("m", data)
			If mes < 10 Then mes = "0"&mes
			ano = DatePart("yyyy", data)
			data = ano & "-" & mes & "-" & dia

			titulo = request.form("titulo")
			titulo = Replace(request.form("titulo"), "'", "''")
			titulo = Replace(Request.Form("titulo"), Chr(13), "<br>")

			materia = request.form("materia")
			materia = Replace(Request.Form("materia"), "'", "''")
			materia = Replace(Request.Form("materia"), Chr(13), "<br>")

			autor = request.form("autor")
			autor = Replace(request.form("autor"), "'", "''")
			autor = Replace(Request.Form("autor"), Chr(13), "<br>")

			categoria = request.form("categoria")
			categoria = Replace(request.form("categoria"), "'", "''")
			categoria = Replace(Request.Form("categoria"), Chr(13), "<br>")


				Set Conn = Server.CreateObject("adodb.connection")
				conn.Open "DRIVER={MySQL ODBC 5.1 Driver};SERVER=localhost;DATABASE=dados;USER=root;PWD="  
			    SQLstmt = "INSERT INTO artigos (titulo,data,materia,categoria,autor)"
				SQLstmt = SQLstmt & " VALUES (" 
				SQLstmt = SQLstmt & "'" & titulo & "',"
				SQLstmt = SQLstmt & "'" & data & "',"
				SQLstmt = SQLstmt & "'" & materia & "',"
				SQLstmt = SQLstmt & "'" & categoria & "',"
				SQLstmt = SQLstmt & "'" & autor	 & "'"
				SQLstmt = SQLstmt & ")"

				Set RS = conn.execute(SQLstmt)

			    response.redirect "inserirFotoNoticia.asp?id=1"
			end if %>
           </div>
		<div id="luzRodape">
			 
		</div>
       </div>
</div>
<div id="fim">
	<center>
		<!--#include file="rodape.asp"-->
	</center>	
</div>
</body>
</html>
<% end if %>

inserirFotoNoticia.asp

<%
  if not session("status") = "ok" then
     response.redirect("login.asp?erro=negado")
  else
%>

<!--#include file="html.asp"-->
<title><%=tituloSite%> - Fotos</title>
<script>
	function preview1(){
	if (form.titulo.value == ""){
	visualizacao.innerHTML = "<div id='iconeArtigoDetalhe'> </div><h2>"+ form.titulo.value + "</h2><span class='dataNoticia'><b>Data:</b> " + form.data.value + "<br><span class='dataNoticia'><b>Autor:</b> " + form.autor.value + "<br><br></span><div class='separadorNoticias'> </div><br>" + form.materia.value}
	else{
	visualizacao.innerHTML = "<div id='iconeArtigoDetalhe'> </div><h2>"+ form.titulo.value + "</h2><span class='dataNoticia'><b>Data:</b> " + form.data.value + "<br><span class='dataNoticia'><b>Autor:</b> " + form.autor.value + "<br><br></span><div class='separadorNoticias'> </div><br>" + form.materia.value}
	}

	function name1change(){
	form.titulo.value = form.titulo2.value
	}

	function validaForm(){
    d = document.form;

	//valido a data
    if (d.data.value.length==0){
       alert("Preencha o campo DATA")
       d.data.focus()
       return(false);
    }

    //valido o título
    if (d.titulo.value.length==0){
       alert("Preencha o campo TÍTULO DO ARTIGO")
       d.titulo.focus()
       return(false);
    } 

	//valido a materia
    if (d.materia.value.length==0){
       alert("Preencha o campo TEXTO DO ARTIGO")
       d.materia.focus()
       return(false);
    } 

	alert("Artigo cadastrado com sucesso!");
    d.submit(); 
   	}   

	function insRow()
	{
	var x=document.getElementById('myTable').insertRow(0);
	var y=x.insertCell(0);

	y.innerHTML="<H2>Carregando as fotos...</H2><img src='imagens/carregando.gif' border='0'>";
	}

	function desabilitar_botao(){
		d=document.upload
		d.cmdEnviar.disable="true";
	}
</script>

<!--#include file="header.asp"-->
<!--#include file="htmlClose.asp"-->
<body class="bodySistema">
   <div id="tudo">
       <div id="conteudo">
           <div id="header">
		<%

		If session("paginaFotos") = "0" Then 
		  	Response.redirect "index.asp"
		  	Response.End
		End If

		%>
           	<div id="logo">
               	<a href="index.asp"><img src="../imagens/logo.png" border="0" /></a>
               </div>
               <div id="menuSistema">
				<!--#include file="controleSistema.asp"-->
				<div id="tabsMenu">
					<!--#include file="menu.asp"-->
				</div>
               </div>
		</div>
		<div id="luzTopo">
			 
		</div>
           <div id="info">
		<script>
			!window.jQuery && document.write('<script src="../js/fancybox/jquery-1.4.3.min.js"><\/script>');
		</script>
		<script type="text/javascript" src="../js/fancybox/jquery.mousewheel-3.0.4.pack.js"></script>
		<script type="text/javascript" src="../js/fancybox/jquery.fancybox-1.3.4.pack.js"></script>
		<link rel="stylesheet" type="text/css" href="../js/fancybox/jquery.fancybox-1.3.4.css" media="screen" />
	 	<link rel="stylesheet" href="../js/style.css" />
		<script type="text/javascript" >

		function enviar(){
			d=document.upload
			d.submit();
			document.getElementById('cmdEnviar').style.display='none';
			document.getElementById('loading').style.display='inline';
			document.getElementById('myTable').style.display='none';			
		}
		</script>
               <div id="barraTituloSistema">
				<div id="icone"><img src="../imagens/iconeFoto.png" border="0" /></div>
			<% 

			idNoticia = request.querystring("id")
			nomeCategoria = request.querystring("categoria")

			%>

			<div id="tituloSistema">
					<a href="inserirFotoNoticia.asp?categoria=<%=nomeCategoria%>" title="Inserir"><img src="imagens/botaoInserir.png" border="0" alt="Inserir" align="absmiddle" /></a><%=NomeCategoria%> » Notícia » inserir foto
				</div>
			</div>
			<a href="javascript:self.history.go(-1)" class="voltar">« voltar</a>
			<br><br>

			<form action="uploadFotoNoticia.asp?id=<%=idNoticia%>&categoria=<%=nomeCategoria%>" method="post" enctype="multipart/form-data" name="upload" id="upload" onsubmit="return desabilitar_botao()">
               	<div id="conteudoEsquerda" style="width:100%;">
					<table width="360" border="0" id="myTable">
				        <tr>
				          <td>
				            <input type="file" name="Arquivo1" size="50" />
				          </td>
						</tr>
						<tr>
				          <td>
				            <input type="file" name="Arquivo2" size="50" />
				          </td>
						</tr>
						<tr>
				          <td>
				            <input type="file" name="Arquivo3" size="50" />
				          </td>
						</tr>
						<tr>
				          <td>
				            <input type="file" name="Arquivo4" size="50" />
				          </td>
						</tr>
						<tr>
				          <td>
				            <input type="file" name="Arquivo5" size="50" />
				          </td>
				        </tr>
				    </table>
					<center>
						<div id="loading" style="display:none;margin:50px 0px 50px 0px;">
							<b style="font-size:20px;color:#253e4f;">Aguarde até que o processo de carregamento finalize.</b>
							<br>
							<img src="imagens/loadingBarra.gif" border="0" id="loading" style="padding:20px 0px 20px 0px;" />
						</div>
					</center>
						<input type=button name="cmdEnviar" id="cmdEnviar" value="Carregar fotos" style="margin-top:20px;" onclick="enviar();">
				</div>

           </div>
		<div id="luzRodape">
			 
		</div>
       </div>
</div>
<div id="fim">
	<center>
		<!--#include file="rodape.asp"-->
	</center>	
</div>
</body>
</html>
<% end if %>

UploadFotoNoticia.asp

<!--#include file="adovbs.inc"-->
<!--#include file="criptografia.asp"-->

<%
randomize
tam=8 'Define o tamanho da senha
md=md5(now())
aleat=Int(22-tam*Rnd)+1
codigoAleatorio=mid(md, aleat, tam)
%>
<%'###### início loop SaFileUp componente##########################################################%>

<%

Server.ScriptTimeout = 360

Dim oFileUp
Dim strFormElement
Dim strSubItem

'--- Instantiate the FileUp object
Set oFileUp = Server.CreateObject("SoftArtisans.FileUp")

oFileUp.Path = caminhoFisico & "C:\inetpub\wwwroot\Perfumes\Web\system\imagens\fotos\"

For Each strFormElement In oFileUp.Form

	If IsObject(oFileUp.Form(strFormElement)) Then

		'--- It's a file element, so we'll see if it's empty or not
		If Not oFileUp.Form(strFormElement).IsEmpty Then

			'--- It's not empty, so we'll save it
			On Error Resume Next
				oFileUp.Form(strFormElement).Save
				'If Err.Number <> 0 Then

				'End If
			On Error Goto 0


'######### início do registro na Base de Dados, dentro do loop do script de upload   ##############


nome_original = codigoAleatorio & "_" & oFileUp.Form(strFormElement).ShortFilename
nome_arquivo = oFileUp.Form(strFormElement).ShortFilename


id= request.QueryString("id")



%> 
<%'#################  criando a miniatura para o thumbnail ASPJPG  ################################%>



<% 
' Create instance of AspJpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' Open source image
Jpeg.Open "C:\inetpub\wwwroot\Perfumes\Web\system\imagens\fotos\" & nome_arquivo &""


' New width
L = 450

' Resize, preserve aspect ratio
If Jpeg.OriginalWidth > jpeg.OriginalHeight Then
  Jpeg.Width = L
  Jpeg.Height = jpeg.OriginalHeight * L / jpeg.OriginalWidth
Else
  Jpeg.Height = L
  Jpeg.Width = jpeg.OriginalWidth * L / jpeg.OriginalHeight
End If

'Esse método é opcional, usado para melhorar o visual da imagem 
'Jpeg.Sharpen 1, 150

Jpeg.Quality = 70

' create thumbnail and save it to disk
Jpeg.Save "C:\inetpub\wwwroot\Perfumes\Web\system\imagens\thumbs\" & codigoAleatorio & "_" & nome_arquivo &""

%> 

<%Set Jpeg = Nothing%> 


<% 
' Create instance of AspJpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' Open source image
Jpeg.Open "C:\inetpub\wwwroot\Perfumes\Web\system\imagens\fotos\" & nome_arquivo &""

' New width
L = 450
' Resize, preserve aspect ratio
If Jpeg.OriginalWidth > jpeg.OriginalHeight Then
  Jpeg.Width = L
  Jpeg.Height = jpeg.OriginalHeight * L / jpeg.OriginalWidth
Else
  Jpeg.Height = L
  Jpeg.Width = jpeg.OriginalWidth * L / jpeg.OriginalHeight
End If

'Esse método é opcional, usado para melhorar o visual da imagem 
'Jpeg.Sharpen 1, 150

Jpeg.Quality = 70
jpeg.Adjust 3, -1
jpeg.Adjust 1, 0.2

' create thumbnail and save it to disk
Jpeg.Save "C:\inetpub\wwwroot\Perfumes\Web\system\imagens\thumbs\pb_" & codigoAleatorio & "_" & nome_arquivo &""

%> 

<%Set Jpeg = Nothing%> 


<% 
' Create instance of AspJpeg
Set Jpeg = Server.CreateObject("Persits.Jpeg")
' Open source image
Jpeg.Open "C:\inetpub\wwwroot\Perfumes\Web\system\imagens\fotos\" & nome_arquivo &""

' New width
L = 450

' Resize, preserve aspect ratio
If Jpeg.OriginalWidth < 1000 Then

ElseIf Jpeg.OriginalWidth > jpeg.OriginalHeight Then
  Jpeg.Width = L
  Jpeg.Height = jpeg.OriginalHeight * L / jpeg.OriginalWidth
Else
  Jpeg.Height = L
  Jpeg.Width = jpeg.OriginalWidth * L / jpeg.OriginalHeight
End If

'Esse método é opcional, usado para melhorar o visual da imagem 
'Jpeg.Sharpen 1, 150

Jpeg.Quality = 70

X = Jpeg.Width - 300	
Y = Jpeg.Height - 200


Jpeg.Canvas.Font.Color = &HFFFFFFF
Jpeg.Canvas.Font.Family = "Arial"
Jpeg.Canvas.Font.Size = 14
Jpeg.Canvas.Font.Bold = True
Jpeg.Canvas.Font.ShadowColor = &H000000
Jpeg.Canvas.Font.ShadowXoffset = 1
Jpeg.Canvas.Font.ShadowYoffset = 1
Jpeg.Canvas.Font.Quality = 1 


Dados = "DRIVER={MySQL ODBC 5.1 Driver};SERVER=localhost;DATABASE=dados;USER=root;PWD="

sqlstmtConfig = "SELECT * FROM configuracoes where id=1"
Set rsConfig = Server.CreateObject("ADODB.Recordset")
rsConfig.Open sqlstmtConfig, Dados

enderecoSite = rsConfig("enderecoSite")

Set rsConfig = nothing

'Jpeg.Canvas.Print 10, 10, "© " & Year(Date) & " " & enderecoSite

' create thumbnail and save it to disk
Jpeg.Save "C:\inetpub\wwwroot\Perfumes\Web\system\imagens\fotos\" & codigoAleatorio & "_" & nome_arquivo &""

%> 

<%Set Jpeg = Nothing%>

<%'###########################################  FIM ASPJPG  #######################################%>


<%
ConnString="DRIVER={MySQL ODBC 5.1 Driver};SERVER=localhost;DATABASE=dados;USER=root;PWD="
Set Conn = Server.CreateObject("ADODB.Connection") 
Conn.Open ConnString 

set insertSet = Server.CreateObject("ADODB.Recordset")
insertSet.Open "artigos", Conn,_
adOpenStatic, adCmdTable

insertSet.AddNew
insertSet("id") = idNoticia
insertSet("foto") = codigoAleatorio & "_" & nome_arquivo
insertSet("thumb") = codigoAleatorio & "_" & nome_arquivo
insertSet.update

insertSet.close
set insertSet = Nothing

%>
<%
set RS = nothing
Conn.close

%>		

<%
           End If


       End If
next
'--- Dereference FileUp
Set oFileUp = Nothing
'####### FIM do SaFileUp componente   #########################################################

if nome_arquivo = "" then

else
Set ObjFSO = Server.CreateObject("Scripting.FileSystemObject")
ObjFSO.DeleteFile "C:\inetpub\wwwroot\Perfumes\Web\system\imagens\fotos\"&nome_arquivo&" "
Set ObjFSO = Nothing
end if
%>

<%
idNoticia = request.querystring("id")
nomeCategoria = request.querystring("categoria")

response.Redirect("artigos.asp?categoria="&nomeCategoria&"&id="&idNoticia&"")
%>

AGRADEÇO DESDE JÁ !!

xanburzum · Julho 6, 2012

passe em um campo tipo hidden o ID dá noticia, depois na hora de gravar recupere este ID

G10 · Julho 6, 2012

passe em um campo tipo hidden o ID dá noticia, depois na hora de gravar recupere este ID

Cara a lógica eu entendi, você poderia dar umas dica para colocar isso na prática tenho algumas duvidas, como eu recupero o valor do campo na página UploadFotoNoticia.asp , vi que não posso usar request.form , como eu faria ?

G10 · Julho 10, 2012

Consegui passar o ID da noticia em um campo hidden ,

agora quero saber como fazer com que o meu código que grava o thumb e a foto

faça um UPDATE nessa noticia especifica inserindo os valores no campo "foto e thumb"

o código que tenho faiz a gravação na linha de baixo da noticia no banco de dados...

<%
ConnString="DRIVER={MySQL ODBC 5.1 Driver};SERVER=localhost;DATABASE=dados;USER=root;PWD="
Set Conn = Server.CreateObject("ADODB.Connection") 
Conn.Open ConnString 

set insertSet = Server.CreateObject("ADODB.Recordset")
insertSet.Open "artigos", Conn,_
adOpenStatic, adCmdTable

insertSet.AddNew
insertSet("id") = idNoticia
insertSet("foto") = codigoAleatorio & "_" & nome_arquivo
insertSet("thumb") = codigoAleatorio & "_" & nome_arquivo
insertSet.update

insertSet.close
set insertSet = Nothing

%>
<%
set RS = nothing
Conn.close

%>

como ele ficaria ?

Obrigado

xanburzum · Julho 11, 2012

olha este exemplo:

Atualizar_form_treina.asp

<% ‘aplicação para atualizar os dados do usuário na base de dados do access

‘onde através do request.querystring do código ,faremos uma SELECT (SQL)

‘e jogaremos no value do form ,sendo postado através do post pra

‘atualizar_action.asp k fará o UPDATE

Option explicit

‘declaro as var

dim conexao, conDBQ, constring, rs, SQL, varcodigo

‘recupero a var

varcodigo=request.querystring(“codigo”)

‘crio a conexao

‘ pasta conn dentro de wwwroot

%>

<!–#include file=”conn/conexao1.asp”–>

<%call abreconexao

‘crio o recordset

set rs=Server.CreateObject(“ADODB.Recordset”)

SQL=”SELECT * FROM login WHERE codigo=”&varcodigo&”"

rs.open SQL,conexao,1,3

‘crio o form para jogar os rs’z no value %>

<html>

<head>

<title>Atualização de Usuários</title>

</head>

<div align=”center”><b><font face=”Verdana, Arial, Helvetica, sans-serif” size=”3″ color=”#FFFFFF”>::

</font><font face=”Verdana, Arial, Helvetica, sans-serif” size=”2″ color=”#FFFFFF”>Atualizar

Dados do Usuário</font></b></div></td></tr> <tr bgcolor=”#336699″> <td colspan=”2″ height=”19″> </td></tr>

<p><b><font face=”Verdana, Arial, Helvetica, sans-serif” size=”2″ color=”#e6e6e6″>Login:</font></b>

<input type=”hidden” name=”codigo” value=”<%=rs(“codigo”)%>”> </p><p><b><font face=”Verdana, Arial, Helvetica, sans-serif” size=”2″ color=”#e6e6e6″>Email:</font><font face=”Verdana, Arial, Helvetica, sans-serif” size=”1″ color=”#000000″>

</font></b></p><p><b><font face=”Verdana, Arial, Helvetica, sans-serif” size=”2″ color=”#e6e6e6″>Senha:</font><font face=”Verdana, Arial, Helvetica, sans-serif” size=”1″ color=”#000000″>

</font></b></p><p align=”center”>

</p></form></td></tr>

<% ‘FECHO O RS

set rs=nothing

‘fecha a conexao

call fechaconexao%> </table>

</body>

</html>

Após, exibir os dados corretos,em um form, agora vamos atualizá-lo, como os novos dados digitados pelos user. Para atualizar os dados usando a SQL UPDATE é usada para atualizar os registros existentes em uma tabela.

SQL UPDATE Sintaxe

UPDATE table_name

SET column1=value, column2=value2,…

WHERE some_column=some_value

A cláusula WHERE especifica qual registro ou registros que devem ser atualizadas. Se você omitir a cláusula WHERE, todos os registros serão atualizados

Atualizar_action_treina.asp

<% ‘aplicação para fazer o update dos dados do form atualizar_form.asp

‘onde recupero todos os dados dos campos do form,dou um replace nos ‘ por “”

‘e crio a SQL para efetuar o update depois redireciono p/ administracao.asp

‘ com passagem de parametro na URL msg=2

option explicit

‘declaro as var

dim conexao, conDBQ, constring, rs, SQL, varcodigo, varlogin, varsenha, varemail

‘recupero as var

varcodigo=trim(request.form(“codigo”))

varlogin=trim(request.form(“login”))

varsenha=trim(request.form(“senha”))

varemail=trim(request.form(“email”))

‘ retiro qqer erro de digitaçao do user ,no caso ( aspas simples ‘)

varlogin=replace (varlogin,”‘”,”")

varsenha=replace (varsenha,”‘”,”")

varemail=replace(varemail,”‘”,”")

‘crio a conexao%>

<!–#include file=”conn/conexao1.asp”–>

<% ‘abro a conexao

call abreconexao

‘crio o rs

set rs=Server.createobject(“ADODB.Recordset”)

‘crio a SQL

SQL=”UPDATE login SET login=’”&varlogin&”‘,senha=’”&varsenha&”‘,email=’”&varemail&”‘ WHERE codigo=”&varcodigo&”"

rs.open SQL,conexao,1,3

if session(“login”) = “admin” then

response.redirect(“administracao_treina.asp?msg=2″)

else

response.redirect(“administracao1.asp?msg=2″)

end if

‘fecho o rs

set rs=nothing

‘fecho a conexao

call fechaconexao%>

Vejam também, que após realizar a atualização, o user é redirecionado para a pagina de administração, com um parâmetro na querystring, que será recuperado e exibido uma mensagem de sucesso.

Entrar

Arquivado

INSERT e UPDATE

Recommended Posts

G10 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

G10 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

G10 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

editor quill configuração

PHP - Orientação com UPDATE

BelogsTo do laravel

Este projeto é apoiado pelas empresas

Fóruns

Tempo Real

Informação importante