Life Is A Mystery

Sebelum Tahun 2009 Berakhir

Posted by: wihemdra on: Wednesday,December 16, 2009

Kita bisa berdetak takjub melihat hal-hal yang bisa diperbuat oleh manusia… Hal-hal yang luar biasa yang manusia bisa ciptakan di tahun ini… (*sekedar menambah wawasan para pembaca :D ). Mari kita lihat…

Kolam renang indoor terbesar di dunia adalah World Water Park Edmonton Albert, Canada, dengan ukuran 5 acres.

1.JPG

Komplek perkantoran terbesar adalah Chicago Merchandise Mart Illinois, USA. Wow! Bayangkan seberapa banyak pekerja kantoran disana. Kira-kira, pada jam pulang kantor, macet juga gak ya?

2.JPG

Shoping Mall Terbesar di dunia adalah South China Mall Dongguan, China. Dengan luas 892,000 m2, dan 6 lantai shopping. Wow! Arsitek dan Engineer teknik sipil nya pasti OK banget tuh!

3.JPG

Airport Tersibuk adalah J.F.K International Airport, New York, USA.

4.JPG

Jembatan Terlebar di dunia adalah Sidney Harbor Bridge Sidney, Australia. Dengan 16 jalur lalu lintas,8 diatas dan 8 dibawah. Nggak kebayang lho, gimana rencana gambar tekniknya.

5.JPG

Jembatan terpanjang di dunia adalah Donghai Bridge, China, dengan panjang 32,5 Km. Wow! Kayaknya China memang punya bakat dalam hal membangun sesuatu yang panjang (seperti Great Wall, misalnya)

6.JPG

Kapal laut dengan penumpang terbanyak adalah MS Freedom of the Seas, dengan kapasitas 4300 penumpang. Hmm.. kira-kira, apakah ukurannya yang membuat kapasitas kapal jadi sedemikian besar?

7.JPG

Pesawat Komersil dengan penumpang terbanyak adalah Airbus A380, kapasitas Lebih dari 555 penumpang.

8.JPG

Bus dengan penumpang terbanyak adalah Neoplan Jumbo Cruiser, dengan kapasitas 170 penumpang.

9.JPG

Patung tertinggi di dunia adalah Patung Yesus Penebus Dosa, Rio de Jeneiro, Brazil. Patung ini ada di video klipnya Lighthouse Family dalam lagu “Lost in Space”.

10.JPG

Gedung Tertinggi di dunia ada di Burj Dubai, dengan tinggi 900 meter, alias hampir 1 kilometer. Wow! Pasti engineer sipilnya berhitung mati-matian dalam kesetimbangan gedung ini.

11.JPG

Istana Parlemen Terbesar ada di Bucharest, Romania, dengan 500 kamar tidur, 55 dapur, dan 120 ruang santai.

att00016ay81.jpg

Stadion Terbesar di dunia adalah Maracana stadium Rio de Jeneiro, Brazil. Dengan 199,000 kapasitas, pantas saja jika stadion ini sering jadi tempat penyelenggaraan piala dunia.

13.JPG

Stadion Termahal di dunia adalah New Wembley Stadium London, Inggris. Dengan 90,000 kapasitas, stadion ini dibangun dengan biaya $ 1,6 Billion.

14.JPG

Jalan dengan flyover terbanyak adalah Interstate 10 flyover, houston Texas, USA.

att00020ee51.jpg

Alat pengangkut berat (Excavator) Terberat, Terpanjang, Tertinggi dibuat oleh KRUPP Jerman. Dengan berat 45.000 ton, panjang 215 m, tinggi 95 m. Lihat deh gambarnya! Tampak sangat kokoh ya? Tapi juga menakutkan buat saya, hehehe

16.JPG

Masjid Terbesar adalah Masjid Shah Feisal Islamabad, Pakistan. Dapat menampung 35.000 jamaah didalam dan 150.000 jamaah diluar.

17.JPG

Hotel Terbesar adalah MGM Grand Hotel, Las Vegas, USA dengan 6,276 kamar.

18.JPG

Hotel Termahal adalah Burj Al Arab Hotel, Dubai, UEA Hotel bintang 7 satu-satunya dengan tarif kamar termurah $1000/malam dan kamar termahal $28,000/malam. Hwua! Ada yah hotel seperti ini, hihihi

