Eu peguei um script de um calendario de eventos! e gostaria de saber uma coisa. Tem condições de no dia que tiver um evento, esse dia ficar em negrito. Alguem pode me ajudar?
Como Eu Coloco Em Negrito
Started By lizossomos, 12/04/2005, 17:42
4 replies to this topic
#1
Posted 12/04/2005, 17:42
#2
Posted 12/04/2005, 20:48
claro. nao tenho o script q vc tem..rs..assim fica meio dificil..
so vc usar
If
else
end if
de acordo cmo ta seu code..
so vc usar
If
else
end if
de acordo cmo ta seu code..
> Busca On-line - A Busca que faltava na Internet! - Cadastre-se!
---------------------------------------------------------------------------
> BRdesign.NET - Soluções em Websites e Sistemas E-Commerce.
---------------------------------------------------------------------------
> BR-ecommerce - Sua loja virtual na internet! - Apenas R$99,90 mensais (hospedagem inclusa)!
---------------------------------------------------------------------------
> BRdesign.NET - Soluções em Websites e Sistemas E-Commerce.
---------------------------------------------------------------------------
> BR-ecommerce - Sua loja virtual na internet! - Apenas R$99,90 mensais (hospedagem inclusa)!
#3
Posted 12/04/2005, 21:23
Taqui o codigo do calendario. tem como?
<%Server.ScriptTimeOut = 3%>
<%Dim giorno,mese,anno,tmese,day1,primog
giorno = request("giorno")
If giorno = "" then
giorno = day(now())
End If
mese = request("mese")
If mese = "" then
mese = month(now())
End If
anno = request("anno")
If anno = "" then
anno = year(now())
End If
If mese = 12 then
mese2 = 1
anno2 = anno+1
else
mese2 = mese+1
anno2 = anno
End If
day1 = Cdate("1"+"/"+Cstr(mese)+"/"+Cstr(anno))
dayoff = Cdate("1"+"/"+Cstr(mese2)+"/"+Cstr(anno2))-1
primog = Weekday(Cdate("1"+"/"+Cstr(mese)+"/"+Cstr(anno)))-1
ultimog = Weekday(dayoff)-1
If ultimog = 0 then
ultimog = 7
End If
If primog = 0 then
primog = 7
End If
Select Case mese
case 1
tmese = "Jan"
case 2
tmese = "Feb"
case 3
tmese = "Mar"
case 4
tmese = "Apr"
case 5
tmese = "May"
case 6
tmese = "Jun"
case 7
tmese = "Jul"
case 8
tmese = "Aug"
case 9
tmese = "Sep"
case 10
tmese = "Oct"
case 11
tmese = "Nov"
case 12
tmese = "Dec"
End Select
x=1
%>
<style type="text/css"><!--//by Studio VII Sparber001
a:link {color: #000000}
a:active {color: #000000}
a:visited {color: #006699}
a:hover {color: #CC9900}
body {font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 12px; color: #333333}
td {font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 12px; color: #333333}
li {color: #339966; list-style-type: square}
ul {color: #339966; list-style-type: square}
ol {color: #339966}
.mytext {font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; color: #666699}
a.mytext:link {color: #333333; text-decoration: none}
a.mytext:visited {color: #666666; text-decoration: none}
a.mytext:active {color: #333333; text-decoration: none}
a.mytext:hover {color: #999933; text-decoration: none}
-->
</style>
<title>calendario</title>
<script language="JavaScript">
<!--
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function MM_findObj(n, d) { //v4.0
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && document.getElementById) x=document.getElementById(n); return x;
}
function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
<body bgcolor="#FFFFFF" onLoad="MM_preloadImages('images/calendar_03_b.gif')">
<table border="0" cellspacing="0" cellpadding="0" width="153">
<tr>
<td width="79"> </td>
<td width="127"><a href="registrazione.asp" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image7','','images/calendar_03_b.gif',1)" target="main"><img name="Image7" border="0" src="images/calendar_03_a.gif" width="109" height="18"></a></td>
</tr>
</table>
<table width="190" border="0" cellspacing="1" cellpadding="1">
<tr bgcolor="#3399CC">
<td><a href="cal.asp?mese=<%if mese > 1 then response.write mese-1 else response.write 12 End If%>&anno=<%if mese > 1 then response.write anno else response.write anno-1 End If%>"><img src="images/prev.gif" border="0"></a></td>
<td width="50%" bordercolor="#666666">
<div align="center"> <b><font color="#FFFFFF"><%=tmese%>
</font></b></div>
</td>
<td width="50%" bordercolor="#666666">
<div align="center"><b><font color="#FFFFFF"><%=anno%></font></b></div>
</td>
<td><a href="cal.asp?mese=<%if mese < 12 then response.write mese+1 else response.write 1 End If%>&anno=<%if mese < 12 then response.write anno else response.write anno+1 End If%>"><img src="images/next.gif" border="0"></a></td>
</tr>
<tr>
<td colspan="4">
<table width="100%" border="1" cellspacing="1" cellpadding="1" bordercolor="#666666">
<tr bgcolor="#003399">
<td>
<div align="center"><font color="#CCCCCC">M</font></div>
</td>
<td>
<div align="center"><font color="#CCCCCC">T</font></div>
</td>
<td>
<div align="center"><font color="#CCCCCC">W</font></div>
</td>
<td>
<div align="center"><font color="#CCCCCC">T</font></div>
</td>
<td>
<div align="center"><font color="#CCCCCC">F</font></div>
</td>
<td>
<div align="center"><font color="#CCCCCC">S</font></div>
</td>
<td>
<div align="center"><font color="#CCCCCC">S</font></div>
</td>
</tr>
<tr>
<%
giorno1 = (day1-primog+x)
Do While giorno1 <= (dayoff+7-ultimog)
%>
<td <%If day(day1-primog+x)=day(now()) and month(day1-primog+x)=month(now()) then response.write "bgcolor=""#FFCC33""" End If%>>
<div align="center"> <font color ="<%if giorno1 >= day1 and giorno1 <= dayoff then
response.write "#000000"
Else
response.write "#CCCCCC"
End If%>"><%if giorno1 >= day1 and giorno1 <= dayoff then%>
<a href="main.asp?data=<%=(day1-primog+x)%>" target="main"><%=day(day1-primog+x)%></a>
<%else%>
<%=day(day1-primog+x)%>
<%End If%>
</font></div>
</td>
<%If weekday(day1 - primog + x - 1) = 7 Then
response.write "</tr>"
End If%>
<%
giorno1 = giorno1 + 1
x=x+1
loop%>
</table>
</td>
</tr>
</table>
<table width="190" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="18">
<div align="right"><a href="cal.asp?mese=<%if mese < 12 then response.write mese+1 else response.write 1 End If%>&anno=<%if mese < 12 then response.write anno else response.write anno+1 End If%>"><img src="images/next.gif" border="0"></a></div>
</td>
<td width="152">
<div align="center"><a href="cal.asp?mese=<%=month(now())%>&anno=<%=year(now())%>" target="_self">go
current month</a></div>
</td>
</tr>
</table>
<table width="190" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="bottom">
<form name="form1" method="post" action="cal.asp" target = "_self">
<table width="170" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<div align="center">
<select name="mese" size="1">
<option value="1" selected>Jan</option>
<option value="2">Feb</option>
<option value="3">Mar</option>
<option value="4">Apr</option>
<option value="5">May</option>
<option value="6">Jun</option>
<option value="7">Jul</option>
<option value="8">Aug</option>
<option value="9">Sep</option>
<option value="10">Oct</option>
<option value="11">Nov</option>
<option value="12">Dec</option>
</select>
</div>
</td>
<td>
<div align="center">
<select name="anno" size="1">
<option selected><%=year(now())%></option>
<%y = 1
do while y <= 6%>
<option><%=year(now())+y%></option>
<%y = y + 1
loop%>
</select>
</div>
</td>
<td>
<div align="center">
<input type="image" border="0" name="imageField" src="images/go.gif">
</div>
</td>
</tr>
</table>
</form>
</td>
</tr>
</table>
#4
Posted 13/04/2005, 03:47
procura a linha que exibe o dia ou a data e poe <b> </b>
se vc souber qual a linha esta sendo exibida posta direto prta facilitar a gente
se vc souber qual a linha esta sendo exibida posta direto prta facilitar a gente
#5
Posted 13/04/2005, 18:40
Eu acredito que essa seja a linha. Como eh que faço para adicionar o negrito quando ouver algum evento nesse dia?
<div align="center"> <font color ="<%if giorno1 >= day1 and giorno1 <= dayoff then response.write "#000000" Else response.write "#CCCCCC" End If%>"><%if giorno1 >= day1 and giorno1 <= dayoff then%> <a href="main.asp?data=<%=(day1-primog+x)%>" target="main"><%=day(day1-primog+x)%></a> <%else%> <%=day(day1-primog+x)%> <%End If%> </font></div>
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)










