Benvenuti in Banconote Mondiali.it : il tuo portale sulla Numismatica!!! | |

    News
    •  Tutte le notizie
    •  Collezione di Gulden
    •  Altre Collezioni
    •  Personaggi
    •  Un pò di Storia
    •  Curiosità

    •  Plastificate
    •  Eventi
    •  Libreria
    •  Riviste

    •  Nuove Emissioni

    News
    •  Tutte le notizie
    •  Collezione di Gulden
    •  Altre Collezioni
    •  Nuove Emissioni
    •  Un pò di Storia
    •  Curiosità

    •  Commemorative
    •  Eventi
    •  Libreria
    •  Riviste
 

    •  Comprare
    •  Vendere
    •  Forum
    •  Catalogo Mondiale
    •  Chat
    •  Inserisci la tua Collez.
    •  Aste
    •  BM.it sul Cell. e Pda
    •  Sondaggi
    •  Concorsi
     
    •  Contatti
    •  Collaborazione
    •  Mappa del Sito
    •  Sponsor

    •  Abbreviazioni
    •  Conservazione
    •  Datazione
    •  Valute del mondo
    •  Guida all' Euro
    •  Stemmi
    •  Note Speciali
    •  La Storia del...
    •  Descrizione Bancon.
    •  Descrizione Moneta
    •  Descrizione Euro
 
    Banconote & Monete
    •  Links
    Staff
    •  Galleria
   
    
Contatore
    N° Visite: <% Dim nomefile, filestream Dim objFile nomefile = Server.MapPath("/public/visite.txt") Set objFile = CreateObject("Scripting.FileSystemObject") 'se il file non esiste, crealo if not objFile.FileExists(nomefile) then Set filestream = objFile.OpenTextFile(nomefile, 2, true) filestream.WriteLine("0") end if 'legge il numero attuale di visite Set filestream = objFile.OpenTextFile(nomefile, 1, true) Dim visite visite = filestream.ReadLine() filestream.Close 'se non è ancora presente la variabile di sessione visite = visite + 1 'incrementa di uno gli accessi al sito 'scrive nel file il valore aggiornato di visite Set filestream = objFile.CreateTextFile(nomefile, true) filestream.WriteLine(visite) filestream.Close Set filestream = Nothing Set objFile = Nothing 'visualizza sul browser il numero totale di visite Response.Write visite %>
    N° Utenti on-line: <%= Application("ActiveUsers") %>
Personaggi degli U.S.A.  
Abraham Lincoln

4.49 PM - Gulden
   

Uomo politico statunitense ( Hodgeusville, Kentucky, 1809 -- Washington 1865 ), 16° presidente della Confederazione. Candidato per i whigs come rappresentante dell'Illinois e deputato per otto anni, venne, nel 1846, eletto al Congresso dell'Unione. Nel 1854, con un discorso a Peoria, Lincoln conquistò una posizione di grande rilevo nella politica del Paese prendendo energica posizione contro la schiavitù e a favore del consolidamento del potere federale contro quello particolaristico dei vari Stati. Nel 1860 fu eletto Presidente con una votazione che, per la prima volta, divise in due blocchi contrapposti gli Stati dell'Unione : il Nord, abolizionista, votò infatti quasi compatto per Linconl mentre il Sud si pronunciò plebiscitariamente per i candidati democratici. Durante la sua presidenza, i candidati della Georgia, dell'Alabama, della Florida, della Luisiana, del Texas e di altri Stati del Sud decisero unanimamente a separarsi dall'Unione formando gli Stati Confederati d'Amrica sotto la presidenza di Jefferson Davis. Lincoln preferì attendere che gli Stati secessionisti assumessero l'offensiva perchè la guerra civile contro la schiavitù fosse considerata, nel Nord, inevitabile da tutta la popolazione e per guadagnare alla sua causa la simpatia di tutto il mondo civile. Intanto, il 1° gennaio 1863 con il " Proclama di emancipazione " dichiarava liberi cittadini americani 4.500.000 schiavi neri. La guerra fu sanguinosa ed aspra e terminò due anni dopo (aprile 1865) con la resa dell'esercito sudista al generale Grant. A Lincoln, considerato ormai dovunque il campione della lotta per la libertà e per l'uguaglianza, restava l'arduo compito di sanare le profonde ferite militari e civili che la guerra avava inferto ad entrambe le parti belligeranti. Ma il 14/04/1865 l'attore John Wilkes Booth uccideva Lincoln con un colpo di pistola mentre assisteva a una rappresentazione al teatro Ford di Washington. Gli scritti di Lincoln sono giustamente celebri oltre che per il loro valore politico, anche per il valore letterario della sua prosa, chiara, immediata e realistica.

 

 

 

 

 

 

   
Ritorna "Indietro".
 


<% 'Imposto la connessione Set conn = Server.CreateObject("ADODB.Connection") conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/mdb-database/dati.mdb") 'Imposto la stringa SQL di selezione dati sSql="SELECT * FROM dati where id=7" 'Creo e apro il Set di Record Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sSql, conn, 3, 3 %> • N° Articoli: <%=rs.Fields("articoli").Value%>
 • N° Banconote: <%=rs.Fields("banconote").Value%>
 • N° Monete: <%=rs.Fields("monete").Value%>
 • Nazioni: <%=rs.Fields("nazioni").Value%><% 'Chiudo il recordset e libero la memoria rs.Close Set rs = Nothing 'Chiudo la connessione al database e libero la memoria conn.Close Set conn = Nothing %><% 'Imposto la connessione Set conn = Server.CreateObject("ADODB.Connection") conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/mdb-database/utenti.mdb") 'Imposto la stringa SQL di selezione dati sSql="SELECT * FROM tab_utenti" 'Creo e apro il Set di Record Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sSql, conn, 3, 3 %>
 • N° Iscritti: <%=RS.recordcount%><%'Chiudo il recordset e libero la memoria rs.Close Set rs = Nothing 'Chiudo la connessione al database e libero la memoria conn.Close Set conn = Nothing%>
 
Per ricevere via email gli aggiornamenti del sito devi inserire la tua email qui sotto e cliccare invia.
La registrazione è completamente gratuita.
 
Utente
Password
Non conosci il servizio? Allora clicca qui!





Copyright © 2002-2006 Banconote Mondiali. All rights reserved. Risoluzione : 1024 x 768
Webmaster : Mattatore