Insertar valores de formulario a tabla

[Jose1250]

HOla he creado un fichero con extensión .asp conectado a una base de datos el código es:
<%
Option Explicit
Response.Expires = -1000

Dim oConn
Dim oRS
Dim sSQL
Dim sColor

Response.Write("<font size=2 face=arial>")

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\jmcweb\db\EjemploBD.mdb&quot ;))

sSQL = "SELECT * FROM Fichas"
Set oRS = oConn.Execute(sSQL)

Response.Write("<table border=1 cellpadding=1 cellspacing=1 style='font-family:arial; font-size:10pt;'>")
Response.Write("<tr bgcolor=black style='color:white;'><td>DNI</td>")
Response.Write("<td>Nombre</td>")
Response.Write("<td>Apellidos</td>")
Response.Write("<td>Direccion</td>")
Response.Write("<td>Telefono</td></tr>")

sColor = "white"

Do While NOT oRS.EOF

If sColor = "silver" Then
sColor = "white"
Else
sColor = "silver"
End If

Response.Write("<tr bgcolor='" & sColor & "'>")
Response.Write("<td>" & oRS("DNI").Value & "</td>")
Response.Write("<td>" & oRS("Nombre").Value & "</td>")
Response.Write("<td>" & oRS("Apellidos").Value & "</td>")
Response.Write("<td align=right>" & oRS("Direccion").Value & "</td>")

Response.Write("<td>" & oRS("Telefono").Value & "</td></tr>")

oRS.MoveNext

Loop

Response.Write("</table><br><br>")

oConn.Close
Set oRS = Nothing
Set oConn = Nothing

%>
Por otro lado tengo el formulario donde el usuario introduce los datos. Lo que quiero saber es como puede darle la orden al formulario para que los datos vayan a la tabla de la base de datos.
El código que he escrito hasta el momento en el formulario es:
Ob_RS.AddNew ()
Ob_RS ("DNI")= parseInt (Request.Form("DNI"))
Ob_RS ("Nombre")= Request.Form("NOMBRE")
Ob_RS ("Apellidos")= Request.Form("APELLIDOS")
Ob_RS ("Dirección") = Request.Form("DIRECCION")
Ob_RS ("Teléfono")= Request.Form("TELEFONO")
Ob_RS.Update()
Ob_RS.Close()
Ob_Conn.Close()
Response.Write ("<H3>Datos insertados<H3>")

}
else
{ %>

<H3> ESCRIBA SUS DATOS PERSONALES </H3> <BR>
<FORM METHOD="Post" ACTION="EjBD2.asp">
DNI: <INPUT NAME="DNI" SIZE=10> <BR>
NOMBRE: <INPUT NAME="Nombre" SIZE=15> <BR>
APELLIDOS: <INPUT NAME="Apellidos" SIZE=30> <BR>
DIRECCION: <INPUT NAME="Direccion" SIZE=30> <BR>
TELEFONO: <INPUT NAME="Telefono" SIZE=15> <BR>
<INPUT TYPE="Submit" VALUE="Enviar datos">
<INPUT TYPE="Reset" VALUE="Borrar">
</FORM>
<% } %>
</BODY>
</HTML>
gracias.

[Melissa]

Yo no lo harí así (ES MI OPINIÓN), lo que haría es lo siguiente:
1. Hay que recoger la información que el usuario ha introducido en cada uno de los campos del formulario (no se si eso ya lo habrás tenido en cuenta)
2. Comprobaría que me ha introducido información en todos los campos, porque sino, si son requeridos te va a cascar por un error.
3. Lo haría con un Insert, ¿conoces la instrucción?, pues es muy facil:

Código:

 Insert into nombre_de_la_tabla (campo1, campo2, campo3, ..., campon) values ('"&valor2&"', '"&valor2&"', '"&valor3&"', ..., '"&valorn&"')

y ahora ejecutas la instrucción

Espero haberme explicado, si te queda alguna duda, no dudes en preguntar