Sub ShowM()
	Dim Tp
	Set Tp = window.event.srcElement 
			document.all.PozisyonT.Style.display = "None"
			document.all.KisiselT.Style.display = "None"
			document.all.OgrenimT.Style.display = "None"			
			document.all.TecrubeT.Style.display = "None"			
			document.all.ReferansT.Style.display = "None"			
			document.all.DigerT.Style.display = "None"			
			
			document.all(Tp.id & "T").style.display = ""
			window.event.srcElement.bgcolor = "#FFE8B6"
	end Sub

Function validate_Pozisyon_B()

dim str_error
str_error=""

if document.FrontPage_Form1.Basvuru_Tipi.value="" then
	str_error=str_error & "Lütfen Başvuru Tipi bölümünü boş bırakmayınız." & vbcrlf
end if

if document.FrontPage_Form1.Basvuru_Pozisyonu.value="" then
	str_error=str_error & "Lütfen Başvuru Pozisyonu bölümünü boş bırakmayınız." & vbcrlf
end if

	
if str_error<>"" then
	alert(str_error)
	validate_Pozisyon_B=false
else
	validate_Pozisyon_B=true
end if

end function 


Sub Pozisyon_B()
	if validate_Pozisyon_B then
		document.all("PozisyonT").style.display = "None"
		document.all("KisiselT").style.display = ""

	end if	
end Sub
	
Function validate_Kisisel_B()

dim str_error
str_error=""

if document.FrontPage_Form1.Ad.value="" then
	str_error=str_error & "Lütfen Ad bölümünü boş bırakmayınız." & vbcrlf
end if	
if document.FrontPage_Form1.Soyad.value="" then
	str_error=str_error & "Lütfen Soyadı bölümünü boş bırakmayınız." & vbcrlf
end if	
if document.FrontPage_Form1.Dogum_Yeri.value="" then
	str_error=str_error & "Lütfen Doğum Yeri bölümünü boş bırakmayınız." & vbcrlf
end if	
if document.FrontPage_Form1.Dogum_Gun.value="" then
	str_error=str_error & "Lütfen Doğdunuz Gün bölümünü boş bırakmayınız." & vbcrlf
end if
if document.FrontPage_Form1.Dogum_Ay.value="" then
	str_error=str_error & "Lütfen Doğduğunuz Ay bölümünü boş bırakmayınız." & vbcrlf
end if
if document.FrontPage_Form1.Dogum_Yili.value="" then
	str_error=str_error & "Lütfen Doğduğunuz Yıl bölümünü boş bırakmayınız." & vbcrlf
end if
if document.FrontPage_Form1.Email.value="" then
	str_error=str_error & "Lütfen Email adresiniz bölümünü boş bırakmayınız." & vbcrlf
end if
if document.FrontPage_Form1.Adres.value="" then
	str_error=str_error & "Lütfen Adresiniz bölümünü boş bırakmayınız." & vbcrlf
end if
if document.FrontPage_Form1.Uyruk.value="" then
	str_error=str_error & "Lütfen Uyruğunuz bölümünü boş bırakmayınız." & vbcrlf
end if
if document.FrontPage_Form1.Cinsiyet.value="" then
	str_error=str_error & "Lütfen Cinsiyet bölümünü boş bırakmayınız." & vbcrlf
end if
if document.FrontPage_Form1.Telefon_No3.value="" then
	str_error=str_error & "Lütfen Ev Telefon Numaranız bölümünü boş bırakmayınız." & vbcrlf
end if


	
if str_error<>"" then
	alert(str_error)
	validate_Kisisel_B=false
else
	validate_Kisisel_B=true
end if

end function 


Sub Kisisel_B()
	if validate_Kisisel_B then
		document.all("KisiselT").style.display = "None"
		document.all("OgrenimT").style.display = ""
		document.all("Kisisel").bgcolor = ""
	end if	
end Sub
Function validate_Ogrenim_B()

dim str_error
str_error=""

if document.FrontPage_Form1.Egitim_Durumu.value="" then
	str_error=str_error & "Lütfen Eğitim Durumunuzu seçiniz." & vbcrlf
end if

	
if str_error<>"" then
	alert(str_error)
	validate_Ogrenim_B=false
else
	validate_Ogrenim_B=true
end if

end function 

Sub Ogrenim_B()
if validate_Ogrenim_B then
document.all("OgrenimT").style.display = "None"
document.all("TecrubeT").style.display = ""
document.all("Ogrenim").bgcolor = ""
end if	
end Sub


Sub Tecrube_B()
document.all("TecrubeT").style.display = "None"
document.all("ReferansT").style.display = ""
document.all("Tecrube").bgcolor = ""
end Sub

Sub Referans_B()
document.all("ReferansT").style.display = "None"
document.all("DigerT").style.display = ""
document.all("Referans").bgcolor = ""
end Sub


	sub basla()
			document.all("PozisyonT").style.display = ""
	end sub

	sub degis()
		Dim Tp
		Set Tp = window.event.srcElement 
		if 	not document.all(Tp.id & "T").style.display = "" Then
				window.event.srcElement.bgcolor = "#ffffff"
		end if
	end sub

	sub degis1()
		Dim Tp
		Set Tp = window.event.srcElement 
		if 	not document.all(Tp.id & "T").style.display = "" Then
			window.event.srcElement.bgcolor = ""
		end if
	end sub