Pouvoir remplir une base de données
Pouvoir remplir une base de données - ASP - Programmation
Sujets relatifs:
- [SQL Server] Listes des tables d'une base
- Faire apparaître des données Access sur une page HTML (via php ?)
- Base SQL, performantes jusqu'ou?
- INSERT INTO -> SELECT sur deux base distinct, possible ?
- [VB NET] Comment accéder à une base de donnée?
- Page d'accés aux données Access / Web
- Base de registre
- [MySQL] Utiliser une base MySQL sur un ordinateur n'ayant pas MySQL ?
- transmettre base de données MySQL
Marsh Posté le 02-02-2006 à 13:54:02
Bonjour,
J'aimerais pouvoir insérer des données dans ma base de données grace à un formulaire.
Je vous mets le code que j'ai fait, et j'aimerais que quelqu'un me dise ce que je dois changer.
Ma base de données se nomme Voyage, et la table dans laquelle je veux écrire mes données se nomme Client, avec pour champs : NumClient, Nom, Adresse et NumVoyage.
Merci d'avance.
Helmut.
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Avec Deux Listes dans un même formulaire</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection" )
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" & " DBQ=" & server.MapPath("." ) & "/database/voyage.mdb"
Set RS = Server.CreateObject("ADODB.Recordset" )
if request.form("Nom" )<>"" then
SQL = "SELECT * FROM Client "
RS.Open SQL,Conn,3,3
RS.addnew
RS("NumClient" ) = request.form("NumClient" )
RS("Nom" ) = request.form("Nom" )
RS("Adresse" ) = request.form("Adresse" )
RS("NumVoyage" ) = request.form("NumVoyage" )
RS.update
RS.close
end if
%>
<table>
<form method="post" action="dernier.asp" border="2">
<tr>
<td align=right>NumClient</td><td>
<input name="NumClient" maxlength=15>
</td>
</tr><tr>
<td align=right>Nom</td><td>
<input name="Nom" maxlength=50>
</td>
</tr>
<tr>
<td align=right>Adresse</td><td>
<input name="Adresse" maxlength=50>
</td>
</tr>
<tr>
<td align=right>NumVoyage</td><td>
<input name="NumVoyage" maxlength=50>
</td>
</tr>
<tr>
<td colspan=2 align=center>
<input type="submit" value="Envoyer">
</td>
</tr>
</form>
</table>
<%
Conn.close
Set Conn = nothing
Set RS = nothing
%>
</body>
</html>