Ver Mensaje Individual
  #1 (permalink)  
Antiguo 03/03/2006, 07:46
javihb
 
Fecha de Ingreso: octubre-2004
Mensajes: 230
Antigüedad: 20 años, 5 meses
Puntos: 0
Actualización de registros

Hola amigos vereis, tengo un problemilla a la hora de actualizar unos registros que estan en una base de datos Fox Pro, el problema viene cuando copio y pego en el textarea lo que quiere actualizar ya que si lo que pego es un sola linea me lo acepta pero cuando se compone de varias lineas no me hace nada, el la base de datos tengo ese campo como memo en una db y como char de 400 en otra pero nada....me esta volviendo loco a ver si me podeis decir algo.....se me olvidaba es con ASP y otra cosa el textarea cuantos caracteres soporta????
El codigo del textarea es este
Código:
<textarea name="temario" cols="40" rows="4" wrap="OFF"><%=trim(adrecord.fields("reqcur").value)%></textarea>
este es el input de envio el cual llama a una funcion
Código:
<input name="Submit" type="submit" class="input_verde" value="Enviar" onClick="CloseRefreshWindow()">
Código:
function CloseRefreshWindow() {
 location="relacioncursos.asp";
 window.opener.location.reload();
 self.close();
}
que lo que hace es actualizar la pagina y cerrar el popup donde hago las actualizaciones

y este es el codigo de la pagina que hace el update
Código:
<% 
   Response.Buffer = True 
   Dim oConn,strSQL 
   Set oConn = Server.CreateObject("ADODB.Connection") 
   oConn.Open("Driver={Microsoft Visual FoxPro Driver};UID=;PWD=;SourceDB="+server.mappath("mi_ruta")+";SourceType=DBC;Exclusive=No;BackgroundFetch=Sí;Collate=Machine;Null=Sí;Deleted=Sí;")  
   strSQL = "UPDATE mibased!cursos SET nomcur = '" & Request.form("nombre") & "',nhorcur = '" & Request.form("horario") & "',finicur = '" & Request.form("inicio") & "',ffincur = '" & Request.form("fin") & "',horacur = '" & Request.form("horas") & "',reqcur = '" & Request.form("temario") & "',tipcur = '" & Request.form("tipo") & "',precur = '" & Request.form("precio") & "',numero = '" & Request.form("numero") & "',notas = '" & Request.form("notas") & "',baja = '" & Request.form("estado") & "',activ = '" & Request.form("activo") & "' WHERE numcur = '" & Request.form("id") & "'"
   oConn.Execute(strSQL) 
   oConn.Close 
   set oConn = nothing
   Response.Redirect("relacioncursos.asp")  
%>