Asp Sanal Klavye

Php, Asp, Perl, Html - Asp Sanal Klavye ...

Cevapla
Asp Sanal Klavye
Dorukhan isimli Üye şimdilik offline konumundadır

Dorukhan

Arı Üye

Hiç Biri / İstanbul

Standart

Asp Sanal Klavye

Alt 21-03-2009 #1
Sponsorlu Bağlantılar

<%
if request.querystring("s")=1 then
%>
<% end if %>
<html>

<script language="jscript">
function hesap(gelen)
{
if (gelen=="sil")
{
ilk = document.yaz.inp.value.substring(0,document.yaz.inp.value.length-1);
}

else
ilk=document.yaz.inp.value+(gelen)
document.yaz.inp.value=(ilk)
}
</script>

<STYLE TYPE="text/css">
<!--
.but { font: 12px Verdana, Arial, Helvetica, sans-serif; background: #dddddd}
.tab {  background: #f2f2f2; border: #000000}
.tabb { background: #f2f2f2; border: #FFFFFF groove; font-size: <%=request.querystring("font")%>px}
.normal { font: 12px Verdana, Arial, Helvetica, sans-serif; background: #CCCCCC; color: #000033}
.klavye { background: #dddddd; border: #000000 }
-->
</STYLE>
<BODY BGCOLOR="#f2f2f2">
</body>
<form name=yaz>
<DIV ALIGN="CENTER">
<B><textarea class=tabb name=inp rows=10 cols=60>
<%=request.querystring("inp")%>
</textarea>
<br>
<TABLE WIDTH="82%" BORDER="1" CLASS="klavye" HEIGHT="8">
<TR>
<TD WIDTH="84%">
<%
for i=65 to 90
%><button  class=normal onclick=hesap("<%=chr(i)%>")><b> <%=chr(i)%> </b></button>
<%
if i=90 then
response.write "<br>"
end if
%>
<% next %>
<%
for s=97 to 122
%>
<button  class=normal onclick=hesap("<%=chr(s)%>")><b> <%=chr(s)%> </b></button>
<% next %>
<br>
<center>
<button  class=normal onclick=hesap("sil")> <b><--- Sil</b></button>
<button  onclick=hesap(" ") class=normal><b>Bosluk</b></button>
<button  onclick=hesap(".") class=normal><b>.</b></button>
<button  onclick=hesap(",") class=normal><b>,</b></button>
<button  onclick=hesap(":") class=normal><b>:</b></button>
</TD>
<TD WIDTH="16%">
<DIV ALIGN="CENTER">&nbsp;
<%
for q=0 to 9
%>
<button  class=normal onclick=hesap("<%=q%>")><b> <%=q%> </b></button>
<%
select case q
case 3
response.write "<br>"
case 6
response.write "<br>"
end select
%><% next %>
</DIV>
</TD>
</TR>
</TABLE>
<%
if request.querystring("nasil")="gelismis" then
%> <br>
<%

for w=122 to 255
%>
<button  class=but onclick=hesap("<%=chr(w)%>")><b> <%=chr(w)%></b> </button>
<%
if w=255 then
response.write "<br>"
end if

%>
<% next %>
<% end if %>
<br>
<form method="get" action="">
<DIV ALIGN="CENTER">
<BR>
<A HREF="hTTp://www.binbirkod.com">www.binbirkod.com</A>
<br>
<br>
<TABLE WIDTH="31%" BORDER="1" CLASS="but">
<TR>
<TD WIDTH="73%">
<FONT SIZE="2">Font Büyüklügü : <b>(<%=request.querystring("font")%>)</b></FONT>
</TD>
<TD WIDTH="27%">
<SELECT NAME=font SIZE=1>
<OPTION>Seçiniz</OPTION>
<OPTION VALUE="12">12</OPTION>
<OPTION VALUE="14">14</OPTION>
<OPTION VALUE="16">16</OPTION>
<OPTION VALUE="18">18</OPTION>
<OPTION VALUE="24">24</OPTION>
<OPTION VALUE="36">36</OPTION>
</SELECT>
</TD>
</TR>
<TR>
<TD WIDTH="73%">
Klavye Görünüsü : <b>(<%=request.querystring("nasil")%>)</b>
</TD>
<TD WIDTH="27%">
<SELECT NAME=nasil SIZE=1>
<OPTION>Seçiniz</OPTION>
<OPTION VALUE="normal">Normal</OPTION>
<OPTION VALUE="gelismis">Gelismis</OPTION>
</SELECT>
</TD>
</TR>
</TABLE>
<INPUT TYPE="submit" NAME="Submit" VALUE="Degistir">
<BR>
<BR>
</DIV>
</form>
Bu mesajdan alıntı yap
Sponsor Links

Grafikerler.net Reklamları

Cevapla

Benzer Konular
Konu Konu Bilgileri Forum Cevaplar Son Mesaj
Corel'de yaptigim Klavye Dorukhan Serbest Çalışmalar 4 20-03-2009 16:02:16
Photoshopta Klavye Yapımı turkuaz2006 Serbest Çalışmalar 5 18-03-2009 13:18:59
Klavye temizlemek... LuNaTiC Graficafe 5 07-08-2008 22:58:53
1500 Dolarlık Işıklı Klavye N/A8 Donanım Rehberi 27 16-08-2007 00:41:20

Kapat
Şifremi Unuttum?