hay algun error?

24/06/2004 - 22:00 por Default_Per | Informe spam

con esto quiero actualizar mi bd, pero cuando cambio datos no llega a
actualizarce, que posible error o falta le encuentran aqui?

<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<center><IMG height7 src ="images/Dibujo.bmp" style="HEIGHT: 71px;
WIDTH: 500px" widths7 ></center>
<%

cod=Request.Form("txtcod")
com=Request.Form("txtapell")
con=Request.Form("txtnombr")
cal=Request.Form("txtfechnac")
cap=Request.Form("txtfechin")
cat=Request.Form("txtdni")
cak=Request.Form("txttelf")
cakt=Request.Form("txtdircc")

Set cn=Server.CreateObject("ADODB.Connection")
cn.Open "Provider=SQLOLEDB; Server=(local);Database½Empleado;uid=sa"
sql="Update EMPLEADO set Apellido='" & com & "', Nombre='"
sql=sql & con & "', Fecha_Nac='" & cal & "',Fecha_Inicio_Lab='" & cap &
"',DNI='" & cat & "',Telefono='" & cak & "',Direccion='" & cakt & "' where
Codigo=' "
sql=sql & cod & "'"
cn.Execute(sql)
set cn=Nothing
Response.Redirect("Administrador.asp")
%>

</BODY>
</HTML>

Siga el debate

3 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 Isaías

24/06/2004 - 22:54 | Informe spam

No dudo que alguien que sepa de HTML o ASP, pueda darle
una opinion, pero le recomiendo que lo postee en el grupo
correspondiente, este es de BASE DE DATOS

Responder a este mensaje

#2 Manuel Etcheto

25/06/2004 - 05:11 | Informe spam

Hola
Sì, hay 2 errores muy graves:
1 - Utilizar el usuario "sa"
2 - Ejecutar una query con datos que vienen del usuario

El pequeño detalle de un espacio como primer caracter del
campo codigo:

Codigo=' "
sql=sql & cod & "'"

seguramente es lo que hace que no actualice porque no hay
coincidencia

Suerte
Manuel

con esto quiero actualizar mi bd, pero cuando cambio

datos no llega a

actualizarce, que posible error o falta le encuentran

aqui?

<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio

6.0">

</HEAD>
<BODY>
<center><IMG height7 src ="images/Dibujo.bmp"

style="HEIGHT: 71px;

WIDTH: 500px" widths7 ></center>
<%

cod=Request.Form("txtcod")
com=Request.Form("txtapell")
con=Request.Form("txtnombr")
cal=Request.Form("txtfechnac")
cap=Request.Form("txtfechin")
cat=Request.Form("txtdni")
cak=Request.Form("txttelf")
cakt=Request.Form("txtdircc")

Set cn=Server.CreateObject("ADODB.Connection")
cn.Open "Provider=SQLOLEDB; Server(local);Database½Empleado;uid=sa"
sql="Update EMPLEADO set Apellido='" & com & "', Nombre='"
sql=sql & con & "', Fecha_Nac='" & cal

& "',Fecha_Inicio_Lab='" & cap &

"',DNI='" & cat & "',Telefono='" & cak & "',Direccion='"

& cakt & "' where

Codigo=' "
sql=sql & cod & "'"
cn.Execute(sql)
set cn=Nothing
Response.Redirect("Administrador.asp")
%>

</BODY>
</HTML>

.

Responder a este mensaje

#3 Guido

25/06/2004 - 16:37 | Informe spam

Tenës dos alternativas:
1) Hacés un StoredProcedure para el update y desde el asp le pasás los
parámetros
(es lo q yo haría)
ooooo
2) Abrís el recordset con ADO y hacés el update con ADO. q es más
ordenado y no tenés q concatenar sentencias SQL kilométricas.

Guido.-

Manuel Etcheto wrote:

Hola
Sì, hay 2 errores muy graves:
1 - Utilizar el usuario "sa"
2 - Ejecutar una query con datos que vienen del usuario

El pequeño detalle de un espacio como primer caracter del
campo codigo:
>Codigo=' "
>sql=sql & cod & "'"
seguramente es lo que hace que no actualice porque no hay
coincidencia

Suerte
Manuel

>con esto quiero actualizar mi bd, pero cuando cambio
datos no llega a
>actualizarce, que posible error o falta le encuentran
aqui?
>
><%@ Language=VBScript %>
><HTML>
><HEAD>
><META NAME="GENERATOR" Content="Microsoft Visual Studio
6.0">
></HEAD>
><BODY>
><center><IMG height7 src ="images/Dibujo.bmp"
style="HEIGHT: 71px;
>WIDTH: 500px" widths7 ></center>
><%
>
>
>cod=Request.Form("txtcod")
>com=Request.Form("txtapell")
>con=Request.Form("txtnombr")
>cal=Request.Form("txtfechnac")
>cap=Request.Form("txtfechin")
>cat=Request.Form("txtdni")
>cak=Request.Form("txttelf")
>cakt=Request.Form("txtdircc")
>
>Set cn=Server.CreateObject("ADODB.Connection")
>cn.Open "Provider=SQLOLEDB; Server> (local);Database½Empleado;uid=sa"
>sql="Update EMPLEADO set Apellido='" & com & "', Nombre='"
>sql=sql & con & "', Fecha_Nac='" & cal
& "',Fecha_Inicio_Lab='" & cap &
>"',DNI='" & cat & "',Telefono='" & cak & "',Direccion='"
& cakt & "' where
>Codigo=' "
>sql=sql & cod & "'"
>cn.Execute(sql)
>set cn=Nothing
>Response.Redirect("Administrador.asp")
>%>
>
></BODY>
></HTML>
>
>
>
>.
>

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida