Foros del Web » Programando para Internet » ASP Clásico »

Urgente!! calendario y bd access

Estas en el tema de Urgente!! calendario y bd access en el foro de ASP Clásico en Foros del Web. Tengo 2 paginas asp (manten.asp y calendario.asp). En manten.asp actualizo una bd (añado, quito,...) y a la hora de presentarlas en el explorer salen las ...
  #1 (permalink)  
Antiguo 31/03/2004, 12:16
Avatar de DkarnDuuk  
Fecha de Ingreso: marzo-2004
Mensajes: 626
Antigüedad: 20 años, 2 meses
Puntos: 2
Urgente!! calendario y bd access

Tengo 2 paginas asp (manten.asp y calendario.asp). En manten.asp actualizo una bd (añado, quito,...) y a la hora de presentarlas en el explorer salen las dos juntas, para eso en manten.asp tengo lo siguiente:

<!--#include file="calendario.asp"-->

lo q quiero es q al pinchar sobre un dia del mes, salgan en manten.asp los registros de la tabla de ese dia. (Con saber como coger el dia pinchado me vale) .
El codigo de calendario.asp no lo he hecho yo y como soy un poco novato no se hacerlo (¡¡tiene q estar para antes de semana santa!!) . El calendario esta dentro de un form con dos campos para seleccionar año o mes. Cuando alguna cambia, cambia el calendario. El codigo del calendario es:

Siento q sea un tocho

<SCRIPT LANGUAGE="JavaScript">

var dDate = new Date();
var dCurMonth = dDate.getMonth();
var dCurDayOfMonth = dDate.getDate();
var dCurYear = dDate.getFullYear();
var objPrevElement = new Object();

function fToggleColor(myElement)
{
lo q sea
}

function fSetSelectedDay(myElement)
{
if (myElement.id == "calCell")
{
if (!isNaN(parseInt(myElement.children["calDateText"].innerText)))
{
myElement.bgColor = "#c0c0c0";
objPrevElement.bgColor = "";
document.all.calSelectedDate.value = parseInt(myElement.children["calDateText"].innerText);
objPrevElement = myElement;
}
}
}

function fGetDaysInMonth(iMonth, iYear)
{
var dPrevDate = new Date(iYear, iMonth, 0);
return dPrevDate.getDate();
}

function fBuildCal(iYear, iMonth, iDayStyle)
{
var aMonth = new Array();
aMonth[0] = new Array(7);
. . .
aMonth[6] = new Array(7);
var dCalDate = new Date(iYear, iMonth-1, 1);
var iDayOfFirst = dCalDate.getDay();
var iDaysInMonth = fGetDaysInMonth(iMonth, iYear);
var iVarDate = 1;
var i, d, w;
if (iDayStyle == 2)
{
aMonth[0][0] = "Domingo";
. . aMonth[0][6] = "Sabado"; }
else
if (iDayStyle == 1)
{
aMonth[0][0] = "D";
. . aMonth[0][6] = "S"; }
else
{
aMonth[0][0] = "Do";
. . aMonth[0][6] = "Sa";
}
for (d = iDayOfFirst; d < 7; d++)
{
aMonth[1][d] = iVarDate;
iVarDate++;
}
for (w = 2; w < 7; w++)
{
for (d = 0; d < 7; d++)
{
if (iVarDate <= iDaysInMonth)
{
aMonth[w][d] = iVarDate;
iVarDate++;
}
}
}
return aMonth;
}

