Menús en javascript salen cortados
¿Tengo un par de dudas agradecería que me pudieras contestar
tengo una web con marcos
y en el izuquierdo donde hay el menu con 6 botones he cogido un javascript que al pasar por encima cada botón el mouse se muestra un submenú flotante con 3 opciones . Pues eso no se me sobrepone encima todos los marcos y queda como cortado me explico?
La otra es que tengo un cuestionario ASP responden si o no o n/c me da de colores las barras con los votos pero no el % como se hace
tengo una web con marcos
y en el izuquierdo donde hay el menu con 6 botones he cogido un javascript que al pasar por encima cada botón el mouse se muestra un submenú flotante con 3 opciones . Pues eso no se me sobrepone encima todos los marcos y queda como cortado me explico?
La otra es que tengo un cuestionario ASP responden si o no o n/c me da de colores las barras con los votos pero no el % como se hace
Respuesta de idominguez
1
Seguramente con el control que has escogido no vas a poder hacerlo, los frames son páginas, que aunque no se vean son de un tamaño normal. Se pueden usar otros controles que manejan menús en distintos frames en www.bratta.com hay algunos ejemplos.
La segunda pregunta depende de como lo estés haciendo.
La segunda pregunta depende de como lo estés haciendo.
Gracias por si me quieres ayudar más esto es como lo estoy haciendo con asp
<%@ Language=VBScript%>
<%'Verificamos que efectivamente alguien haya votado.
If Request.Form = "" then Response.Redirect "encu.asp" %>
<HTML>
<HEAD>
<TITLE>Encuesta con ASP</TITLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF" STYLE="font-size=11; font-family: Verdana">
<P ALIGN="center">L'ENQUESTA
<P ALIGN="center"> <%
'guardamos en voto la info del formulario.
voto = Request.Form("mismo")
'Conectamos a la BD.
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("./base_encuesta.mdb")
'Con una sentencia SQL pedimos toda la BD.
Set RS = Server.CreateObject("ADODB.RecordSet")
sql = "SELECT * FROM encuesta"
RS.Open sql, oConn
'si no hay registros, creamos unos con datos nulos.
If RS.EOF then
oConn.Execute "INSERT INTO encuesta (dato1,dato2,dato3) VALUES (0,0,0)"
RS.Requery
End If
'Comenzamos el chequeo de datos. Para todos igual
If voto = "1" then
'Si se cumple el IF, sumamos uno al campo correspondiente.
oConn.Execute "UPDATE encuesta SET Dato1 = "&RS("Dato1")+1&" "
'La siguiente linea hace un Refresh en la Tabla, para tener los datos recientes.
RS.Requery
Response.Write "<BR>Si<BR>"
ElseIf voto = "2" then
oConn.Execute "UPDATE encuesta SET Dato2 = "&RS("Dato2")+1&" "
RS.Requery
Response.Write "<BR>No<BR>"
ElseIf voto = "3" then
sql = "UPDATE encuesta SET Dato3 = "&RS("Dato3")+1&""
oConn.Execute sql
RS.Requery
Response.Write "<BR>No sap no contesta<BR>"
End If
'Sumamos todos los votos y los guardamos en una variable.
total = CInt(RS("Dato1"))+CInt(RS("Dato2"))+CInt(RS("Dato3"))
'Mostrar el gráfico.
%> <BR>
<TABLE ALIGN="center" WIDTH="75%" BORDER="0" CELLPADDING="0" BORDERCOLOR="#669966" CELLSPACING="1" STYLE="font-size=11; font-family: Verdana">
<TR>
<TD STYLE="font size:12" height="33"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">¿Està
d'acord amb la nova senyalització del carrers?</font> <font size="1">RESPOSTES</font></TD>
</TR>
<TR>
<TD STYLE="font size:12"><IMG HEIGHT="15" SRC="pic_gris.gif" BORDER="1" WIDTH="15"></TD>
</TR>
<TR>
<TD STYLE="font size:12"><IMG HEIGHT="15" SRC="pic_gris.gif" BORDER="1" WIDTH="15"></TD>
</TR>
<TR>
<TD STYLE="font size:12"><IMG HEIGHT="15" SRC="pic_gris.gif" BORDER="1" WIDTH="15"></TD>
</TR>
</TABLE>
<TABLE ALIGN="center" STYLE="font-size=11; font-family: Verdana">
<TR>
<TD ALIGN="center"> <A HREF="encu.asp"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Volver
a la encuesta</font></A> </TD>
</TR>
</TABLE>
<%'Limpiamos y cerramos todo.
RS.Close
Set RS = Nothing
oConn.Close
Set oConn = Nothing
%>
</BODY>
</HTML>
Saludos
<%@ Language=VBScript%>
<%'Verificamos que efectivamente alguien haya votado.
If Request.Form = "" then Response.Redirect "encu.asp" %>
<HTML>
<HEAD>
<TITLE>Encuesta con ASP</TITLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF" STYLE="font-size=11; font-family: Verdana">
<P ALIGN="center">L'ENQUESTA
<P ALIGN="center"> <%
'guardamos en voto la info del formulario.
voto = Request.Form("mismo")
'Conectamos a la BD.
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("./base_encuesta.mdb")
'Con una sentencia SQL pedimos toda la BD.
Set RS = Server.CreateObject("ADODB.RecordSet")
sql = "SELECT * FROM encuesta"
RS.Open sql, oConn
'si no hay registros, creamos unos con datos nulos.
If RS.EOF then
oConn.Execute "INSERT INTO encuesta (dato1,dato2,dato3) VALUES (0,0,0)"
RS.Requery
End If
'Comenzamos el chequeo de datos. Para todos igual
If voto = "1" then
'Si se cumple el IF, sumamos uno al campo correspondiente.
oConn.Execute "UPDATE encuesta SET Dato1 = "&RS("Dato1")+1&" "
'La siguiente linea hace un Refresh en la Tabla, para tener los datos recientes.
RS.Requery
Response.Write "<BR>Si<BR>"
ElseIf voto = "2" then
oConn.Execute "UPDATE encuesta SET Dato2 = "&RS("Dato2")+1&" "
RS.Requery
Response.Write "<BR>No<BR>"
ElseIf voto = "3" then
sql = "UPDATE encuesta SET Dato3 = "&RS("Dato3")+1&""
oConn.Execute sql
RS.Requery
Response.Write "<BR>No sap no contesta<BR>"
End If
'Sumamos todos los votos y los guardamos en una variable.
total = CInt(RS("Dato1"))+CInt(RS("Dato2"))+CInt(RS("Dato3"))
'Mostrar el gráfico.
%> <BR>
<TABLE ALIGN="center" WIDTH="75%" BORDER="0" CELLPADDING="0" BORDERCOLOR="#669966" CELLSPACING="1" STYLE="font-size=11; font-family: Verdana">
<TR>
<TD STYLE="font size:12" height="33"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">¿Està
d'acord amb la nova senyalització del carrers?</font> <font size="1">RESPOSTES</font></TD>
</TR>
<TR>
<TD STYLE="font size:12"><IMG HEIGHT="15" SRC="pic_gris.gif" BORDER="1" WIDTH="15"></TD>
</TR>
<TR>
<TD STYLE="font size:12"><IMG HEIGHT="15" SRC="pic_gris.gif" BORDER="1" WIDTH="15"></TD>
</TR>
<TR>
<TD STYLE="font size:12"><IMG HEIGHT="15" SRC="pic_gris.gif" BORDER="1" WIDTH="15"></TD>
</TR>
</TABLE>
<TABLE ALIGN="center" STYLE="font-size=11; font-family: Verdana">
<TR>
<TD ALIGN="center"> <A HREF="encu.asp"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Volver
a la encuesta</font></A> </TD>
</TR>
</TABLE>
<%'Limpiamos y cerramos todo.
RS.Close
Set RS = Nothing
oConn.Close
Set oConn = Nothing
%>
</BODY>
</HTML>
Saludos
1 respuesta más de otro experto
Respuesta de icv76
1
Veamos, cuando utilizas frames es como si cada uno de ellos fuese una pantalla con unas determinadas dimensiones fijas en las que cargas páginas, si algo no cabe en ese hueco se corta. Si haces la prueba de ver esa página, cargada tal cual, sin estar dentro del marco, verás tu menú perfectamente, prueba a que en vez de salir a un lado salga debajo o acorta los nombres de los menús o agranda el marco. De todas formas ya te lo voy a mirar por si acaso.
La segunda pregunta no le he entendido muy bien. No sé exactamente qué es lo que haces para obtener el resultado que desearías, ¿me lo puedes explicar más extensamente?
La segunda pregunta no le he entendido muy bien. No sé exactamente qué es lo que haces para obtener el resultado que desearías, ¿me lo puedes explicar más extensamente?