takže by to mělo vypadat asi nějak tokto
Protected Sub Page_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.PreRender
If Date.Now.Hour <= 21 And Date.Now.Hour >= 6 Then
'kód pro nastavení stylu nočního
PageTheme.CreateSkinKey(CssStyleCollection(),
"~/App_Themes/Night/css/styles.css")
Else
'kód pro nastavení stylu denního
PageTheme.CreateSkinKey(CssStyleCollection(),
"~/App_Themes/Day/css/styles.css")
End If
End Sub
samozřejmě bez zalomení řádků
|