function fDrawCal(iYear, iMonth, iCellWidth, iCellHeight, sDateTextSize, sDateTextWeight, iDayStyle)
{
var myMonth;
myMonth = fBuildCal(iYear, iMonth, iDayStyle);
document.write("<table border='1' bgcolor='#9989B9'>")
document.write("<tr><td>")
document.write("<table border='0' bgcolor='#FFFFFF'>")
document.write("<tr class='mes' bgcolor='#A8DE59'>");
document.write("<td align='center' >" + myMonth[0][0] + "</td>");
........................
document.write("<td align='center' >" + myMonth[0][6] + "</td>");
document.write("</tr>");
for (w = 1; w < 7; w++)
{
document.write("<tr class='dias' >")
for (d = 0; d < 7; d++)
{
document.write("<td align='center' valign='top' width='" + iCellWidth + "' id=calCell style='CURSOR:Hand' onMouseOver='fToggleColor(this)' onMouseOut='fToggleColor(this)' onclick=fSetSelectedDay(this)>");
if (!isNaN(myMonth[w][d]))
{document.write("<font id=calDateText onMouseOver='fToggleColor(this)' style='CURSOR:Hand;FONT-FAMILY:Arial;FONT-SIZE:" + sDateTextSize + ";FONT-WEIGHT:" + sDateTextWeight + "' onMouseOut='fToggleColor(this)' onclick=fSetSelectedDay(this)>" + myMonth[w][d] + "</font>");}
else
{document.write("<font id=calDateText onMouseOver='fToggleColor(this)' style='CURSOR:Hand;FONT-FAMILY:Arial;FONT-SIZE:" + sDateTextSize + ";FONT-WEIGHT:" + sDateTextWeight + "' onMouseOut='fToggleColor(this)' onclick=fSetSelectedDay(this)> </font>");}
document.write("</td>")
}
document.write("</tr>");
}
document.write("</table>")
document.write("</td></tr>")
document.write("</table>")
}
function fUpdateCal(iYear, iMonth)
{
myMonth = fBuildCal(iYear, iMonth);
objPrevElement.bgColor = "";
document.all.calSelectedDate.value = "";
for (w = 1; w < 7; w++)
{
for (d = 0; d < 7; d++)
{
if (!isNaN(myMonth[w][d]))
{calDateText[((7*w)+d)-7].innerText = myMonth[w][d];}
else
{calDateText[((7*w)+d)-7].innerText = " ";}
}
}
}
</script>

<link rel="stylesheet" href="estilos.css" type="text/css">
</HEAD>
<BODY>


<script language="JavaScript" for=window event=onload>
var dCurDate = new Date();
frmCalendarSample.tbSelMonth.options[dCurDate.getMonth()].selected = true;
for (i = 0; i < frmCalendarSample.tbSelYear.length; i++)
if (frmCalendarSample.tbSelYear.options[i].value == dCurDate.getFullYear())
frmCalendarSample.tbSelYear.options[i].selected = true;
</script>

<form name="frmCalendarSample" method="post" action="">
<input type="hidden" name="calSelectedDate" value="">

<table>
<tr>
<td >
<select name="tbSelMonth" onchange='fUpdateCal(frmCalendarSample.tbSelYear.v alue, frmCalendarSample.tbSelMonth.value)'>
<option value="1">Enero</option>
. . . .
<option value="12">Diciembre</option>
</select>

<select name="tbSelYear" onchange='fUpdateCal(frmCalendarSample.tbSelYear.v alue, frmCalendarSample.tbSelMonth.value)'>
<option value="2003">2003</option>
. . . .
<option value="20010">2010</option>
</select>
</td>
</tr>
<tr>
<td >
<script language="JavaScript">
var dCurDate = new Date();
fDrawCal(dCurDate.getFullYear(), dCurDate.getMonth()+1, 30, 30, "12px", "bold", 1);
</script>
&nbsp;</td>
</tr>
</table>

</form>
  #2 (permalink)  
Antiguo 31/03/2004, 16:05
Avatar de deccweb  
Fecha de Ingreso: febrero-2003
Ubicación: Mataro
Mensajes: 365
Antigüedad: 21 años, 3 meses
Puntos: 0
cuando lo tengas lo pones aqui, yo hace mucho tiempo q lo busco, gracias a todos
__________________
Calle17.net

edgargranados.es
  #3 (permalink)  
Antiguo 31/03/2004, 17:10
 
Fecha de Ingreso: febrero-2004
Mensajes: 23
Antigüedad: 20 años, 4 meses
Puntos: 0
que honda, es muy facil ya casi tienes todo, como solo pusiste el codigo del una pagina pues no te puedo ayudar mucho pero mas o menos te puedo explicar, al hacer click sobre, sobre el dia del combo(ya ques estas manejando combos con jscript por lo que vi en tu codigo), el valor lo atrapas con el siguiente codigo, de hehco este codigo te servira paralevantar los registros del dia, al menos yo asi lo hago,

<font face="Verdana" size="1">Filtros&nbsp;
<SELECT NAME="menu" SIZE=1 onChange ="irA(this)">
<OPTION VALUE="">Escoja 1 Filtro
<OPTION VALUE="pagina.asp?id=dia">dia de la semana
</select> </font>

