1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
| <html>
<head>
</head>
<body>
<INPUT type="text" name="nom">
<form action="es.asp" method="post" name="ma_page" >
<INPUT type="submit" name="nom" value="Envoyer">
</body>
<%
dim nom
nom = Request.form("nom")
<!-- #include file="connexion.asp"-->
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:\ma_base.mdb;"
sql = "select * from T_utilisateurs"
Set RS = server.createobject("ADODB.Recordset")
RS.Open SQL,Conn , 3, 3
RS.addnew
RS("Utilisateur")=Request.form("nom")
RS.update
conn.close
set conn=nothing
%>
</html> |
Partager