19.JPG

Gereja Terbesar adalah Winners Chapel, Canaan Land, Nigeria. Dengan kapasitas: 50,000 jemaat didalam, 250,000 jemaat diluar.

20.JPG

Sumber

Global Koneksi

Posted by: wihemdra on: Monday,October 26, 2009

public static class GlobalFunction
{
public static string servername = “.”;
public static string databasename = “Database_General”;
public static string username = “”;
public static string password = “”;

public static int setKoneksi()
{
string sourceFile = “data.ini”;
if (!File.Exists(sourceFile))
{
return 0;
}
FileStream file = new FileStream(sourceFile, FileMode.OpenOrCreate, FileAccess.Read);
TextReader tr = new StreamReader(file);
int NumberOfLines = 1000;
string[] ListLines = new string[NumberOfLines];

//Read the number of lines and put them in the array
for (int i = 1; i < NumberOfLines; i++)
{
ListLines[i] = tr.ReadLine();
if (ListLines[i] == null)
{
break;
}
}
servername = GlobalFunction.Mid(ListLines[1], ListLines[1].IndexOf(‘=’) + 1).Trim();
databasename = GlobalFunction.Mid(ListLines[2], ListLines[2].IndexOf(‘=’) + 1).Trim();
username = GlobalFunction.Mid(ListLines[3], ListLines[3].IndexOf(‘=’) + 1).Trim();
password = GlobalFunction.Mid(ListLines[4], ListLines[4].IndexOf(‘=’) + 1).Trim();

// Close StreamReader
tr.Close();
//sr.Close();

// Close file
file.Close();

return 1;
}

/*————————————————————————————————*/

public NilaiAccess()
{
GlobalFunction.Koneksi();
}
public PerubahanNilai GetDataNilai(string thnajaran, string kdsem, string nim, string kelas, string kdmtk, string kdjenisnilai)
{
PerubahanNilai nilai = new PerubahanNilai();

SqlCommand cmd = new SqlCommand();
cmd.Connection = GlobalFunction.con;
cmd.CommandType = CommandType.StoredProcedure;
cmd.CommandText = “spr_prak_get_nilaiawal”;
cmd.Parameters.Add(“@thnajaran”, SqlDbType.VarChar).Value = thnajaran;
cmd.Parameters.Add(“@kdsem”, SqlDbType.VarChar).Value = kdsem;
cmd.Parameters.Add(“@nim”, SqlDbType.VarChar).Value = nim;
cmd.Parameters.Add(“@kelas”, SqlDbType.VarChar).Value = kelas;
cmd.Parameters.Add(“@kdmtk”, SqlDbType.VarChar).Value = GlobalFunction.StringIndexOfChar(kdmtk, ‘-’).Trim();
cmd.Parameters.Add(“@kdjenisnilai”, SqlDbType.VarChar).Value = Convert.ToInt32(kdjenisnilai);

using (SqlDataReader sdr = cmd.ExecuteReader())
{
while (sdr.Read())
{
nilai.Nilaiawal = sdr["nilai"].ToString();
}
}

return nilai;
}

public bool SimpanPerubahanNilai(PerubahanNilai ubahnilai)
{

SqlCommand cmd = new SqlCommand();
cmd.Connection = GlobalFunction.con;
cmd.CommandType = CommandType.StoredProcedure;
cmd.CommandText = “spr_save_tr_perubahan_nilai”;
cmd.Parameters.Add(“@username”, SqlDbType.VarChar).Value = ActiveUser.User;
cmd.Parameters.Add(“@kdlab”, SqlDbType.VarChar).Value = ActiveUser.Kdlab;
cmd.Parameters.Add(“@thnajaran”, SqlDbType.VarChar).Value = ubahnilai.Thnajaran;
cmd.Parameters.Add(“@kdsem”, SqlDbType.VarChar).Value = ubahnilai.Kdsem;
cmd.Parameters.Add(“@nim”, SqlDbType.VarChar).Value = ubahnilai.Nim;
cmd.Parameters.Add(“@kelas”, SqlDbType.VarChar).Value = ubahnilai.Kelas;
cmd.Parameters.Add(“@kdmtk”, SqlDbType.VarChar).Value = GlobalFunction.StringIndexOfChar(ubahnilai.Kdmtk, ‘-’).Trim();
cmd.Parameters.Add(“@kdjenisnilai”, SqlDbType.Int).Value = Convert.ToInt32(ubahnilai.Kdjenisnilai);
cmd.Parameters.Add(“@nilaiawal”, SqlDbType.VarChar).Value = Convert.ToInt32(ubahnilai.Nilaiawal);
cmd.Parameters.Add(“@nilaiubah”, SqlDbType.VarChar).Value = Convert.ToInt32(ubahnilai.Nilaiubah);

cmd.Parameters.Add(new SqlParameter(“@return”, SqlDbType.Int, 32));
cmd.Parameters["@return"].Direction = ParameterDirection.Output;

cmd.ExecuteNonQuery();

int affectedRow = Convert.ToInt32(cmd.Parameters["@return"].Value);

if (affectedRow == 0)
{
return false;
}
else return true;

}

VERTICAL HORIZON – Best I Ever Had (Grey Sky Morning)

Posted by: wihemdra on: Friday,August 7, 2009

So you sailed away
Into a grey sky morning
Now I’m here to stay
Love can be so boring

Nothing’s quite the same now
I just say your name now

[Chorus]
But it’s not so bad
You’re only the best I ever had
You don’t want me back
You’re just the best I ever had

So you stole my world
Now I’m just a phony
Remembering the girl
Leaves me down and lonely

Send it in a letter
Make yourself feel better

[Chorus]
But it’s not so bad
You’re only the best I ever had
You don’t need me back
You’re just the best I ever had

And it may take some time to
Patch me up inside
But I can’t take it so I
Run away and hide
And I may find in time that
You were always right
You’re always right

So you sailed away
Into a grey sky morning
Now I’m here to stay
Love can be so boring

What was it you wanted
Could it be I’m haunted

[Chorus]
But it’s not so bad
You’re only the best I ever had
I don’t want you back
You’re just the best I ever had
The best I ever had
The best I ever

Afgan – Wajahmu Mengalihkan Duniaku

Posted by: wihemdra on: Saturday,August 1, 2009

ketika kau lewat di tempat ku berdiri
kedua mata ini tak berkedip menatapi
pesona indah wajahmu mampu mengalihkan duniaku
tak henti membayangkanmu terganggu oleh cantikmu

tujuh hari dalam seminggu
hidup penuh warna ku coba mendekatimu
memberi tanda cinta
engkau wanita tercantikku yang pernah ku temukan
wajahmu mengalihkan duniaku

hey hey heee pesonamu
dan wajahmu mengalihkanku

pesona indah wajahmu mampu mengalihkan duniaku
tak henti membayangkanmu terganggu oleh cantikmu

tujuh hari dalam seminggu
hidup penuh warna ku coba mendekatimu
memberi tanda cinta
engkau wanita tercantikku yang pernah ku temukan
wajahmu mengalihkan duniaku

hidupku penuh warna
ku selalu mendekatimu memberi tanda cinta hooo ooo..

engkau wanita tercantikku yang pernah ku temukan
wajahmu mengalihkan duniaku

mengalihkan duniaku
mengalihkan duniaku
mengalihkan duniaku

D’Masiv – Jangan Menyerah

Posted by: wihemdra on: Tuesday,July 28, 2009

lyric : D’MasivJangan Menyerah

Tak ada manusia yang terlahir sempurna
Jangan kau sesali segala yang telah terjadi

Kita pasti pernah dapatkan cobaan yang berat
Seakan hidup ini tak ada artinya lagi

Syukuri apa yang ada, hidup adalah anugerah
Tetap jalani hidup ini melakukan yang terbaik

Tuhan pasti kan menunjukkan Kebesaran dan Kuasanya
Bagi hambanya yang sabar dan tak kenal putus asa

Jangan menyerah…!  jangan menyerah…!

Top Downloads

Top Links

Translate My Web

 

December 2009
M T W T F S S
« Oct    
 123456
78910111213
14151617181920
21222324252627
28293031  

Categories

Blog Stats

  • 20,669 hits

Note

Focus To The Solution
Is The Best Way
To Solve And Forget The Problems