en dia va al valor del dia
la funcion jscript es esta
<SCRIPT LANGUAGE="JavaScript">
function irA(menu){
window.location.href = menu.options[menu.selectedIndex].value;
}
<script>

, se pasas como paremetro el valor del dia que escojas asi ya tienes el dia y puedes hacer tu consulta con la base de datos,
el mes y el años ya los tienes en codigo porlo que no hay problem,,,
sale,,
suerte espeor y me haya explicado
  #4 (permalink)  
Antiguo 31/03/2004, 17:19
 
Fecha de Ingreso: febrero-2004
Mensajes: 23
Antigüedad: 20 años, 4 meses
Puntos: 0
es mas te paso un codigo que hize en mis inicios de algo parecido alo que pides tu, es solo para que te des una idea de como hacerle a tu programa sale, el codigo tal vez no es lo as adecuado ya que tienes mucho codigod e mas epero espero te sirva sale
fd=request.querystring("fd")
if fd<>"" then
Set rsca = db.Execute("delete * from tbl_resumen WHERE fecha='"&fd&"'")
end if
sfecha=request.querystring("sfecha")
if sfecha="" then
strsql = ("SELECT * FROM tbl_resumen")
else
strsql = ( "SELECT * FROM tbl_resumen where fecha='"&sfecha&"'")
end if
set lfecha =db.execute( "SELECT fecha FROM tbl_resumen")

dia=day(date)
mes=month(date)
an =year(date)
hora=hour(time)
minuto=minute(time)
lar=len(minuto)
if lar=1 then
minuto="0"&minuto
end if
tiempo=hora&":"&minuto
fecha=dia&"/"&mes&"/"&an
fecha=fecha&" "&tiempo

Dim mostrar 'cantidad de registros a mostrar por página
Dim cant_paginas 'cantidad de páginas que recibimos
Dim pagina_actual 'La página que mostramos
Dim registro_mostrado 'Contador utilizado para mostrar las páginas
Dim I 'Variable Loop
mostrar = 30 ' cantidad de registros por página
num_registros = 30 'numero de registros
' IF para saber que página mostrar
If Request.QueryString("page") = "" Then
pagina_actual = 1
Else
pagina_actual = CInt(Request.QueryString("page"))
End If
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strsql, strConn,3,1

rs.PageSize = mostrar
rs.CacheSize = mostrar

%>
<html>
<head>
<title>Resumen</title>
<SCRIPT LANGUAGE="JavaScript">
function irA(menu){
window.location.href = menu.options[menu.selectedIndex].value;
}
</SCRIPT>

</head>
<%header

cant_paginas = rs.PageCount
cant_reg=rs.recordcount

%>
<body>
<hr color="#E4E4E4" size="1">
<table width=99% bgcolor="#E5E5E5" style="border-collapse: collapse" bordercolor="#111111" cellpadding="0" height="20">
<td width="32%" height="27"><font size="2" face="Verdana"></font></td>
<td width="60%" height="20" align="center" ><font face=Verdana size=2><a href="rescliente.asp">Todos</a>&nbsp;&nbsp;&nbsp;
<b><font face="Verdana" size="1">
<SELECT NAME="menu2" SIZE=1 onChange ="irA(this)">
<OPTION VALUE="">Fecha
<% while not lfecha.eof
'Dim MiFecha
'MiFecha = FormatDateTime( Date, 2)
%>
<OPTION VALUE="rescliente.asp?sfecha=<%=lfecha("fecha")%>" ><%=lfecha("fecha")%>
<%
lfecha.movenext
wend
%> </select> </font></td>
</table>
<br>
<table width="100%">
<td width="60%">
<p align="right"> <b> <font face="Verdana" size="2">Resumen de usuarios xxxxx -
Registrados en BD</font></b></td>
<td width="40%">
<p align="right">&nbsp;<font size="1" face="Verdana">
<%
If pagina_actual > 1 Then
%>
<a href="rescliente.asp?page=<%= pagina_actual - 1 %>">[<< Anterior]</a>
<%
end if
For I = 1 To cant_paginas
If I = pagina_actual Then

