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
Cina
La Cina si conosce da 2500 anni a.C., ma già nel IV millennio è provata l’esistenza in Cina di una cultura neolitica . La remotissima civiltà cinese appare caratterizzata da un notevole sviluppo delle scienze e delle industrie, mentre politicamente era una monarchia feudale. Si susseguirono numerose dinastie: a Shi-Huang Ti, della dinastia dei Chin, si deve la costruzione della muraglia cinese, mentre sotto la dinastia Han si ebbe un grande progresso in ogni campo e una notevole estensione dell’impero. Seguirono invasioni di Avari, Unni e Tartari, una nuova fioritura con i Tang e poi un periodo di decadenza. Tra il XII e XIII secolo i mongoli conquistarono la Cina e la capitale venne trasferita a Pechino;cacciati i mongoli, regno la dinastia dei Ming, sotto i quali cominciarono le prime relazioni con l’Europa e penetrò in Cina il cristianesimo. Nel XVII secolo i Mancesi invasero e conquistarono la Cina imponendo una loro dinastia; nel XIX secolo avvenne la penetrazione Europea. Nel 1911 una rivoluzione repubblicana portava la separazione della Cina del Sud; nel 1912 la rivoluzione si stendeva anche alla Cina del Nord e abbatteva la dinastia mancese, unificando la Cina sotto un governo repubblicano. Dopo una nuova guerra civile, nel 1928 il paese venne nuovamente unificato, ma ben presto ricominciò lo sgretolamento, aggravato dall’invasione nipponica. Una coalizione anti-giapponese riuscì ad arrestare la loro avanzata, fino alla resa giapponese agli Alleati nel 1945. La Cina fu riunificata ed entrò a far parte delle Nazioni Unite. La lotta tra le classi al potere e i comunisti, attenuatasi durante la guerra, si riaccese nel 1948: il governo nazionalista si ritirò a Formosa, mentre Mao Tze-tung, capo dei comunisti cinesi, proclamava a Pechino la Repubblica Popolare Cinese. Dopo la morte di Mao e Zhou Enlai, nel 1976 si scatenò la lotta per il potere tra moderati e radicali. Al miglioramento delle situazione interna, corrispose una nuova crisi con l'Unione Sovietica. Ne corso degli anni '80 Deng stabilì un controllo serrato sul partito e sul paese; la fine degli anni novanta vide un improvviso deterioramento delle relazioni internazionali cinesi. Con le modifiche costituzionali del 1999 la Cina riconobbe ufficialmente il diritto alla proprietà privata e la legalità del settore economico privato, anche se queste modifiche rivestirono solo un significato formale.
   
[Banconota] [Personaggio]
Sun Yat Sen
Mao Tse-tung
 
Vedi l'intera "collezione".
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