Ver Mensaje Individual
  #1 (permalink)  
Antiguo 12/12/2014, 09:23
educito_94
 
Fecha de Ingreso: noviembre-2014
Ubicación: Lima-Peru
Mensajes: 22
Antigüedad: 10 años, 2 meses
Puntos: 0
Pregunta Modificar tabla access con asp

Buenas c:

Tengo esta pag html...mi problema es que esta pag sirve para agregar registros a una BD access lo cual lo hace muy bien pero mi problema es que en vez de agregar quisiera modificar los campos.
Se que en teoria es algo facil pero no entiendo muy bien como seria el codigo .

Código HTML:
 <% 
   If Not Request.QueryString("Message") = "True" Then 
  %> 
     <p> 
    <FORM NAME="GuestBook1" METHOD="GET" ACTION="AgregarBD.asp"> 
     <table> 
       <tr> 
       <td><font face="arial">Titulo:</td><td><INPUT TYPE="TEXT" NAME="tit" size="30"></td> 
       </tr><tr> 
       <td><font face="arial">Descripcion:</td><td><INPUT TYPE="TEXT" NAME="des" size="30"></td> 
       </tr><tr> 
       <td><font face="arial">Coordenada x:</td><td><INPUT TYPE="TEXT" NAME="coorx" size="30"></td> 
       </tr><tr> 
      <td><font face="arial">Coordenada y:</td><td><INPUT TYPE="TEXT" NAME="coory" size="30"></td> 
	   </tr><tr>
   <td><font face="arial">Identificador:</td><td><INPUT TYPE="TEXT" NAME="iden" size="30"></td> 
       </tr> 
     </table> 
    
     </p> 

     <p> 
     <INPUT TYPE="HIDDEN" NAME="Message" VALUE="True"> 
     <INPUT TYPE="SUBMIT" VALUE="Guardar Datos"> 
     </FORM> 
     </p> 

  <% 
   Else 
     dim strTB1, strTB2, strTB3, strTB4, strMB1, strCommand 
     strTB1 = Server.HTMLEncode(Request.QueryString("tit")) 
     strTB2 = Server.HTMLEncode(Request.QueryString("des")) 
     strTB3 = Server.HTMLEncode(Request.QueryString("coorx")) 
     strTB4 = Server.HTMLEncode(Request.QueryString("coory")) 
     strMB1 = Server.HTMLEncode(Request.QueryString("iden")) 
     
  
	if strTB1="" and strTB2="" and strTB3="" and strTB4="" then
		Response.Write("Debe ingresar los datos...")
	Elseif (not isNumeric(StrMB1)) then
		 Response.Write("...")
	else
     strProvider = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Nueva carpeta\PRUEBADB.mdb;"
                     
     Set objConn = server.createobject("ADODB.Connection")  

     objConn.Open strProvider  
	 
     strCommand = "INSERT INTO grabar (titulo, descripcion, coordenadax, coordenaday, identificador) VALUES ('" 
     strCommand = strCommand & strTB1 & "','" & strTB2 & "','" & strTB3 & "','" & strTB4 & "','" & strMB1 
     strCommand = strCommand & "')" 

	 
     objConn.Execute strCommand 

     Response.Write("Datos agregados correctamente.") 
	 end if
	
     End If 
  %> 

	<center>
        <a href="AgregarBD.asp">Agregar otro registro</a> 
        <br><br>
		<a href="index.html">Volver ala página de Inicio</a>
		
		
	</center>
	
  </font> 
  <body> 


  </body> 
  </html> 
Se que seria modificar esto :

Código HTML:
 strCommand = "INSERT INTO grabar (titulo, descripcion, coordenadax, coordenaday, identificador) VALUES ('" 
     strCommand = strCommand & strTB1 & "','" & strTB2 & "','" & strTB3 & "','" & strTB4 & "','" & strMB1 
     strCommand = strCommand & "')" 

	 
     objConn.Execute strCommand 

     Response.Write("Datos agregados correctamente.") 
Pero como seria?
Gracias de antemano.