este es el codigo q os dije antes:
el codigo de nube.asp es este:
<script language="javascript">
function guardarcambios()
{
if (document.datos.dia.value=="")
{alert("ERROR: Debe rellenar el día/Sartu eguna")}
else
{
document.datos.action="nube.asp"
document.datos.submit()
}
}
function aviso()
{
if (confirm("AVISO: El menú para ese día ya existe/Egun hori existitzen da"))
{
document.datos.action="actualizar.asp"
document.datos.submit()
}
}
function modificar()
{
window.location="manten.asp"
}
function borrartabla()
{
alert("AVISO: Eliminados todos los menus/Menu guztiak ezabatuta")
window.location="ezabatu.asp"
}
</script>
<script language="JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->
</script>
</head>
<body>
<%
Session("situacion")="nube.asp"
mes2 = request.querystring ("me")
anio2 = request.querystring ("ano")
hila2 = request.querystring ("hi")
%>
<table>
<tr><td>
<form name="datos" method="post" action="">
<table width="589">
<tr align="center">
<td width="579"><b>Dia/Eguna</b>
<input type="text" name="dia" value="<%=request.form("dia")%>" size="20"> <b>/</b>
<input type="text" name="eguna" value="<%=request.form("eguna")%>" size="20"></td>
</tr>
<tr align="center">
<td width="579"><b>Mes/Hila</b>
<input type="text" name="mesano" value="<%=mes2%><%= + " " & anio2%>" size="20"> <b>/</b>
<input type="text" name="hilano" value="<%=hila2%><%= + " " & anio2%>" size="20"></td>
</tr>
<tr align="center">
<td width="579"><b>Primer Plato/Lehenengo Platerra</b>
<input type="text" name="primero" value="<%=request.form("primero")%>" size="20"> <b>/</b>
<input type="text" name="lehen" value="<%=request.form("lehen")%>" size="20"></td>
</tr>
<tr align="center">
<td width="579"><b>Segundo Plato/Bigarren Platerra</b>
<input type="text" name="segundo" value="<%=request.form("segundo")%>" size="20"> <b></b>
<input type="text" name="bigarren" value="<%=request.form("bigarren")%>" size="20"></td>
</tr>
<tr align="center">
<td width="579"><b>Postre/Postrea</b>
<input type="text" name="postre" value="<%=request.form("postre")%>" size="20"> <b>/</b>
<input type="text" name="postrea" value="<%=request.form("postrea")%>" size="20"></td>
</tr>
<tr align="center">
<td width="579"><b>Calorias/Kaloriak</b>
<input type="text" name="calorias" value="<%=request.form("calorias")%>" size="20"></td>
</tr>
<tr align="center">
<td width="579"><b>Proteínas/Proteinak</b>
<input type="text" name="proteinas" value="<%=request.form("proteinas")%>" size="20"></td>
</tr>
<tr align="center">
<td width="579"><b>Lípidos/Lipidoak</b>
<input type="text" name="lipidos" value="<%=request.form("lipidos")%>" size="20"></td>
</tr>
<tr align="center">
<td width="579"><b>Hidratos/Hidratoak</b>
<input type="text" name="hidratos" value="<%=request.form("hidratos")%>" size="20"></td>
</tr>
<tr align="center">
<td colspan=2 width="579"> <!--583-->
<center><table>
<tr align="center">
<td><input type="reset" value="GUARDAR/GORDE" onclick="guardarcambios()"></td>
<td><input type="button" value="MODIFICAR/ALDATU" onclick="modificar()"></td>
<td><input type="reset" value="BORRAR/EZABATU"></td>
</tr>
<tr align="center">
<td colspan=3><center>
<input type="button" value="BORRAR TODOS LOS MENUS/EZABATU MENU GUZTIAK" onclick="borrartabla()">
</center></td>
</tr>
</table></center>
</td>
</tr>
</table>
</form>
</td>
<td valign="middle">
<!--#include file="calendario.asp"-->
</td>
</table>
<%
'****** GUARDAR DATOS ***********************************
if request.form("dia")<>"" then
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "alkartu"
'*** Recogida de los datos
dia=lcase(request.form("dia"))
mes=lcase(request.form("mes"))
primero=lcase(request.form("primero"))
segundo=lcase(request.form("segundo"))
postre=lcase(request.form("postre"))
calorias=lcase(request.form("calorias"))
proteinas=lcase(request.form("proteinas"))
lipidos=lcase(request.form("lipidos"))
hidratos=lcase(request.form("hidratos"))
eguna=lcase(request.form("eguna"))
hila=lcase(request.form("hila"))
lehen=lcase(request.form("lehen"))
bigarren=lcase(request.form("bigarren"))
postrea=lcase(request.form("postrea"))
kalorias=calorias
proteinak=proteinas
lipidoak=lipidos
hidratoak=hidratos
'**** Comprobación de que no exista en la bd el dia repetido
set rs0=Server.CreateObject("ADODB.RecordSet")
sql0="Select * from menu where dia='"&dia&"'"
rs0.open sql0,conn,&H0001,3
set rs1=Server.CreateObject("ADODB.RecordSet")
if rs0.recordcount>0 then
'** Existe el registro
response.write("<script lenguaje='javascript'>aviso()</script>")
else
SQL="Insert Into menu (dia,mes,primero,segundo,postre,calorias,proteinas ,lipidos,hidratos) values ('" & dia & "','"& mes & "','" & primero & "','" & segundo &"','" & postre & "','" & calorias & "','" & proteinas & "','" & lipidos & "','" & hidratos & "')"
set RS = Conn.Execute(SQL)
SQL2="Insert into menu (dia,mes,primero,segundo,postre,calorias,proteinas ,lipidos,hidratos) values ('" & eguna & "','"& hila & "','" & lehen & "','" & bigarren &"','" & postrea & "','" & calorias & "','" & proteinas & "','" & lipidos & "','" & hidratos & "')"
set RS = Conn.execute(SQL2)
'**** Limpieza de todos los campos (no cogía la función reset -de ahi q se haga asi-)
response.write("<script lenguaje='javascript'>document.datos.dia.value=''; </script>")
response.write("<script lenguaje='javascript'>document.datos.eguna.value=' ';</script>")
response.write("<script lenguaje='javascript'>document.datos.mes.value=''; </script>")
response.write("<script lenguaje='javascript'>document.datos.hila.value='' ;</script>")
response.write("<script lenguaje='javascript'>document.datos.primero.value ='';</script>")
response.write("<script lenguaje='javascript'>document.datos.lehen.value=' ';</script>")
response.write("<script lenguaje='javascript'>document.datos.segundo.value ='';</script>")
response.write("<script lenguaje='javascript'>document.datos.bigarren.valu e='';</script>")
response.write("<script lenguaje='javascript'>document.datos.postre.value= '';</script>")
response.write("<script lenguaje='javascript'>document.datos.postrea.value ='';</script>")
response.write("<script lenguaje='javascript'>document.datos.calorias.valu e='';</script>")
response.write("<script lenguaje='javascript'>document.datos.proteinas.val ue='';</script>")
response.write("<script lenguaje='javascript'>document.datos.lipidos.value ='';</script>")
response.write("<script lenguaje='javascript'>document.datos.hidratos.valu e='';</script>")
response.write("<script lenguaje='javascript'>alert('Menu Guardado/Menu gordetua')</script>")
end if
Conn.close
end if
%>
<a href="../cast/comedor1.asp">SALIR AL MENU</a><B>/</B><a href="../eusk/jantoki1.asp">IRTEN MENURA</a>
Muchas gracias. Por cierto, q me recomendais un manual de alguna web o comprarme un libro de asp.