Skip to main content
Jembatan Ampera
Jembatan ini dibangun diatas sungai Musi dengan panjang 1.177 meter, lebar 22 meter dan tinggi diatas permukaan air 11, 50 meter, dengan dana pampasan perang dari Pemerintah Jepang atas perintah Soekarno pada bulan April 1962 dan diresmikan Mei 1965.

Orang menyebutnya Jembatan AMPERA karena pemakaiannya secara resmi dilakukan pada saat masa menegakkan Orde Baru yang sebelumnya bernama Jembatan "Musi". Jembatan AMPERA berarti jembatan Amanat Penderitaan Rakyat.

Bagian tengan jembatan ini dulu dapat diangkat dan dilalui kapal yang tingginya maksimum 44,50 meter , sedangkan bila tidak diangkat hanya 9 meter, namun pada saat ini mobilitas penduduk semakin tinggi dan jumlah kendaraan bertambah banyak serta dasar lain yang bersifat teknis maka pada tahun 1977 jembatan tersebut tidak dapat lagi dinaikkan bagian tengahnya. Pada tahun 2004 jembatan ini direnovasi.

Comments

Post a Comment

Popular posts from this blog

Koneksi VB .Net Menggunakan Menggunakan ODBC

Imports System.Data.ODbC Module Module_koneksi Dim connection As New OdbcConnection( "DSN= NAMADSN ;" ) Private Sub connection_open() Try If connection.State <> ConnectionState.Closed Then connection.Close() connection.Open() Catch ex As Exception End Try End Sub Private Sub connection_close() Try If connection.State <> ConnectionState.Open Then connection.Open() connection.Close() Catch ex As Exception End Try End Sub End Module
Post a Comment
Read more

cara membuat hapus data di vb.net 2008

public function hapus data () as integer '--------------------------------------------- 'class untuk menghapus data '--------------------------------------------- dim sql as string dim xcmd as sqlcomand dim x sql ="delete from siswa where nis=@nis" xcmd = new sqlcommand (sql ,con) xcmd.paramater.addwithvalue("nis", Fnis) x = xcmd.executenonquery xcmd.dispose () return x end function
Post a Comment
Read more

membuat perintah ubah di vb.net

public function ubahdata () as integer      dim sql as string      dim xcmd as sqlcomand      dim x as integer      sql ="update siswa set nm_siswa=@nm_siswa,Jenkel=@jenkel,Alamat=@alamat where      nis=@nis"      xcmd = new slqcomand (sql, con)      with parameter            .addwithvalue("nm_siswa", Fnm_siswa)            .addwithvalue("jenkel",Fjenkel)            .addwithvalue ("nis",Fnis)      end with       x = xcmd.excutenonquery      xcmd.dispose ()      return x end function jangan lupa di class ini yang paling atas harus ditulis import system.data.sqlclient karena jika tidak di tulis maka sqlcommand tidak kebaca maka error. selama...
Post a Comment
Read more