if cant_paginas<2 then
else
%>
&nbsp;<font size="1" face="Verdana"><%= I %>
<%
end if
Else
if f1="" then
f1=3
end if
%><font size="1" face="Verdana"> <a href="rescliente.asp?page=<%= I %>"><%= I %></a>
<%
End If
Next 'I
If pagina_actual < cant_paginas Then

%> <font size="1" face="Verdana"><a href="rescliente.asp?page=<%= pagina_actual + 1 %>">[Próximo >>]</a>
<% end if%>
</td>
<table>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#FFFFFF" width="101%" id="AutoNumber1">
<tr>
<td width="14%" bgcolor="#C0C0C0" align="center" height="20"><font face="Verdana" size="2">
Fecha</font></td>
<td width="9%" bgcolor="#C0C0C0" align="center"><font face="Verdana" size="2">Inscritos</font></td>
<td width="10%" bgcolor="#C0C0C0" align="center">
<font face="Verdana" size="2">S/Movimiento</font></td>
<td width="16%" bgcolor="#C0C0C0" align="center"><font face="Verdana" size="2">Solicitado Envío</font></td>
<td width="15%" bgcolor="#C0C0C0" align="center"><font face="Verdana" size="2">Solicitado Download</font></td>
<td width="14%" bgcolor="#C0C0C0" align="center"><font face="Verdana" size="2">Descargado</font></td>
<td width="15%" bgcolor="#C0C0C0" align="center"><font face="Verdana" size="2">Sin Descargar</font></td>
<td width="15%" bgcolor="#C0C0C0" align="center">&nbsp;</td>
</tr>

<%
' Si el pedido de página cae afuera del rango,
' lo modificamos para que caiga adentro
If pagina_actual > cant_paginas Then pagina_actual = cant_paginas
If pagina_actual < 1 Then pagina_actual = 1

' Si la cantidad de páginas da 0 es que no hay registros... por eso este IF
If cant_paginas = 0 Then
Response.Write ("<font size=1 face=Verdana>No hay registros...")
Else
' Nos movemos a la página elegida
rs.AbsolutePage = pagina_actual
' Mostramos el dato de que página estamos...
num_campos=rs.Fields.Count
registros_mostrados = 0
While (Not rs.eof And registros_mostrados < num_registros)
registros_mostrados = registros_mostrados +1
fecha=rs("fecha")
d=day(fecha)
if len(d)=1 then
d="0"&d
end if
m=month(fecha)
if len(m)= 1 then
m="0"&m
end if
y=year(fecha)
h=hour(fecha)
if len(h)=1 then
h="0"&h
end if
mm=minute(fecha)
if len(mm) = 1 then
mm="0"&mm
end if
fecha=d&"/"&m&"/"&y&" "&h&":"&mm

%>
<tr>
<td width="14%" align="center" bgcolor="#E5E5E5"><font face="Verdana" size="1"><%=fecha%>&nbsp;</td>
<td width="9%" align="center" bgcolor="#E5E5E5"><font face="Verdana" size="2"><%=rs("inscritos")%>&nbsp;</td>
<td width="10%" align="center" bgcolor="#E5E5E5"><font face="Verdana" size="2"><%=rs("sin_movimiento")%>&nbsp;</td>
<td width="16%" align="center" bgcolor="#E5E5E5"><font face="Verdana" size="2"><%=rs("sol_enviado")%>&nbsp;</td>
<td width="15%" align="center" bgcolor="#E5E5E5"><font face="Verdana" size="2"><%=rs("sol_descargado")%>&nbsp;</td>
<td width="14%" align="center" bgcolor="#E5E5E5"><font face="Verdana" size="2"><%=rs("descargado")%>&nbsp;</td>
<td width="15%" align="center" bgcolor="#E5E5E5"><font face="Verdana" size="2"><%=rs("sin_descargar")%>&nbsp;</td>
<form method="POST" action="rescliente.asp?fd=<%=rs("fecha")%>">
<td width="15%" align="center" bgcolor="#E5E5E5">
<input type="submit" value="Borrar" name="B1" style="font-family: v; font-size: 8pt">
</td>
</form>
</tr>
<%
rs.movenext
wend%>
</table>
<%
If pagina_actual > 1 Then
if f1="" then
f1=3
end if
%>
&nbsp;&nbsp;&nbsp;<font size="1" face="Verdana"><a href="rscliente.asp?page=<%= pagina_actual - 1 %>">[<< Anterior]</a>
<%
End If

