script que cada semana haga algo.

[keikos]

hola amigos saben de algun
que por decir cada que pase una semana , cambie algo..

como se puede hacer..

GRACIAS! saludos.!! :)

<embed src="http://www5.gratisweb.com/keikop/joit.swf" width="110" height="110"
</embed>

[Aston]

Hola Keikos, con esta función que te devuelve la semana del año en la que te encuentras puedes hacer lo que quieras:

<pre>
Function SemanaAnio()
'Devuelve la semana del año
SemanaAnio = DateDiff(&quot;ww&quot;, &quot;01/01/&quot; &amp; CStr(Year(Date)), Date, 2) + 1
End Function
</pre>

Por ejemplo puedes hacer:

<pre>
Dim nSemana
nSemana = SemanaAnio()

Selct Case nSemana
Case 9
'Hago una cosa
Case 10
'Hago otra cosa
Case Else
'Muchas cosas por hacer...
End Select
</pre>

Bueno, espero que esto sea aclaratorio y te sirva. Un gran saludo, Keikos. ;) ;) ;)

<a href="http://www.laventanita.net/" target="_blank">
<img src="http://www.breogan.org/images/Aston.gif" border="0" alt="La Ventanita.net - Lo imprescindible en la red"></a>

[keikos]

no cabe duda que eres un experto!!
tks ! aston!

<embed src="http://www5.gratisweb.com/keikop/joit.swf" width="110" height="110"
</embed>