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 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71
| <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head>
<title>Mise à jour des sites web</title>
</head>
<script language="Javascript">
function makeRemote() {
remote = window.open("","remotewin","width=350,height=400");
remote.location.href = "http://webreference.com/javascript/970106/remote.html";
if (remote.opener == null) remote.opener = window;
remote.opener.name = "opener";
}
</script>
<script>
function twFermer() {
window.close();
}
</script>
<script>
function Changechoixajout(){
document.formulaire.choix.value=2;
document.formulaire.submit();
twFermer();
}
</script>
<script>
function Changechoixsuppression(){
document.formulaire.choix.value=1;
document.formulaire.submit();
twFermer();
}
</script>
<body>
<form method="get" name="formulaire" TARGET="opener" action="session_web.asp">
<strong>Sélection de l'id_source : </strong>
<%
set cn=server.CreateObject("adodb.connection")
set rs=server.CreateObject("adodb.recordset")
cn.Open connstring2
rs.open "select source.id_source " &_
"from source " &_
"where source.id_langue = ('fra') and source.id_source_media = 1",cn
Response.Write ("Id_source : <select name=source>")
Response.Write ("<option></option>")
do while not rs.eof
Response.Write ("<option value=" & rs("id_source") & ">" & rs("id_source") & "</option>")
rs.movenext
loop
Response.Write("</select>")
source = Request("source")
%>
<input type="hidden" name="choix" value=''>
<input type="submit" name="action" onclick='Changechoixsuppression();' value="Supprimer" style="WIDTH: 102px; HEIGHT: 24px" size="32">
<input type="submit" name="action" onclick='Changechoixajout();' value="Ajouter" style="WIDTH: 102px; HEIGHT: 24px" size="32">
</form>
</body>
</html> |