Bon voila je suis stagiére dans une entreprise et on me demande de creer en asp une newsletter avec le language asp et bd access.
Voila mon pb:
je dois demander nom prenom et email. ca c bon (voir par la suite).
mais la page d'insertion ne marche pas aprés de nombreuses tentatives. est ce quelqu'un pourrait modifier ce qui ne vas pas.
merci
1ere page : formulaire.asp:
<html><body>
<form method="POST" action="enregistrement.asp"name="Saisie">
<div align="center">
<table border="1" cellpadding="10" cellspacing="0" width="50%" bordercolor="#000080">
<tr>
<td width="22%" bgcolor="#CAE4FF"><font face="Arial" size="2">nom</font></td>
<td width="78%"><input type="text" name="nom" size="20"></td>
</tr>
<tr>
<td width="22%" bgcolor="#CAE4FF"><font face="Arial" size="2">prenom</font></td>
<td width="78%"><input type="text" name="prenom" size="30"></td>
</tr>
<tr>
<td width="22%" bgcolor="#CAE4FF"><font face="Arial" size="2">email</font></td>
<td width="78%"><textarea rows="5" name="mail" cols="34"></textarea></td>
</tr>
</table>
<br><br>
<input type="submit" value="Valider" name="action">
</div>
</form>
</body>
</html>
et la seconde page : enregistrement.asp:
<%
fnom=Request.Form("nom")
fprenom=Request.Form("prenom")
femail=Request.Form("email")
%>
DSN_BASE = "DBQ=" & Server.Mappath("Databases\LaPub.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Driverld=25"%>
Set ConnLot = Server.CreateObject("ADODB.Connection")
ConnLot.Open DSN_BASE
Set RsLot = Server.CreateObject("ADODB.Recordset")%>
RequeteSQL = "Insert Into liste (nom, prenom, email) Values (' " & fnom & " ',' " & fprenom & " ',' " & femail & " ')"
RsLot.Open RequeteSQL , ConnLot%>
Set RsLot = Nothing
ConnLot.Close
Set ConnLot = Nothing%>
<HTML>
<body>
<Div align="center">
<Font Face="Arial" Size="2">Merci vous avez bien été ajouté a la bd</B></font>
</Div>
</body>
</html>
ma base de données est dans le repertoire Databases. Elle s'appelle LAPub. Jai une table liste avec 3 champs texte nom prenom email
merci
romain