Cambiare larghezza colonna su db2 as400

ALTER TABLE libreria/file ALTER COLUMN colonna SET DATA
TYPE CHARACTER ( 50) CCSID 280 NOT NULL                      

exportGridToExcel

Public Sub exportGridToExcel(nomegriglia As MSFlexGrid)

Dim oExcel  As Object
Dim oBook As Object

Dim i As Integer
Dim j As Integer

  'Start a new workbook in Excel
  Set oExcel = CreateObject("Excel.Application")
  Set oBook = oExcel.Workbooks.Add
  oExcel.Visible = True
  'riporta la griglia in excel
  For i = 0 To nomegriglia.Rows - 1
    For j = 0 To nomegriglia.Cols - 1
      oExcel.cells(i + 1, j + 1).Value = nomegriglia.TextMatrix(i, j)
    Next
  Next
 
  MsgBox "salvataggio su excel terminato"
 
End Sub

font google

https://developers.google.com/fonts/docs/getting_started#Quick_Start


esempi font google
http://www.google.com/fonts

IMPOSTARE RUBRICA LDAP

1. file
2. informazioni
3. impostazioni account
4. impostazioni account
5. rubriche
6. nuovo
7. nuova finestra avanti
8. server
9. utente
10.  password
11. avanti
    
    
    
    
    
    
    

OPERAZIONI PIANIFICATE IN WINDOWS XP

menu drop down

all'interno di $function
/*menu drop down  >>>*/
$('#menu li ul').css({
    display: "none",
    left: "auto"
  });
  $('#menu li').hover(function() {
    $(this)
      .find('ul')
      .stop(true, true)
.slideDown('slow', 'easeOutBounce');
  }, function() {
    $(this)
      .find('ul')
      .stop(true,true)
      .hide();
  });
/*<<<<<menu drop down*/

su un foglio di stile
#barMenu {
  position: relative;
height:30px;
top: 5px;
background-image: url(./img/sfondoBarMenu.png);
background-repeat:repeat-x;
background-position: 0px -34px;
}

#menu {
  position: absolute;
  top: 0px;
  left: 0;
}

#menu, #menu ul {
  padding: 0;
  margin: 0;
  list-style: none;

}

#menu > li  > a{
text-align:center;
text-decoration: none;
}

#menu li {
  float: left;

}

#menu a {
  display: block;
  padding: 5px;
  width: 130px;
  border-style:solid;
  border-width: 1px 1px 1px 1px ;
text-decoration: none;
}

#menu li ul {
  position: absolute;
  left: -999em;
  width: 140px;
  
}

#menu li:hover ul, #menu li ul:hover {
  left:auto;

}

#menu > li:hover {
  background: #333;
  box-shadow: 0px 0px 15px #ffffff;
}

#menu li ul li {
  background: #333;

}
#menu li ul li:hover {
  background: #eee;
color: #f00;
  box-shadow: 0px 0px 15px #ffffff;
}

su html


<!-- inizio BARRA DEI MENU -->
<div id="barMenu">
<!-- SCRIVE I MENU -->
<nav role="navigation">
<ul id="menu">
<li><a href="http://www.usc-calcroci.it/index.php?pageId=home">HOME</a>
</li><li><a href="http://www.usc-calcroci.it/#">LA SQUADRA</a><ul style="left: auto; display: none;"><li><a href="http://www.usc-calcroci.it/index.php?pageId=direttivo">DIRETTIVO</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=atleti14&tipo=php">ATLETI</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=storia">STORIA</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=contatti">CONTATTI</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=sponsor">SOSTENITORI</a></li>
</ul></li><li><a href="http://www.usc-calcroci.it/#">STAGIONE 14</a><ul style="left: auto; display: none;"><li><a href="http://www.usc-calcroci.it/documenti/2014/stagione2014.pdf" target="_blank">STATUTO</a></li>
<li><a href="http://www.usc-calcroci.it/documenti/2014/modulo_di_iscrizione_2014.pdf" target="_blank">ISCRIZIONE</a></li>
<li><a href="http://www.usc-calcroci.it/documenti/2014/Vestiario2014.pdf" target="_blank">VESTIARIO</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=clasSoc2013&tipo=php">CLASSIFICA SOCIALE</a></li>
</ul></li><li><a href="http://www.usc-calcroci.it/#">MANIFESTAZIONI</a><ul style="left: auto; display: none;"><li><a href="http://www.usc-calcroci.it/index.php?pageId=calendario14&tipo=php">CALENDARIO 2014</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=calendario14Tab&tipo=php">CALENDARIO 14 TAB</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=trofei14&tipo=php">TROFEI 2014</a></li>
<li><a href="http://www.usc-calcroci.it/tuttiTempi14/">RISULTATI</a></li>
</ul></li><li><a href="http://www.usc-calcroci.it/#">UTILITY</a><ul style="left: auto; display: none;"><li><a href="http://www.usc-calcroci.it/index.php?pageId=photoGallery2012&tipo=php">PHOTOGALLERY</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=forum&tipo=php&tForum=Pubblica">FORUM</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=forum&tipo=php&tForum=NEWS">NEWS</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=meteo">METEO</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=linkUtili&tipo=php">LINK UTILI</a></li>
<li><a href="https://www.facebook.com/pages/Calcroci-mtb/745781225437620" target="_blank">FACEBOOK</a></li>
</ul></li><li><a href="http://www.usc-calcroci.it/#">AREA RISERVATA</a><ul style="left: auto; display: none;"><li><a href="http://www.usc-calcroci.it/index.php?pageId=vediPosta">POSTA</a></li>
<li><a href="http://www.usc-calcroci.it/index.php?pageId=login&tipo=php">LOGIN</a></li>
</ul> </li></ul>
</nav>
</div>

DRAG-DROP SU TREEVIEW

Private Sub TreeView1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
   If Button = vbLeftButton Then ' Signal a Drag operation.
      Draging = True ' Set the flag to true.
      ' Set the drag icon with the CreateDragImage method.
     
      TreeView1.Drag vbBeginDrag ' Drag operation.
   End If
End Sub

Private Sub TreeView1_DragOver(Source As Control, x As Single, y As Single, State As Integer)
   If Draging = True Then
      ' Set DropHighlight to the mouse's coordinates.
      Set TreeView1.DropHighlight = TreeView1.HitTest(x, y)
   End If
End Sub


Private Sub gridMail_DragDrop(Source As Control, x As Single, y As Single)
  Set nodoScelto = TreeView1.SelectedItem
  'se il nodo è livello 3 significa che è un fornitore e quindi lo inserisce subito in lista
  If livelloNodo(nodoScelto) = 3 Then
    aggiungiInGridMail nodoScelto.Text
  End If
 
End Sub