Ver Mensaje Individual
  #3 (permalink)  
Antiguo 12/11/2008, 14:24
la_pety0205
 
Fecha de Ingreso: marzo-2008
Mensajes: 49
Antigüedad: 17 años, 1 mes
Puntos: 0
Respuesta: Asp + BD, problemas en la modificacion

Bueno.. aca va el codigo.. No lo quiero hacer muy largo asi que esto viene de un link donde selecciono modificar.

Voy a poner solo algunos de los datos q pido para q no sea tan largo.. Ademas me trae a la mitad todos los campos que tengan un espacio, tanto en el nombre, domicilio, etc que son de tipo texto.

Código:
<%Set cone = server.createobject("adodb.connection")
tipo="DRIVER={Microsoft Access Driver (*.mdb)}; "
camino="DBQ=" & server.mappath("rioja.mdb")
base = tipo & camino 
cone.Open base %>

<%SQL = "SELECT * FROM alumnos WHERE Alum_Codi=" & Request.QueryString("Id")  %>
<%  Set alumnos = cone.Execute(SQL) %>

<%
Alum_Nomb=alumnos("Alum_Nomb") 
Alum_NuLe=alumnos("Alum_NuLe")
Alum_Docu=alumnos("Alum_Docu")
Alum_Domi=alumnos("Alum_Domi")
etc...
etc...
%>

<html>
<head><title>Modificacion de Datos</title></head>
<body>
<form method="post" action="modimdb.asp">
   Nombre: <input type="text" name="Alum_Nomb" value=<%= Alum_Nomb %>>
   Legajo: <input type="text" name="Alum_NuLe" value=<% =Alum_NuLe%>>
   Documento: <input type="text" name="Alum_Docu" value=<% =Alum_Docu%>>
   Domicilio: <input type="text" name="Alum_Domi" value=<% =Alum_Domi%>>  
   etc-... 
  etc.....
  <input type="submit" name="Submit" value="Enviar">
</form>
</body>
</html>


modimdb.asp

Código:
<% 
Set cone = server.createobject("adodb.connection")
tipo="DRIVER={Microsoft Access Driver (*.mdb)}; "
camino="DBQ=" & server.mappath("rioja.mdb")
base = tipo & camino 
cone.Open base %>

<% 
 Alum_Nomb=request("Alum_Nomb")
Alum_NuLe=request("Alum_NuLe")
Alum_Docu=request("Alum_Docu")
Alum_Domi=request("Alum_Domi")
etc..
etc..
%>


<% modi = "UPDATE alumnos SET Alum_Nomb='" & Alum_Nomb& "', Alum_NuLe='" & Alum_NuLe& "', Alum_Docu='" & Alum_Docu & "', Alum_Domi ='" &Alum_Domi & "', Alum_Tele ='" & Alum_Tele & "', Alum_FeNa='" & Alum_FeNa & "', Alum_Sexo ='" & Alum_Sexo & "', Alum_Mail='" &Alum_Mail & "', Carr_Codi='" & Carr_Codi & "', Loca_Codi='" & Loca_Codi  & "', Cole_Codi='" & Cole_Codi  & "', Alum_AdMa='" &   Alum_AdMa & "', Alum_Ana='" & Alum_Ana & "' WHERE Alum_Nomb='" & Alum_Nomb & "'"%>
 
  <%cone.execute(modi)%>

Bueno, ahi esta el codigo... Gracias sjam7