' mostramos la paginacion por numeros de página
For I = 1 To cant_paginas
If I = pagina_actual Then

if cant_paginas<2 then
else
%>
&nbsp;<font size="1" face="Verdana"><%= I %>
<%
end if
Else
if f1="" then
f1=3
end if
%>
<font size="1" face="Verdana"><a href="rescliente.asp?page=<%= I %>"><%= I %></a>
<%
End If
Next 'I

If pagina_actual < cant_paginas Then
if f1="" then
f1=3
end if

%>
<font size="1" face="Verdana"><a href="rescliente.asp?page=<%= pagina_actual + 1 %>">[Próximo >>]</a>
<%
'Fin...
end if
end if
%>
<form method="POST" action="prescliente.asp">
<p align="center">
&nbsp;</p>
<p align="center">
<input type="submit" value="Preveer" name="B1" style="text-align: center">&nbsp;&nbsp;&nbsp;&nbsp;
<input type="submit" value="Cerrar" onclick="window.close()" name="B2" style="text-align: center"></p>
</form>

</font></font></font>

</font>

</body>

</html>
<%
'db.close
%>
  #5 (permalink)  
Antiguo 01/04/2004, 06:15
Avatar de GustavoPY  
Fecha de Ingreso: marzo-2002
Ubicación: Capiatá
Mensajes: 88
Antigüedad: 22 años, 2 meses
Puntos: 0
Además de lo expuesto aquí, tienes un artículo muy interesante en el sitio de Microsoft.

Busca el articulo: "Creación de un calendario de eventos basado en el Web"

Es un articulo que explica claramente lo que tu estás buscando.

Suerte!!

Cuéntanos luego cómo te ha ido!

Saludos!
__________________
*********************************
Gustavo Arriola
http://www.gustavoarriola.com
*********************************
  #6 (permalink)  
Antiguo 01/04/2004, 11:11
Avatar de DkarnDuuk  
Fecha de Ingreso: marzo-2004
Mensajes: 626
Antigüedad: 20 años, 2 meses
Puntos: 2
calendario y bd access

lo primero daros las gracias por ayudarme, no creia q iba a recibir tanta ayuda y tan rapido.

Lo primero decir q todavia ando muy perdido, pero bueno. luego a GustavoPY q no encuentro el articulo q me dice (si me dijera como llegar hasta ahi se lo agradeceria).

este es el codigo de la pagina manten.asp (krypton), a la q tengo acoplada calendario.asp por si le sirve para q pueda ayudarme:

y para acabar, si alguien me puede decir algun sitio web para bajarme un buen manual de asp o si me recomiendan comprarme un manual

<html>
<head>
<title></title>
<script language="javascript">
var paso=0
function eliminarregistro()
{
if (document.datos.dia.value=="")
{alert("ERROR: Debe seleccionar un menú/Aukera ezazu menu bat")}
else
{
document.datos.action="regezabatu.asp"
document.datos.submit()
}
}

function guardarcambios()
{
document.datos.action="eguneratu.asp"
document.datos.submit()
}

function cargar()
{
paso=paso+1
if (paso==2)
{
paso=0
document.datos.action="manten.asp"
document.datos.submit()
}
}

function nuevomenu()
{
window.location="nube.asp"
}

function borrartabla()
{
alert("AVISO: Eliminados todos los menus/Menu guztiak ezabatuta")
window.location="ezabatu.asp"
}
</script>

</head>
<body>
<%

Session("situacion")="manten.asp"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "alkartu"
Set Conn2 = Server.CreateObject("ADODB.Connection")

SQL="Select * from menu"
set RS = Conn.Execute(SQL)
%>

<table>
<tr>
<td>
<form name="datos" method="post" action="regezabatu.asp">
<table>
<tr align="center">
<td><b>Dia/Eguna</b>
<select name="dia" onClick="cargar()">
<option value="" width="300">.: Seleccione Fecha/Aukeratu Data :.</option>
<%Do While Not RS.Eof %>
<%if request.form("dia")=RS("dia") then%>
<option value="<%=RS("dia")%>" selected><%=RS("dia")%></option>
<%else%>
<option value="<%=RS("dia")%>"><%=RS("dia")%><%= + " " & RS("mes")%></option>
<% end if
RS.movenext
Loop
%>
</select>
</td>
</tr>
<%
if request.form("dia")<>"" then
SQL1="Select * from menu where dia='"&request.form("dia")&"'"
set RS1 = Conn.Execute(SQL1)
mes=RS1("mes")
primero=RS1("primero")
segundo=RS1("segundo")
postre=RS1("postre")
calorias=RS1("calorias")
proteinas=RS1("proteinas")
lipidos=RS1("lipidos")
hidratos=RS1("hidratos")

