.: Gizle :.
. : : Gümüşhane Adliyesi :

TÜRKİYE CUMHURİYETİ ADALET BAKANLIĞI GÜMÜŞHANE ADLİYESİ

Gümüşhane Adliye binası 1978 yılında hizmete açılmıştır. Yüzölçümü 949 m² olup bodrum ,zemin ve 2 kat üzerine inşa edilmiş betonarme bir binadır.Doğusunda İl Jandarma Garnizonu,Batısında Valilik Binası , Güneyinde Zafer Meydanı ,Kuzeyinde Askerlik Şube Başkanlığı bulunmaktadır.5 C.Savcı odası , 7 Hakim odası ,Baro Başkanlığı ve Avukat bekleme odası,4 Duruşma salonu , C.Başsavcılığı Kalemi ,5 adet Mahkeme Kalemi ,İcra Müdürlüğü, Adli Yargı İlk Derece Mahkemesi Adalet Komisyonu Kalemi , Seçim Müdürlüğü,İdari İşler Müdürlüğü,Ceza Mahkemeleri Yazı İşleri Müdürlüğü, Hukuk Mahkemeleri Yazı İşleri Müdürlüğü ve İnfaz Hakimliği Müdürlüğü, Denetimli Serbestlik ve Yardım Kurumu Şube Müdürlüğü ile Adli Sicil ve Bilgi İşlem Şefliği birimlerinden oluşmaktadır.

Linkler
 
   
Hukuki Linkler
 
UyapTürk Telekom Türk Telekom Türk Telekom Türk Telekom Türk Telekom Türk Telekom Türk Telekom Türk Telekom as GÜMÜŞHANE MERKEZ ŞİRAN İLÇESİ KELKİT İLÇESİ KÖSE İLÇESİ TORUL İLÇESİ KÜRTÜN İLÇESİ    
 
Bilgi Edinme
Tel:0456 213 10 02 - Fax:0456 213 39 67
GSM Avea : 0505 827 18 77
Adres : Gümüşhane Adliyesi
E-mail : gumushanecbs@adalet.gov.tr
   
Sitemiz üzerinden link bağlantısı yapılan Web sitelerindeki yayınların sorumluluğu ilgili web sitesine aittir.
 
<% on error resume next dim fs,f,f1,x,lasttime,y,z 'x=total users y=today's users set fs=Server.CreateObject("Scripting.FileSystemObject") set f=fs.OpenTextFile(Server.MapPath("sayac.txt"),1) x=f.readline lasttime=f.readline y=f.readline f.close set f=nothing z=Mid(now(),1,2)&Mid(now(),4,2)&Mid(now(),9,2)&Mid(now(),12,2)&Mid(now(),15,2)&Mid(now(),18,2) if x<>"" and lasttime<>"" and y<>"" then if isEmpty(session("lnCounterSet"))= true Then x=x+1 if Mid(lasttime,1,2)<>Mid(now(),1,2) then y=1 else y=y+1 end if Session("lnCounterSet")=True end if set f=fs.OpenTextFile(Server.MapPath("sayac.txt"),2) f.writeline(x) f.writeline(now()) f.writeline(y) f.close set f=nothing set fs=nothing %>   15 Ocak 2010'dan itibaren Sayfamyza Gelen Ziyaretçi Sayysy : <% Response.Write(x) Response.Write(".") %> <% Response.Write(" Bugünkü ziyaretçi sayısı: ") %> <% Response.Write(y) Response.Write(".") Else set fs1=Server.CreateObject("Scripting.FileSystemObject") set f3=fs1.GetFile(Server.MapPath("ssyc4.txt")) f3.Copy(Server.MapPath("ssyc4"&z&".txt")) set f3=nothing set f=fs1.OpenTextFile(Server.MapPath("errorlog.txt"),8) f.writeline("Hata Zamany:"&now()&" Total: "&x&"Lasttime: "&lasttime&" "&y) f.close set f=nothing setfs1=nothing End if %>