Insertar campos en una tabla, mediante SQL.
Un ejemplo muy corto en el cuál se hace un INSERT a una tabla llamada "prueba". Se agregan
dos datos. Uno en la columna usuario, y el otro el la columna password. La única linea interesante para
analizar es la que contiene la sentencia SQL, ya que las otras son de conexion a la BD y lectura de datos.
Con oConn.Execute estamos ejecutando la sentecia SQL, que agrega un nuevo registro.
<%
Dim oConn, usuario, password
'capturamos la informacion que viene de algún formulario...
usuario = Request.Form("usuario")
password = Request.Form("password")
'hacemos toda la conexion a la BD.
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\Web\db\base_datos.mdb"
'Hago el INSERT, creando un nuevo registro.
oConn.execute "INSERT INTO prueba(usuario,password) VALUES('"&usuario&"','"&password&"')"
oConn.Close
Set oConn = nothing
%>
|
Esta es la imagen de la base de datos que podria usarse con este código...
|