probar=request.form("dia")
egun=right(probar,2)
select case probar
case "lunes "&egun probar="astelehena "&egun
case "lunes"&egun probar="astelehena"&egun
case "martes "&egun probar="asteartea "&egun
case "martes"&egun probar="asteartea"&egun
case "miercoles "&egun probar="asteazkena "&egun
case "miercoles"&egun probar="asteazkena"&egun
case "jueves "&egun probar="osteguna "&egun
case "jueves"&egun probar="osteguna"&egun
case "viernes "&egun probar="ostirala "&egun
case "viernes"&egun probar="ostirala"&egun
case "sabado "&egun probar="larunbata "&egun
case "sabado"&egun probar="larunbata"&egun
case "domingo "&egun probar="igandea "&egun
case "domingo"&egun probar="igandea"&egun
end select

SQL2="Select * from menu where dia ='"&probar&"'"
set RS1 = Conn.Execute(SQL2)

hila=RS1("mes")
lehen=RS1("primero")
bigarren=RS1("segundo")
postrea=RS1("postre")
end if
%>

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n bsp;&nbsp;&nbsp;&nbsp;
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n bsp;&nbsp;&nbsp;&nbsp;
&nbsp;&nbsp;&nbsp;Elige el dia en castellano/Aukera ezazu eguna erderaz
<tr align="center">
<td><b>Mes/Hila</b>
<input type="text" name="mes" value="<%=mes%>" size="20"> <b>/</b>
<input type="text" name="hila" value="<%=hila%>" size="20">
</td>
</tr>
<tr align="center">
<td><b>Primer Plato/Lehenengo Platerra</b>
<input type="text" name="primero" value="<%=primero%>" size="20"> <b>/</b>
<input type="text" name="lehen" value="<%=lehen%>" size="20"></td>
</tr>
<tr align="center">
<td><b>Segundo Plato/Bigarren Platerra</b>
<input type="text" name="segundo" value="<%=segundo%>" size="20"> <b>/</b>
<input type="text" name="bigarren" value="<%=bigarren%>" size="20"></td>
</tr>
<tr align="center">
<td><b>Postre/Postrea</b>
<input type="text" name="postre" value="<%=postre%>" size="20"> <b>/</b>
<input type="text" name="postrea" value="<%=postrea%>" size="20"></td>
</tr>
<tr align="center">
<td><b>Calorias/Kaloriak</b>
<input type="text" name="calorias" value="<%=calorias%>" size="20"></td>
</tr>
<tr align="center">
<td><b>Proteínas/Proteinak</b>
<input type="text" name="proteinas" value="<%=proteinas%>" size="20"></td>
</tr>
<tr align="center">
<td><b>Lípidos/Lipidoak</b>
<input type="text" name="lipidos" value="<%=lipidos%>" size="20"></td>
</tr>
<tr align="center">
<td><b>Hidratos/Hidratoak</b>
<input type="text" name="hidratos" value="<%=hidratos%>" size="20"></td>
</tr>
<tr>
<td colspan=2>
<center><table>
<tr align="center">
<td><input type="button" value="GUARDAR/GORDE" onclick="guardarcambios()"></td>
<td><input type="button" value="NUEVO/BERRI" onclick="nuevomenu()"></td>
<td><input type="button" value="ELIMINAR/KENDU" onclick="eliminarregistro()"></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>

</tr>
</table>
<%Conn.close

if Session("operacion")="eliminar" then
response.write("<script lenguaje='javascript'>alert('Menu Eliminado/Menua Ezabatuta')</script>")
Session("operacion")=""
end if
%>

<a href="../cast/comedor1.asp">SALIR AL MENU</a><B>/</B><a href="../eusk/jantoki1.asp">IRTEN MENURA</a>
</body>
</html>
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 23:21.