http://www.fear.web.tr/dene.asp
Şıkların boş-dolu kontrolünü yapmıyor, puanları hesaplıyor. Umarım yardımcı olur.
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Untitled Document</title>
<style type="text/css">
<!--
#form1 table tr td label #button {
text-align: center;
}
-->
</style>
</head>
<%
dim p,tp
p=request.querystring("p")
%>
<body>
<%
if p="sonuc" then
tp=0
if request.form("1")="a" then
tp=tp+2
elseif request.form("1")="b" then
tp=tp+4
elseif request.form("1")="c" then
tp=tp+6
end if
if request.form("2")="a" then
tp=tp+6
elseif request.form("2")="b" then
tp=tp+4
elseif request.form("2")="c" then
tp=tp+7
elseif request.form("2")="d" then
tp=tp+2
elseif request.form("2")="e" then
tp=tp+1
end if
if request.form("3")="a" then
tp=tp+4
elseif request.form("3")="b" then
tp=tp+2
elseif request.form("3")="c" then
tp=tp+5
elseif request.form("3")="d" then
tp=tp+7
elseif request.form("3")="e" then
tp=tp+6
end if
if request.form("4")="a" then
tp=tp+4
elseif request.form("4")="b" then
tp=tp+6
elseif request.form("4")="c" then
tp=tp+2
elseif request.form("4")="d" then
tp=tp+1
end if
if request.form("5")="a" then
tp=tp+6
elseif request.form("5")="b" then
tp=tp+4
elseif request.form("5")="c" then
tp=tp+3
elseif request.form("5")="d" then
tp=tp+5
elseif request.form("5")="e" then
tp=tp+2
end if
if request.form("6")="a" then
tp=tp+6
elseif request.form("6")="b" then
tp=tp+4
elseif request.form("6")="c" then
tp=tp+2
end if
if request.form("7")="a" then
tp=tp+6
elseif request.form("7")="b" then
tp=tp+2
elseif request.form("7")="c" then
tp=tp+4
end if
if request.form("8")="a" then
tp=tp+6
elseif request.form("8")="b" then
tp=tp+7
elseif request.form("8")="c" then
tp=tp+5
elseif request.form("8")="d" then
tp=tp+4
elseif request.form("8")="e" then
tp=tp+3
elseif request.form("8")="f" then
tp=tp+2
elseif request.form("8")="g" then
tp=tp+1
end if
if request.form("9")="a" then
tp=tp+7
elseif request.form("9")="b" then
tp=tp+6
elseif request.form("9")="c" then
tp=tp+4
elseif request.form("9")="d" then
tp=tp+2
elseif request.form("9")="e" then
tp=tp+1
end if
if request.form("10")="a" then
tp=tp+4
elseif request.form("10")="b" then
tp=tp+2
elseif request.form("10")="c" then
tp=tp+3
elseif request.form("10")="d" then
tp=tp+5
elseif request.form("10")="e" then
tp=tp+6
elseif request.form("10")="f" then
tp=tp+1
end if
response.write "Toplam Puan: <b>" & tp & "</b><br><br>"
if tp => 60 then
response.write "İnsanlar sana kırılgan bir eşya muamelesi yapıyorlar. Kibirli, bencil ve aşırı baskın birisi olarak görülüyorsun. İnsanlar size hayranlık duyup sizin gibi olmak isteyebilirler ama size her zaman güvenmezler ve sizinle çok yakın ilişkide olmaktan kaçınırlar."
elseif tp => 51 and tp < 60 then
response.write "insanlar sizi heyecan verici, havai, düşüncesiz yapıda, doğal liderlik özellikleri olan, her zaman doğru olmasa da hızlı karar veren birisi olarak tanırlar. Seni cesur, maceraperest birisi olarak tanırlar; her şeyi bir kez denemek isteyen, macera yaşamak için fırsatları kaçırmayan birisi.. Yaydığınız heyecandan dolayı insanlar sizinle aynı iş yerinde yaşamaktan zevk alırlar."
elseif tp => 41 and tp < 50 then
response.write "İnsanlar sizi taze, canlı, çekici, eğlendirici, pratik ve daima ilginç birisi olarak görürler; her zaman ilgi odağı olan ama çok aşırıya kaçmayacak kadar da dengeli birisi.. İnsanlar sizi ayrıca iyiliksever, düşünceli, anlayışlı ve kendilerini neşelendiren ve rahatlatan birisi olarak tanırlar."
elseif tp => 31 and tp < 40 then
response.write "İnsanlar sizi mantıklı, ihtiyatlı, dikkatli ve pratik birisi olarak görürler. Sizi zeki, yetenekli ve hünerli ama alçak gönüllü olarak tanırlar. Çok hızlı arkadaşlık kurmayan, ama arkadaşlarına karşı çok sadık olan ve onlardan da aynı şeyi bekleyen birisiniz."
end if
else
%>
<form id="form1" name="form1" method="post" action="?p=sonuc">
<table width="100%" height="288" border="0">
<tr>
<td> </td>
</tr>
<tr>
<td>
1. Kendinizi ne zaman en iyi hissedersiniz? <br />
<label>
<br />
<input type="radio" name="1" value="a" id="1_0" />
A
Sabahları
</label>
<label>
<br />
<input type="radio" name="1" value="b" id="1_1" />
B
Öğlenden sonra ve akşama doğru
</label>
<label>
<br />
<input type="radio" name="1" value="c" id="1_2" />
C
Gecenin ilerleyen saatlerinde
</label>
</td>
</tr>
<tr>
<td>
2. Nasıl yürürsünüz?
<label>
<br />
<br />
<input type="radio" name="2" value="a" id="RadioGroup1_0" />
A</label>
Hızlı ve uzun adımlarla<br />
<label>
<input type="radio" name="2" value="b" id="RadioGroup1_1" />
B</label>
Hızlı ve kısa adımlarla <br />
<label>
<input type="radio" name="2" value="c" id="RadioGroup1_2" />
C</label>
Normalden yavaş ve etrafa bakınarak<br />
<label>
<input type="radio" name="2" value="d" id="RadioGroup1_3" />
D</label>
Yavaş ve başı eğik<br />
<label>
<input type="radio" name="2" value="e" id="RadioGroup1_4" />
E</label>
Çok yavaş<br />
</td>
</tr>
<tr>
<td>
3. İnsanlarla konuşurken
<label>
<br />
<br />
<input type="radio" name="3" value="a" id="3_0" />
A</label>
Kollarımı göğsümde katlamış olarak dururum<br />
<label>
<input type="radio" name="3" value="b" id="3_1" />
B</label>
Ellerimi sıkarım<br />
<label>
<input type="radio" name="3" value="c" id="3_2" />
C</label>
Bir veya iki elimi belime koyarım<br />
<label>
<input type="radio" name="3" value="d" id="3_3" />
D</label>
Konuştuğum insanlara dokunur veya ittiririm<br />
<label>
<input type="radio" name="3" value="e" id="3_4" />
E</label>
Kulağımla oynar, çeneme dokunur veya saçımı düzeltirim<br />
<br />
</td>
</tr>
<tr>
<td>
4. Dinlenirken nasıl oturursunuz?
<br />
<br />
<label>
<input type="radio" name="4" value="a" id="4_0" />
A</label>
Dizler katlanmış ve bacaklar birbirine bitişik olarak<br />
<label>
<input type="radio" name="4" value="b" id="4_1" />
B</label>
Bacaklar çaprazlanmış olarak<br />
<label>
<input type="radio" name="4" value="c" id="4_2" />
C</label>
Bacaklarımı uzatarak<br />
<label>
<input type="radio" name="4" value="d" id="4_3" />
D</label>
Bir bacağımı altıma katlayarak<br />
<br />
</td>
</tr>
<tr>
<td>
5. Çok hoşunuza giden bir şey olduğunda ne yaparsınız?
<label>
<br />
<br />
<input type="radio" name="5" value="a" id="5_0" />
A</label>
Büyük bir kahkaha atarım<br />
<label>
<input type="radio" name="5" value="b" id="5_1" />
B</label>
Gülerim ama fazla sesli değil<br />
<label>
<input type="radio" name="5" value="c" id="5_2" />
C</label>
Bir kerelik gülerim <br />
<label>
<input type="radio" name="5" value="d" id="5_3" />
D</label>
Sessizce gülümserim<br />
<br />
</td>
</tr>
<tr>
<td>
6. Bir partiye veya sosyal etkinliğe katıldığınızda
<label>
<br />
<br />
<input type="radio" name="6" value="a" id="6_0" />
A</label>
Herkes sizi fark edecek şekilde gürültülü bir giriş mi yaparsınız?<br />
<label>
<input type="radio" name="6" value="b" id="6_1" />
B</label>
Sessiz bir giriş yapıp etrafınızda tanıdığınız birilerine mi bakınırsınız?<br />
<label>
<input type="radio" name="6" value="c" id="6_2" />
C</label>
Çok sessizce girip kimsenin sizi fark etmemesine mi gayret edersiniz?<br />
</td>
</tr>
<tr>
<td>
7. Çok zor bir işe dikkatinizi vermişken rahatsız ediliyorsunuz.Ne yaparsınız?
<label>
<br />
<br />
<input type="radio" name="7" value="a" id="7_0" />
A</label>
Bölünmeyi memnuniyetle karşılarım<br />
<label>
<input type="radio" name="7" value="b" id="7_1" />
B</label>
Aşırı derecede rahatsız olurum<br />
<label>
<input type="radio" name="7" value="c" id="7_2" />
C</label>
Belli olmaz.Bu iki uç arasında değişken davranışlar gösteririm<br />
</td>
</tr>
<tr>
<td>
8. En çok hangi rengi seversiniz?
<br />
<br />
<label>
<input type="radio" name="8" value="a" id="8_1" />
A</label>
Kırmızı veya portakal rengi<br />
<label>
<input type="radio" name="8" value="b" id="8_2" />
B</label>
Siyah<br />
<label>
<input type="radio" name="8" value="c" id="8_3" />
C</label>
Sarı veya mavi<br />
<label>
<input type="radio" name="8" value="d" id="8_4" />
D</label>
Yeşil <br />
<label>
<input type="radio" name="8" value="e" id="8_5" />
E</label>
Koyu mavi veya mor<br />
<label>
<input type="radio" name="8" value="f" id="8_6" />
F</label>
Beyaz<br />
<label>
<input type="radio" name="8" value="g" id="8_7" />
G</label>
Kahverengi veya gri<br />
</td>
</tr>
<tr>
<td>
9. Yatakta uyumadan önceki birkaç dakikada
<label>
<br />
<br />
<input type="radio" name="9" value="a" id="9_0" />
A</label>
Sırt üstü yatıp uzanırsınız<br />
<label>
<input type="radio" name="9" value="b" id="9_1" />
B</label>
Karnınızın üstüne yatıp uzanırsınız<br />
<label>
<input type="radio" name="9" value="c" id="9_2" />
C</label>
Hafif kıvrılmış olarak yan tarafınıza yatarsınız<br />
<label>
<input type="radio" name="9" value="e" id="9_3" />
D</label>
Başınızı bir kolunuzun üzerine koyarsınız<br />
<label>
<input type="radio" name="9" value="d" id="9_4" />
E</label>
Başınızı yorganın altına kapatırsınız<br />
</td>
</tr>
<tr>
<td>
10. Rüyanızda genellikle
<label>
<br />
<br />
<input type="radio" name="10" value="a" id="10_0" />
A</label>
Düşersiniz<br />
<label>
<input type="radio" name="10" value="b" id="10_1" />
B</label>
Kavga eder veya tartışırsınız<br />
<label>
<input type="radio" name="10" value="c" id="10_2" />
C</label>
Birilerini veya bir şeyler ararsınız<br />
<label>
<input type="radio" name="10" value="d" id="10_3" />
D</label>
Uçar veya yüzersiniz<br />
<label>
<input type="radio" name="10" value="e" id="10_4" />
E</label>
Genelde rüya görmezsiniz <br />
<label>
<input type="radio" name="10" value="f" id="10_5" />
F</label>
Rüyalarınız daima hoştur<br />
</td>
</tr>
<tr>
<td><label>
<input type="submit" name="button" id="button" value=" GÖNDER " />
</label>
<label>
<input type="reset" name="button2" id="button2" value=" SİL " />
</label></td>
</tr>
</table>
</form>
<%
end if
%>
</body>
</html>