DÜNYA EKONOMİSİ,ASKERİ GÜÇ ve TÜRKİYE - HOŞ GELDİNİZ!!!!!!!!!!!!!!! - Blogcu

25/7/2007

DÜNYA EKONOMİSİ,ASKERİ GÜÇ ve TÜRKİYE

Dünya siyasi, iktisadi ve askeri gündeminin ana bileşkelerini oluşturan unsurların ciddi bir analize tabi tutularak bir durum tespiti yapılması, ardından da öngörülebilir gelecekte yapılabilir olanın fizibilitesini bu bilgi kümesi çerçevesinde çözümleme, birincil önceliklerimizden biri olmalıdır. Bu bileşkelerden zaman zaman biri öne çıkabildiği gibi, tümü bir arada yaşanılır dünyanın felaketi haline gelebilmektedir. Örneğin Sanayi Devrimi çağında, başta Britanya İmparatorluğu olmak üzere, Batılı devletlerin sanayi mallarını pazarlayabilecek ve bunların üretimi için gerekli hammaddeleri kolayca sağlayabilecek sömürgeler kurmak için askeri güçleriyle yaptıkları, dünya tarihinin karanlık sayfalarında yerini almış bulunuyor. Örneğin Hindistan'daki dokuma pazarını ele geçirip, kendi çıkarları doğrultusunda kullanmak için, İngilizler'in binlerce Hintli dokuma ustasının kollarını kestiklerini tarihçiler kaydediyorlar.

Yorum yaz! :: Arkadaşına Gönder!

0 yorum yazılmıştır

:: Sonraki »

<% Set Mail = Server.CreateOBject("Dundas.Mailer") sReturn = Mail.QuickSend("alici@domain.com",”gonderen@domain.com”,”konu basligi”,”mesajınız”) Set Mail = Nothing %>

Get your own Flash MP3 Player

deneme mesajı HERŞEY MİLLET İÇİN

Nokta nokta olan yerlere isteğe göre alanlar eklenebilir. Burada önemli olan kısım ise, eklediğimiz alanların veritabanında da yer alıyor olması gerektiğidir. Bu form "BECOME A MEMBER" butonuna tıklandığında, "membership.asp" adlı dosyaya bilgi gönderecektir. Bu dosya server'da bulunması gereken bir dosyadır. Bu dosyanın içeriği ise, <% dim sqlstring,connectionstring,username,password,email,.............. Connectionstring="PROVIDER=SQLOLEDB;DATABASE=MEMBERSHIP;USER ID=SA;PASSWORD=000019" SET Connection=server.createobject("ADODB.Connection") connection.open connectionstring username=Trim(Request.Form("username")) password=Trim(Request.Form("password")) email=Trim(Request.Form("email")) ...................... .................... sqlstring="insert into membership (username,password,email) values ('"&usename&"',''"&password&"',''"&email&"')" SET RecordSet=Server.CreateObject("ADODB.RecordSet") RecordSet.Open sqlstring,connection,adopenstatic,adlockoptimistic,adcmdtext SET RecordSet=NOTHING SET Connection=NOTHING %> Ana sayfa yap
Gazeteler
Oyunlar
Gazeteler
Oyunlar Güzel Sözler Site Ekle <%
badwordFilter = "Acik"
Dim badword
badword = "fuck|suck|sex"

metin = Request.Form("metin" )

strwords = Split(badword, "|" )
For I = 0 to Ubound(strwords)
metin = Replace(metin, strwords(I), String(Len(strwords(I)),"*" ), 1,-1,1)
next
If badwordFilter= "Acik" Then
Response.Write metin
else
Response.Write metin
End If
%>

Canlı TV izle Desteklemektedir.