RewriteEngine on
    # Cambiar sudominio.com por su nombre de dominio
    RewriteCond %{HTTP_HOST} ^(www.)?sudominio.com$
    # Cambiar 'subdirectory' por el nombre del subdirectorio que quiere usar
    RewriteCond %{REQUEST_URI} !^/subdirectory/
    # No cambiar estas lineas.
    RewriteCond %{REQUEST_FILENAME} !-f
    RewriteCond %{REQUEST_FILENAME} !-d
    # Cambiar 'subdirectory' por el nombre del subdirectorio que quiere usar
    RewriteRule ^(.*)$ /subdirectory/$1
    # Cambiar sudominio.com por su nombre de dominio
    # Cambiar 'subdirectory' por el nombre del subdirectorio que quiere usar
    # followed by / then the main file for your site, index.php, index.html, etc.
    RewriteCond %{HTTP_HOST} ^(www.)?sudominio.com$
    RewriteRule ^(/)?$ subdirectory/index.php [L]

RewriteEngine on
# Cambiar sudominio.com por su nombre de dominio
RewriteCond %{HTTP_HOST} ^(www.)?sudominio.com$
# Cambiar 'subdirectory' por el nombre del subdirectorio que quiere usar
RewriteCond %{REQUEST_URI} !^/subdirectory/
# No cambiar estas lineas.
RewriteCond %{REQUEST_FILENAME} !-f
RewriteCond %{REQUEST_FILENAME} !-d
# Cambiar 'subdirectory' por el nombre del subdirectorio que quiere usar
RewriteRule ^(.*)$ /subdirectory/$1
# Cambiar sudominio.com por su nombre de dominio
# Cambiar 'subdirectory' por el nombre del subdirectorio que quiere usar
# followed by / then the main file for your site, index.php, index.html, etc.
RewriteCond %{HTTP_HOST} ^(www.)?sudominio.com$
RewriteRule ^(/)?$ subdirectory/index.php [L]

RewriteCond %{REQUEST_URI} !^/subdirectory/

function paginar(actual, total, por_pagina, enlace, maxpags) {
  var  texto = '<div class="pagination" id="navePage"><ul>'; 
  var total_paginas = Math.ceil(total/por_pagina);
  var anterior = actual - 1;
  var posterior = actual + 1;
  var med = maxpags/2;
  var minimo = 0; 
  if( (actual + med) >= total_paginas) {
   minimo = Math.max(total_paginas - maxpags + 1,1);
  }
  else {
   minimo = ( (actual-med)>0 )? actual - med : 1; 
  }   
  var maximo = 0;  
  if (actual > 1) 
   texto += '<li><a href=?' + anterior + enlace + ' title="Back"><<</a></li>';
  maximo = Math.min(minimo + maxpags - 1, total_paginas);
  for (var i=minimo; i <= maximo; i++) {
   if(i == actual) {
    texto += '<li class="active"><a href="?="><b>' + actual + '</b></a></li>';
   }
   else {
    texto += '<li><a href=?'+ enlace + i + '>' + i +'</a></li>';
   }
  }
  if(actual < total_paginas ) 
   texto += '<li><a href=?' + enlace + posterior + ' title="Next">>></a></li>';
  texto += '</ul></div>';
  return texto;
 }
 
 

    Public Class Form1
       Dim cambio As Boolean = false
       Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
           Dim url As String = ""
           If cambio Then
                url = "http://www.facebook.com"
           Else
                url = "https://www.google.es"
           End If
           cambio = Not cambio
           Process.Start(url)
       End Sub
 
       Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
           Timer1.Interval = 30000
       End Sub
    End Class